A: (0.95, 1.85)
B = (0, -1)
f = Segment(B, A)
C = Point(Segment[B, A])
c = Circle(C, A)
l = OrthogonalLine(C, f)
H = Intersect(c, l, 2)
I = Intersect(c, l, 1)
p = CircleSector(C, H, I)
E = Point(c)
D = PointIn(p)
g = Segment(D, E)
h = Segment(D, A)
d = Circle(B, A)
k = Ray(A, B)
G = Intersect(d, k, 2)
i = Ray(D, E)
F = Intersect(d, i, 1)
j = Segment(E, F)
J = (-5.094536827872039, -5.403293321021872)