A = (1, -4)
abs(2.3)
B = Point(Circle[A, abs(2.3)])
a = Segment(A, B)
abs(5)
C = Point(Circle[B, abs(5)])
b = Segment(B, C)
c = LineBisector(A, B)
A' = Rotate(A, -16*°, C)
α = Angle(A', C, A)
d = Ray(C, A')
D = Intersect(c, d)
E = Intersect(c, a)
abstandDE = Distance(D, E)
Midpoint(D, E)
TextDE: "\overline{" + (Name[D]) + (Name[E]) + "} \, = \, " + abstandDE