2a

A = (-3.354701121951221, 5.923775317073172)
f = OrthogonalLine(A, yAxis)
B = Point(f)
g = Segment(A, B)
C = Point(g)
h = Segment(A, C)
i = Segment(C, B)
D = (0.68, 1.16)
a = Distance(i, h)
distanceAB = Distance(A, B)
TextAB: Name[A] + (Name[B]) + " = " + distanceAB
e = 2.715438000000003
F_1: ((-e), 0)
F_2: (e, 0)
c = Circle(F_1, h)
d = Circle(F_2, i)
E, F = Intersect(c, d)
loc1 = Locus(E, C)
loc2 = Locus(F, C)
j = Segment(F_2, E)
k = Segment(F_1, E)