A_1 = (-3, -1)
B_1 = (3, -1)
P = (0, 1)
g = Line(A_1, B_1)
c = Circle(P, 3)
A, B = Intersect(c, g)
d = Circle(A, 4)
e = Circle(B, 4)
C, D = Intersect(d, e)
l = Line(C, D)
L = Intersect(g, l)
f = Segment(C, A)
h = Segment(C, B)
i = Segment(B, D)
j = Segment(A, D)
k = Segment(P, A)
m = Segment(P, B)
n = Segment(A, B)