Desenvolvido por PPGECIM/ULBRA

Estudo da área do losango

L1 = 5 (slider from 1 to 5, step 1)
L2 = 5 (slider from 1 to 5, step 1)
O = Point({0, 0})
pol1, a, o, b = Polygon(O, (L1 / 2, 0), (0, L2 / 2))
pol2, c, d, e = Polygon(O, (((-L1)) / 2, 0), (0, L2 / 2))
pol3, f, g, h = Polygon(O, (L1 / 2, 0), (0, ((-L2)) / 2))
pol4, i, j, k = Polygon(O, (((-L1)) / 2, 0), (0, ((-L2)) / 2))
Animação = 1 (slider from 0 to 1, step 0.01)
pol5, l, m, n = Polygon(((L1 / 4 * cos((Animação * π))) + (L2 / 4 * sin((Animação * π))) + L1 / 4, (((-L2)) / 4 * cos((Animação * π))) + (L1 / 4 * sin((Animação * π))) + L2 / 4), ((L1 / 4 * cos(((-Animação) * π))) + (L2 / 4 * sin(((-Animação) * π))) + L1 / 4, (L2 / 4 * cos(((-Animação) * π))) - (L1 / 4 * sin(((-Animação) * π))) + L2 / 4), ((((-L1)) / 4 * cos((Animação * π))) - (L2 / 4 * sin((Animação * π))) + L1 / 4, (L2 / 4 * cos((Animação * π))) - (L1 / 4 * sin((Animação * π))) + L2 / 4))
pol6 = Rotate(pol5, -180*°, O)
pol7 = Mirror(pol5, yAxis)
pol8 = Mirror(pol6, yAxis)
A = Point({((-L1)) / 2, ((-L2)) / 2 - 0.5})
B = Point({L1 / 2, ((-L2)) / 2 - 0.5})
p = Segment(A, B)
texto2: "" + p + ""
C = Point({((-L1)) / 2 - 0.5, ((-L2)) / 2})
D = Point({((-L1)) / 2 - 0.5, L2 / 2})
q = Segment(D, C)
texto3: "" + q + ""