B = (5, -5)
A = (-5, -5)
c1, j, k, l, m, J, K = Polygon(A, B, 4)
C: J
s1 = Segment(A, B)
s2 = Segment(B, C)
D: K
s3 = Segment(C, D)
s4 = Segment(D, A)
E = (-3.385164807140112, 3.385164807132425)
F = (1.6406348501973866E-11, 5.739875241772552E-11)
G = (3.3851648071397356, 3.3851648071355314)
H = (-3.3851648071292733, -3.3851648071334766)
I = (3.3851648071289833, -3.3851648071365474)
fu = UnitOrthogonalVector(s1)
gu = UnitOrthogonalVector(s2)
hu = UnitOrthogonalVector(s3)
iu = UnitOrthogonalVector(s4)
e1: fu / Distance[E, s1]^(2)
f1: fu / Distance[F, s1]^(2)
g1: fu / Distance[G, s1]^(2)
h1: fu / Distance[H, s1]^(2)
i1: fu / Distance[I, s1]^(2)
e2: gu / Distance[E, s2]^(2)
f2: gu / Distance[F, s2]^(2)
g2: gu / Distance[G, s2]^(2)
h2: gu / Distance[H, s2]^(2)
i2: gu / Distance[I, s2]^(2)
e3: hu / Distance[E, s3]^(2)
f3: hu / Distance[F, s3]^(2)
g3: hu / Distance[G, s3]^(2)
h3: hu / Distance[H, s3]^(2)
i3: hu / Distance[I, s3]^(2)
e4: iu / Distance[E, s4]^(2)
f4: iu / Distance[F, s4]^(2)
g4: iu / Distance[G, s4]^(2)
h4: iu / Distance[H, s4]^(2)
i4: iu / Distance[I, s4]^(2)
e5: Vector[F, E] / Distance[F, E]^(2)
e6: Vector[G, E] / Distance[G, E]^(2)
e7: Vector[H, E] / Distance[H, E]^(2)
e8: Vector[I, E] / Distance[I, E]^(2)
f5: Vector[E, F] / Distance[E, F]^(2)
f6: Vector[G, F] / Distance[G, F]^(2)
f7: Vector[H, F] / Distance[H, F]^(2)
f8: Vector[I, F] / Distance[I, F]^(2)
g5: Vector[E, G] / Distance[E, G]^(2)
g6: Vector[F, G] / Distance[F, G]^(2)
g7: Vector[H, G] / Distance[H, G]^(2)
g8: Vector[I, G] / Distance[I, G]^(2)
h5: Vector[E, H] / Distance[E, H]^(2)
h6: Vector[F, H] / Distance[F, H]^(2)
h7: Vector[G, H] / Distance[G, H]^(2)
h8: Vector[I, H] / Distance[I, H]^(2)
i5: Vector[E, I] / Distance[E, I]^(2)
i6: Vector[F, I] / Distance[F, I]^(2)
i7: Vector[G, I] / Distance[G, I]^(2)
i8: Vector[H, I] / Distance[H, I]^(2)
e: e1 + e2 + e3 + e4 + e5 + e6 + e7 + e8
f: f1 + f2 + f3 + f4 + f5 + f6 + f7 + f8
g: g1 + g2 + g3 + g4 + g5 + g6 + g7 + g8
h: h1 + h2 + h3 + h4 + h5 + h6 + h7 + h8
i: i1 + i2 + i3 + i4 + i5 + i6 + i7 + i8
t = 0.103 (slider from 0 to 1)
s5 = Segment((A + D) / 2, (B + C) / 2)
s6 = Segment((B + A) / 2, (D + C) / 2)
texto1: "" + e + ""
texto2: "" + f + ""
texto3: "" + g + ""
texto4: "" + h + ""
texto5: "" + i + ""