Omotetia
Author: Ubaldo Pernigo
Date: 14 Marzo 2015

Mostra trasformata

A = (3, 6)
B = (4, 3)
C = (7, 2)
O = (1, 2)
k = -0.5 (slider from -5 to 5, step 0.1)
D = (7, 6)
e = Line(O, A)
f = Line(O, B)
h = Line(O, D)
i = Line(O, C)
poly1, a, b, c, d = Polygon(A, B, C, D)
A' = Dilate(A, k, O)
B' = Dilate(B, k, O)
C' = Dilate(C, k, O)
D' = Dilate(D, k, O)
poly1', a', b', c', d' = Polygon(A', B', C', D')
text2: "\frac{area'}{area}=\frac{" + (LaTeX[poly1']) + "}{" + (LaTeX[poly1]) + "}=" + (LaTeX[k^(2)]) + ""
mostra = true
text1: "k=\frac{" + (LaTeX[a']) + "}{" + (LaTeX[a]) + "}=\frac{" + (LaTeX[b']) + "}{" + (LaTeX[b]) + "}=\frac{" + (LaTeX[c']) + "}{" + (LaTeX[c]) + "}=\frac{" + (LaTeX[d']) + "}{" + (LaTeX[d]) + "}=" + (LaTeX[k]) + ""