α = 1.7453292519943295 rad (slider from 0.17453292519943295 to 1.5707963267948966, step 0.08726646259971647)
B = (6.68, -3.7600000000000002)
A = (-0.7000000000000001, -3.7800000000000002)
a = Segment(B, A)
C = Rotate(A, -(α), B)
β = Angle(C, B, A)
b = Segment(B, C)