A = (-5.690170664194778, -1.0830353387588953)
E = (6.283149442776193, 9.638172861600731)
a = Ray(A, E)
kcAE = Distance(A, E)
Văn bảnAB: "\overline{" + (Name[A]) + (Name[E]) + "} \, = \, " + kcAE
k: kcAE / 3.0
c = Circle(A, k)
d = Circle(E, k)
C = Intersect(c, a, 1.0)
D = Intersect(d, a, 1.0)
b = Segment(A, C)
e = Segment(C, D)
f = Segment(D, E)
B = (6.948333893163469, -1.5134488066565446)
g = Segment(E, B)
h = Segment(A, B)
i = Line(D, g)
j = Line(C, g)
C' = Intersect(j, h)
D' = Intersect(i, h)