a = 5 (slider from 5 to 20, step 0.1)
D: y = a * x
C = Intersect(d, D)
A = Intersect(d, D')
B = Intersect(D', D)
b = OrthogonalLine(C, d)