Taller 2: Homotecia y rotación Final

$O$

$A$

$B$

$C$

$D$

$E$

$F$

$A'$

$B'$

$C'$

$D'$

$E'$

$F'$

$O_2$

$A''$

$B''$

$C''$

$D''$

$E''$

$F''$

$G$

$H$

$I$

$J$

$K$

$L$

O = (-2, -2)
A = (2.8162102063180687, 3.9289596081716054)
B = (4.543402413541743, 4.56107634380501)
C = (3.9201887305228924, 2.8101426629425266)
D = (5.934710947493263, 3.902066421239895)
E = (5.934710947493263, 5.902066421239895)
F = (3.9347109474932633, 5.902066421239895)
pol1, a, b, c, d, e, f = Polygon(A, B, C, D, E, F)
k = 0.2 (slider from 0 to 1.8, step 0.1)
A' = Dilate(A, k, O)
B' = Dilate(B, k, O)
C' = Dilate(C, k, O)
D' = Dilate(D, k, O)
E' = Dilate(E, k, O)
F' = Dilate(F, k, O)
pol1', a', b', c', d', e', f' = Polygon(A', B', C', D', E', F')
α = 0 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
O_2 = (2, -2)
A'' = Rotate(A', α, O_2)
B'' = Rotate(B', α, O_2)
C'' = Rotate(C', α, O_2)
D'' = Rotate(D', α, O_2)
E'' = Rotate(E', α, O_2)
F'' = Rotate(F', α, O_2)
pol1'', a'', b'', c'', d'', e'', f'' = Polygon(A'', B'', C'', D'', E'', F'')
A'_{1} = Dilate(A, 1.5, O)
B'_{1} = Dilate(B, 1.5, O)
C'_{1} = Dilate(C, 1.5, O)
D'_{1} = Dilate(D, 1.5, O)
E'_{1} = Dilate(E, 1.5, O)
F'_{1} = Dilate(F, 1.5, O)
pol1'_{1}, a'_{1}, b'_{1}, c'_{1}, d'_{1}, e'_{1}, f'_{1} = Polygon(A'_{1}, B'_{1}, C'_{1}, D'_{1}, E'_{1}, F'_{1})
G = Rotate(A'_{1}, 60°, O_2)
H = Rotate(B'_{1}, 60°, O_2)
I = Rotate(C'_{1}, 60°, O_2)
J = Rotate(D'_{1}, 60°, O_2)
K = Rotate(E'_{1}, 60°, O_2)
L = Rotate(F'_{1}, 60°, O_2)
pol2, h, i, j, k_1, l, m = Polygon(G, H, I, J, K, L)
n = Segment(O, F')
g = Segment(O, D')
p = CircleArc(O_2, E', E'')
q = CircleArc(O_2, C', C'')
texto1: "k=" + (LaTeX[k]) + ""
texto2: "\alpha = " + (LaTeX[α]) + ""
r = Segment(O, A')
M = Point(r)
s = Segment(M, E')
t = Segment(M, C')
N = (2.0539325715791494, -1.900932732433199)
P = Point(s)
β = Angle(E', O_2, E'')
f_1 = Segment(C', O_2)
Q = Point(f_1)
g_1 = Segment(Q, C'')