droite d

courbe de référence

rayon solaire incident

O = (0, 2)
a = -6 (slider from -6 to 6, step 0.1)
g = true
A = Point(f)
b = Tangent(A, f)
c = OrthogonalLine(A, b)
B = Point(c)
d = Ray(A, B)
C = (-4, 10)
D = (6, 10)
e = Ray(A, C)
h = Line(D, e)
E = Intersect(f, h)
i = Ray(E, D)
j = Tangent(E, f)
k = OrthogonalLine(E, j)
F = Point(k)
l = Ray(E, F)
α = Angle(d, e)
β = Angle(i, l)
G = Point(yAxis)
H = Intersect(f, i, 1)
I = Intersect(f, d, 1)
p = Circle(I, 1)
q = Circle(H, 1)
J, K = Intersect(p, b)
L, M = Intersect(q, j)
m = Segment(J, K)
n = Segment(L, M)