A = (-5, 1)
B = (2, 1)
f = Segment(A, B)
c = Circle(A, 6)
d = Circle(B, 6)
C, D = Intersect(c, d)
m_{AB} = Line(C, D)
α = Angle(m_{AB}, f)
S = Intersect(m_{AB}, f)
p = 2 (slider from 0 to 10)
e = Circle(S, p)
P, P' = Intersect(e, m_{AB})
g = Segment(A, P)
h = Segment(P, B)
l = OrthogonalLine(P, f)
β = Angle(f, l)
F = Intersect(f, l)