A = (-5, -15)
B = Point(Segment[A, (x(A) + 8, y(A))])
f = Line(A, B)
h = OrthogonalLine(B, f)
E = Point(Segment[B, (x(B), y(B) + 6)])
j = Segment(B, A)
c = Circle(A, B)
i = Line(E, A)
F = Intersect(c, i, 1)
G = Point(h)
m = Segment(G, B)
k = Segment(A, F)
l = Segment(F, E)
β = Angle(A, B, E)
α = Angle(A, E, B)
D = (-13.046229913255198, -18.630156971375868)