Q = (10, -4)
D: (x(Q) - 100, y(Q))
k = Ray(Q, D)
B = Point(k)
C = Mirror(B, Q)
c = Circle(B, C)
d = Circle(C, B)
O, P = Intersect(c, d)
s = Segment(O, P)
stap = 9 (slider from 0 to 9, step 1)
A = (3.7499334588534823, -5.004893813481059)
g = Segment(C, O)
f = Segment(B, O)
i = Segment(Q, C)
h = Segment(B, Q)
j = Segment(B, C)
e = Segment(If[y(O) > y(P), O, P], Q)
α = Angle(Q, O, B)
β = Angle(Q, O, C)