geo-019-homotecia

r = 2 (slider from -1 to 2, step 0.1)
A = (0.08, 0.36)
B = (2.28, -1.04)
C = (2.24, 0.76)
D = (3.72, 1.82)
E = (2.24, 2.16)
polígono1, a, b, c, d, e = Polygon(A, B, C, D, E)
f = Segment(A, B)
B' = Dilate(B, r, A)
g = Segment(A, B')
h = Segment(A, C)
C' = Dilate(C, r, A)
i = Segment(A, C')
j = Segment(A, D)
D' = Dilate(D, r, A)
k = Segment(A, D')
l = Segment(A, E)
E' = Dilate(E, r, A)
m = Segment(A, E')
polígono2, a_1, b', c', d', e' = Polygon(A, B', C', D', E')