A = (-4.28, 0)
B = Point(Circle[A, 5])
c = Segment(A, B)
d = Circle(B, 2)
e = Circle(A, 4)
C, D = Intersect(e, d)
b = Segment(A, C)
a = Segment(C, B)