Date: 10 Novembre 2013

C = (0, 0)
D = (320, 0)
B = (0, 261.5)
A = (320, 261.5)
poly1, a_1, b_1, c, d = Polygon(A, B, C, D)
curseur = 39.6 (slider from 0 to 90, step 0.01)
e = Line(B, C)
A' = (320, 350)
A'' = Rotate(A', curseur°, A)
a = Angle(A', A, A'')
g = Line(A'', A)
h = OrthogonalLine(A, g)
E = Intersect(h, xAxis)
i = Line(E, B)
j = OrthogonalLine(B, i)
B' = (0, 350)
B'' = Point(j)
b = Angle(B', B, B'')
N: (curseur, 180 * b / π)
f = Line(A, A')
α = Angle(B, E, C)
β = Angle(D, E, A)
k: 1 / tan(a) - 1 / tan(b) - 320 / 261.5
l: tan(a)