A_1 = (2.0982381033600563, 5.075439194951388)
B_1 = (0.811652737506398, -5.296418215930412)
a = Line(A_1, B_1)
C_1 = (3.958838478594577, 5.510898857240319)
D_1 = (4.889138666211838, -5.395386320996076)
b = Line(C_1, D_1)
E_1 = (-2.9689288760020434, -3.99003922906362)
F_1 = (10.174035476718394, -4.009832850076754)
c = Line(E_1, F_1)
A = Point(a)
d = Line(A, c)
B = Intersect(b, d)
h = Segment(A, B)
G = Point(a)
e = Line(G, c)
H = Intersect(b, e)
f = Segment(G, H)
kcAG = Distance(A, G)
Văn bảnAG: "\overline{" + (Name[A]) + (Name[G]) + "} \, = \, " + kcAG
R: kcAG / 3.0
g = Circle(A, R)
k = Circle(G, R)
C = Intersect(g, a, 2.0)
E = Intersect(k, a, 1.0)
i = Line(C, f)
j = Line(E, f)
D = Intersect(b, i)
F = Intersect(b, j)
l = Segment(C, D)
m = Segment(E, F)