Date: 3 Octobre 2013

Ordre 3

Ordre 2

Ordre 1

Miroir, axe et centre de rotation

Bras de rotation et cylindre poussoir

Cylindre poussoir du palmer

Normale au miroir

Ordre 0

Rayon incident

pos palmer

alpha

theta

l centre

l bas

l haut

f_3 = false
f_2 = false
f_1 = true
divord: 1 + f_2 + (2 * f_3) - ((f_1 * f_2) * (¬f_3)) - (((2 * f_1) * (¬f_2)) * f_3) - (((2 * (¬f_1)) * f_2) * f_3) - (((3 * f_1) * f_2) * f_3)
ntr = 300
r_{rot} = 20.52
h_{ccd} = 15.1552 (slider from -5 to 16, step 1)
dfoc = 200
ε: (atan(h_{ccd} / 2 / dfoc) * 180 / π)
h_0 = -6.3
α_0: (asin(((-h_0)) / r_{rot}) * 180 / π) + 180
p_0 = 1.67 (slider from 0 to 2.5, step 0.005)
gr_{pal} = 3.01 (slider from 0 to 22, step 0.01)
h: (-p_0) + gr_{pal} + h_0
α: 180 - (asin(h / r_{rot}) * 180 / π)
θ: (-(α - α_0))
rp_{axe} = 6
degrad = 0.017453292519943295
β: α - α_0
rm_{axe} = 3
hpal = 25
lpal = 5
ybp: h + rp_{axe}
xpal0 = -21
λ_R = 7800
ray_{inc} = Ray((0, 0), (1, 0))
λ_V = 3800
λ_J = 5600
θ1_R: (asin((ntr * λ_R / 10000000) - sin(θ°)) * 180 / π)
θ1_J: (asin((ntr * λ_J / 10000000) - sin(θ°)) * 180 / π)
θ1_V: (asin((ntr * λ_V / 10000000) - sin(θ°)) * 180 / π)
θ2_V: (asin(((ntr * 2) * λ_V / 10000000) - sin(θ°)) * 180 / π)
θ2_J: (asin(((ntr * 2) * λ_J / 10000000) - sin(θ°)) * 180 / π)
θ2_R: (asin(((ntr * 2) * λ_R / 10000000) - sin(θ°)) * 180 / π)
θ3_V: (asin(((ntr * 3) * λ_V / 10000000) - sin(θ°)) * 180 / π)
θ3_R: (asin(((ntr * 3) * λ_R / 10000000) - sin(θ°)) * 180 / π)
θ3_J: (asin(((ntr * 3) * λ_J / 10000000) - sin(θ°)) * 180 / π)
C_{rot} = (0, 0)
λ_C: ((2 * sin(θ°) / ntr) * 10000000)
λ_H: ((sin(θ°) + sin((θ + ε)°)) / ntr * 10000000)
λ_B: ((sin(θ°) + sin((θ - ε)°)) / ntr * 10000000)
texte1: "Ordre 1 :  λ central " + λ_C + "
lambdas de " + λ_B + " à " + λ_H + ""
palmer, a, b, c, d = Polygon((xpal0, ybp), (xpal0 + lpal, ybp), (xpal0 + lpal, hpal + ybp), (xpal0, hpal + ybp))
f_{reseau} = true
f_4 = true
f_{palmer} = true
f_{normale} = true
f_0 = false
f_{in} = true
L = (100, 0)
ccd = Segment((x(L) + dfoc, h_{ccd} / 2), (x(L) + dfoc, ((-h_{ccd})) / 2))
lent = Segment((x(L), (-20)), (x(L), 20))
A' = (278.2562627186118, -11.908963688176703)
C = (300, 0)
l = Segment(A', C)
A = (278.0791982785396, 16.77547560352225)
A'' = (281.08929375976726, -19.52273461128198)
B: (300, ((-h_{ccd})) / 2)
n = Segment(A'', B)
c_{rot} = Circle(C_{rot}, rm_{axe})
P: (r_{rot}; α°)
sbras = Segment(C_{rot}, P)
d_{normale} = Ray((0, 0), Vector[(cos(β°), sin(β°))])
d2_R = Ray((0, 0), Vector[(cos(((β + θ2_R) * π / 180)), sin(((β + θ2_R) * π / 180)))])
d2_J = Ray((0, 0), Vector[(cos(((β + θ2_J) * π / 180)), sin(((β + θ2_J) * π / 180)))])
d3_J = Ray((0, 0), Vector[(cos(((β + θ3_J) * π / 180)), sin(((β + θ3_J) * π / 180)))])
d3_1 = Ray((0, 0), Vector[(cos(((β + θ3_R) * π / 180)), sin(((β + θ3_R) * π / 180)))])
H: (x(L) + dfoc, h_{ccd} / 2)
ray_0 = Ray((0, 0), Vector[(cos(((2 * β))°), sin(((2 * β))°))])
r1_V = Ray(L, Vector[(cos((β + θ1_V)°), sin((β + θ1_V)°))])
r1_J = Ray(L, Vector[(cos((β + θ1_J)°), sin((β + θ1_J)°))])
r1_R = Ray(L, Vector[(cos((β + θ1_R)°), sin((β + θ1_R)°))])
d3_2 = Ray((0, 0), Vector[(cos((β + θ3_V)°), sin((β + θ3_V)°))])
d2_V = Ray((0, 0), Vector[(cos((β + θ2_V)°), sin((β + θ2_V)°))])
d1_V = Ray((0, 0), Vector[(cos((β + θ1_V)°), sin((β + θ1_V)°))])
d1_R = Ray((0, 0), Vector[(cos((β + θ1_R)°), sin((β + θ1_R)°))])
m = Segment(A, H)
d1_J = Ray(C_{rot}, Vector[(cos((β + θ1_J)°), sin((β + θ1_J)°))])
c_p = Circle(P, rp_{axe})
sres = Rotate(Segment[(0, -25), (0, 25)], β°)
A48 = 1.67
A49 = 2.4
A50: A49 + 0.1
A51: A50 + 0.1
A52: A51 + 0.1
A53: A52 + 0.1
A54: A53 + 0.1
A55: A54 + 0.1
A56: A55 + 0.1
A57: A56 + 0.1
A58: A57 + 0.1
A59: A58 + 0.1
A60: A59 + 0.1
A61: A60 + 0.1
A62: A61 + 0.1
A63: A62 + 0.1
A64: A63 + 0.1
A65: A64 + 0.1
A66: A65 + 0.1
A67: A66 + 0.1
A68: A67 + 0.1
A69: A68 + 0.1
A70: A69 + 0.1
A71: A70 + 0.1
A72: A71 + 0.1
A73: A72 + 0.1
A74: A73 + 0.1
A75: A74 + 0.1
A76: A75 + 0.25
A77: A76 + 0.25
A78: A77 + 0.25
A79: A78 + 0.25
A80: A79 + 0.25
A81: A80 + 0.25
A82: A81 + 0.25
A83: A82 + 0.25
A84: A83 + 0.25
A85: A84 + 0.25
A86: A85 + 0.25
A87: A86 + 0.25
A88: A87 + 0.25
A89: A88 + 0.25
A90: A89 + 0.25
A91: A90 + 0.25
A92: A91 + 0.25
A93: A92 + 0.25
A94: A93 + 0.25
A95: A94 + 0.25
B48: (asin(((-h_0) + A48 - p_0) / r_{rot}) * 180 / π) + 180
B49: ((-asin((h_0 + A49 - p_0) / r_{rot})) * 180 / π) + 180
B50: ((-asin((h_0 + A50 - p_0) / r_{rot})) * 180 / π) + 180
B51: ((-asin((h_0 + A51 - p_0) / r_{rot})) * 180 / π) + 180
B52: ((-asin((h_0 + A52 - p_0) / r_{rot})) * 180 / π) + 180
B53: ((-asin((h_0 + A53 - p_0) / r_{rot})) * 180 / π) + 180
B54: ((-asin((h_0 + A54 - p_0) / r_{rot})) * 180 / π) + 180
B55: ((-asin((h_0 + A55 - p_0) / r_{rot})) * 180 / π) + 180
B56: ((-asin((h_0 + A56 - p_0) / r_{rot})) * 180 / π) + 180
B57: ((-asin((h_0 + A57 - p_0) / r_{rot})) * 180 / π) + 180
B58: ((-asin((h_0 + A58 - p_0) / r_{rot})) * 180 / π) + 180
B59: ((-asin((h_0 + A59 - p_0) / r_{rot})) * 180 / π) + 180
B60: ((-asin((h_0 + A60 - p_0) / r_{rot})) * 180 / π) + 180
B61: ((-asin((h_0 + A61 - p_0) / r_{rot})) * 180 / π) + 180
B62: ((-asin((h_0 + A62 - p_0) / r_{rot})) * 180 / π) + 180
B63: ((-asin((h_0 + A63 - p_0) / r_{rot})) * 180 / π) + 180
B64: ((-asin((h_0 + A64 - p_0) / r_{rot})) * 180 / π) + 180
B65: ((-asin((h_0 + A65 - p_0) / r_{rot})) * 180 / π) + 180
C48: α_0 - B48
C49: α_0 - B49
C50: α_0 - B50
C51: α_0 - B51
C52: α_0 - B52
C53: α_0 - B53
C54: α_0 - B54
C55: α_0 - B55
C56: α_0 - B56
C57: α_0 - B57
C58: α_0 - B58
C59: α_0 - B59
C60: α_0 - B60
C61: α_0 - B61
C62: α_0 - B62
C63: α_0 - B63
C64: α_0 - B64
C65: α_0 - B65
D48: ((2 * sin((C48 * π / 180)) / ntr) * 10000000)
D49: ((2 * sin((C49 * π / 180)) / ntr) * 10000000)
D50: ((2 * sin((C50 * π / 180)) / ntr) * 10000000)
D51: ((2 * sin((C51 * π / 180)) / ntr) * 10000000)
D52: ((2 * sin((C52 * π / 180)) / ntr) * 10000000)
D53: ((2 * sin((C53 * π / 180)) / ntr) * 10000000)
D54: ((2 * sin((C54 * π / 180)) / ntr) * 10000000)
D55: ((2 * sin((C55 * π / 180)) / ntr) * 10000000)
D56: ((2 * sin((C56 * π / 180)) / ntr) * 10000000)
D57: ((2 * sin((C57 * π / 180)) / ntr) * 10000000)
D58: ((2 * sin((C58 * π / 180)) / ntr) * 10000000)
D59: ((2 * sin((C59 * π / 180)) / ntr) * 10000000)
D60: ((2 * sin((C60 * π / 180)) / ntr) * 10000000)
D61: ((2 * sin((C61 * π / 180)) / ntr) * 10000000)
D62: ((2 * sin((C62 * π / 180)) / ntr) * 10000000)
D63: ((2 * sin((C63 * π / 180)) / ntr) * 10000000)
D64: ((2 * sin((C64 * π / 180)) / ntr) * 10000000)
D65: ((2 * sin((C65 * π / 180)) / ntr) * 10000000)
E48: ((sin((C48 * π / 180)) + sin(((C48 - ε) * π / 180))) / ntr * 10000000)
E49: ((sin((C49 * π / 180)) + sin(((C49 - ε) * π / 180))) / ntr * 10000000)
E50: ((sin((C50 * π / 180)) + sin(((C50 - ε) * π / 180))) / ntr * 10000000)
E51: ((sin((C51 * π / 180)) + sin(((C51 - ε) * π / 180))) / ntr * 10000000)
E52: ((sin((C52 * π / 180)) + sin(((C52 - ε) * π / 180))) / ntr * 10000000)
E53: ((sin((C53 * π / 180)) + sin(((C53 - ε) * π / 180))) / ntr * 10000000)
E54: ((sin((C54 * π / 180)) + sin(((C54 - ε) * π / 180))) / ntr * 10000000)
E55: ((sin((C55 * π / 180)) + sin(((C55 - ε) * π / 180))) / ntr * 10000000)
E56: ((sin((C56 * π / 180)) + sin(((C56 - ε) * π / 180))) / ntr * 10000000)
E57: ((sin((C57 * π / 180)) + sin(((C57 - ε) * π / 180))) / ntr * 10000000)
E58: ((sin((C58 * π / 180)) + sin(((C58 - ε) * π / 180))) / ntr * 10000000)
E59: ((sin((C59 * π / 180)) + sin(((C59 - ε) * π / 180))) / ntr * 10000000)
E60: ((sin((C60 * π / 180)) + sin(((C60 - ε) * π / 180))) / ntr * 10000000)
E61: ((sin((C61 * π / 180)) + sin(((C61 - ε) * π / 180))) / ntr * 10000000)
E62: ((sin((C62 * π / 180)) + sin(((C62 - ε) * π / 180))) / ntr * 10000000)
E63: ((sin((C63 * π / 180)) + sin(((C63 - ε) * π / 180))) / ntr * 10000000)
E64: ((sin((C64 * π / 180)) + sin(((C64 - ε) * π / 180))) / ntr * 10000000)
E65: ((sin((C65 * π / 180)) + sin(((C65 - ε) * π / 180))) / ntr * 10000000)
F48: ((sin((C48 * π / 180)) + sin(((C48 + ε) * π / 180))) / ntr * 10000000)
F49: ((sin((C49 * π / 180)) + sin(((C49 + ε) * π / 180))) / ntr * 10000000)
F50: ((sin((C50 * π / 180)) + sin(((C50 + ε) * π / 180))) / ntr * 10000000)
F51: ((sin((C51 * π / 180)) + sin(((C51 + ε) * π / 180))) / ntr * 10000000)
F52: ((sin((C52 * π / 180)) + sin(((C52 + ε) * π / 180))) / ntr * 10000000)
F53: ((sin((C53 * π / 180)) + sin(((C53 + ε) * π / 180))) / ntr * 10000000)
F54: ((sin((C54 * π / 180)) + sin(((C54 + ε) * π / 180))) / ntr * 10000000)
F55: ((sin((C55 * π / 180)) + sin(((C55 + ε) * π / 180))) / ntr * 10000000)
F56: ((sin((C56 * π / 180)) + sin(((C56 + ε) * π / 180))) / ntr * 10000000)
F57: ((sin((C57 * π / 180)) + sin(((C57 + ε) * π / 180))) / ntr * 10000000)
F58: ((sin((C58 * π / 180)) + sin(((C58 + ε) * π / 180))) / ntr * 10000000)
F59: ((sin((C59 * π / 180)) + sin(((C59 + ε) * π / 180))) / ntr * 10000000)
F60: ((sin((C60 * π / 180)) + sin(((C60 + ε) * π / 180))) / ntr * 10000000)
F61: ((sin((C61 * π / 180)) + sin(((C61 + ε) * π / 180))) / ntr * 10000000)
F62: ((sin((C62 * π / 180)) + sin(((C62 + ε) * π / 180))) / ntr * 10000000)
F63: ((sin((C63 * π / 180)) + sin(((C63 + ε) * π / 180))) / ntr * 10000000)
F64: ((sin((C64 * π / 180)) + sin(((C64 + ε) * π / 180))) / ntr * 10000000)
F65: ((sin((C65 * π / 180)) + sin(((C65 + ε) * π / 180))) / ntr * 10000000)
B66: ((-asin((h_0 + A66 - p_0) / r_{rot})) * 180 / π) + 180
C66: α_0 - B66
D66: ((2 * sin((C66 * π / 180)) / ntr) * 10000000)
E66: ((sin((C66 * π / 180)) + sin(((C66 - ε) * π / 180))) / ntr * 10000000)
F66: ((sin((C66 * π / 180)) + sin(((C66 + ε) * π / 180))) / ntr * 10000000)
B67: ((-asin((h_0 + A67 - p_0) / r_{rot})) * 180 / π) + 180
C67: α_0 - B67
D67: ((2 * sin((C67 * π / 180)) / ntr) * 10000000)
E67: ((sin((C67 * π / 180)) + sin(((C67 - ε) * π / 180))) / ntr * 10000000)
F67: ((sin((C67 * π / 180)) + sin(((C67 + ε) * π / 180))) / ntr * 10000000)
B68: ((-asin((h_0 + A68 - p_0) / r_{rot})) * 180 / π) + 180
C68: α_0 - B68
D68: ((2 * sin((C68 * π / 180)) / ntr) * 10000000)
E68: ((sin((C68 * π / 180)) + sin(((C68 - ε) * π / 180))) / ntr * 10000000)
F68: ((sin((C68 * π / 180)) + sin(((C68 + ε) * π / 180))) / ntr * 10000000)
B69: ((-asin((h_0 + A69 - p_0) / r_{rot})) * 180 / π) + 180
C69: α_0 - B69
D69: ((2 * sin((C69 * π / 180)) / ntr) * 10000000)
E69: ((sin((C69 * π / 180)) + sin(((C69 - ε) * π / 180))) / ntr * 10000000)
F69: ((sin((C69 * π / 180)) + sin(((C69 + ε) * π / 180))) / ntr * 10000000)
B70: ((-asin((h_0 + A70 - p_0) / r_{rot})) * 180 / π) + 180
C70: α_0 - B70
D70: ((2 * sin((C70 * π / 180)) / ntr) * 10000000)
E70: ((sin((C70 * π / 180)) + sin(((C70 - ε) * π / 180))) / ntr * 10000000)
F70: ((sin((C70 * π / 180)) + sin(((C70 + ε) * π / 180))) / ntr * 10000000)
B71: ((-asin((h_0 + A71 - p_0) / r_{rot})) * 180 / π) + 180
C71: α_0 - B71
D71: ((2 * sin((C71 * π / 180)) / ntr) * 10000000)
E71: ((sin((C71 * π / 180)) + sin(((C71 - ε) * π / 180))) / ntr * 10000000)
F71: ((sin((C71 * π / 180)) + sin(((C71 + ε) * π / 180))) / ntr * 10000000)
B72: ((-asin((h_0 + A72 - p_0) / r_{rot})) * 180 / π) + 180
C72: α_0 - B72
D72: ((2 * sin((C72 * π / 180)) / ntr) * 10000000)
E72: ((sin((C72 * π / 180)) + sin(((C72 - ε) * π / 180))) / ntr * 10000000)
F72: ((sin((C72 * π / 180)) + sin(((C72 + ε) * π / 180))) / ntr * 10000000)
B73: ((-asin((h_0 + A73 - p_0) / r_{rot})) * 180 / π) + 180
C73: α_0 - B73
D73: ((2 * sin((C73 * π / 180)) / ntr) * 10000000)
E73: ((sin((C73 * π / 180)) + sin(((C73 - ε) * π / 180))) / ntr * 10000000)
F73: ((sin((C73 * π / 180)) + sin(((C73 + ε) * π / 180))) / ntr * 10000000)
B74: ((-asin((h_0 + A74 - p_0) / r_{rot})) * 180 / π) + 180
C74: α_0 - B74
D74: ((2 * sin((C74 * π / 180)) / ntr) * 10000000)
E74: ((sin((C74 * π / 180)) + sin(((C74 - ε) * π / 180))) / ntr * 10000000)
F74: ((sin((C74 * π / 180)) + sin(((C74 + ε) * π / 180))) / ntr * 10000000)
B75: ((-asin((h_0 + A75 - p_0) / r_{rot})) * 180 / π) + 180
C75: α_0 - B75
D75: ((2 * sin((C75 * π / 180)) / ntr) * 10000000)
E75: ((sin((C75 * π / 180)) + sin(((C75 - ε) * π / 180))) / ntr * 10000000)
F75: ((sin((C75 * π / 180)) + sin(((C75 + ε) * π / 180))) / ntr * 10000000)
B76: ((-asin((h_0 + A76 - p_0) / r_{rot})) * 180 / π) + 180
C76: α_0 - B76
D76: ((2 * sin((C76 * π / 180)) / ntr) * 10000000)
E76: ((sin((C76 * π / 180)) + sin(((C76 - ε) * π / 180))) / ntr * 10000000)
F76: ((sin((C76 * π / 180)) + sin(((C76 + ε) * π / 180))) / ntr * 10000000)
B77: ((-asin((h_0 + A77 - p_0) / r_{rot})) * 180 / π) + 180
C77: α_0 - B77
D77: ((2 * sin((C77 * π / 180)) / ntr) * 10000000)
E77: ((sin((C77 * π / 180)) + sin(((C77 - ε) * π / 180))) / ntr * 10000000)
F77: ((sin((C77 * π / 180)) + sin(((C77 + ε) * π / 180))) / ntr * 10000000)
B78: ((-asin((h_0 + A78 - p_0) / r_{rot})) * 180 / π) + 180
C78: α_0 - B78
D78: ((2 * sin((C78 * π / 180)) / ntr) * 10000000)
E78: ((sin((C78 * π / 180)) + sin(((C78 - ε) * π / 180))) / ntr * 10000000)
F78: ((sin((C78 * π / 180)) + sin(((C78 + ε) * π / 180))) / ntr * 10000000)
B79: ((-asin((h_0 + A79 - p_0) / r_{rot})) * 180 / π) + 180
C79: α_0 - B79
D79: ((2 * sin((C79 * π / 180)) / ntr) * 10000000)
E79: ((sin((C79 * π / 180)) + sin(((C79 - ε) * π / 180))) / ntr * 10000000)
F79: ((sin((C79 * π / 180)) + sin(((C79 + ε) * π / 180))) / ntr * 10000000)
B80: ((-asin((h_0 + A80 - p_0) / r_{rot})) * 180 / π) + 180
C80: α_0 - B80
D80: ((2 * sin((C80 * π / 180)) / ntr) * 10000000)
E80: ((sin((C80 * π / 180)) + sin(((C80 - ε) * π / 180))) / ntr * 10000000)
F80: ((sin((C80 * π / 180)) + sin(((C80 + ε) * π / 180))) / ntr * 10000000)
B81: ((-asin((h_0 + A81 - p_0) / r_{rot})) * 180 / π) + 180
C81: α_0 - B81
D81: ((2 * sin((C81 * π / 180)) / ntr) * 10000000)
E81: ((sin((C81 * π / 180)) + sin(((C81 - ε) * π / 180))) / ntr * 10000000)
F81: ((sin((C81 * π / 180)) + sin(((C81 + ε) * π / 180))) / ntr * 10000000)
B82: ((-asin((h_0 + A82 - p_0) / r_{rot})) * 180 / π) + 180
C82: α_0 - B82
D82: ((2 * sin((C82 * π / 180)) / ntr) * 10000000)
E82: ((sin((C82 * π / 180)) + sin(((C82 - ε) * π / 180))) / ntr * 10000000)
F82: ((sin((C82 * π / 180)) + sin(((C82 + ε) * π / 180))) / ntr * 10000000)
B83: ((-asin((h_0 + A83 - p_0) / r_{rot})) * 180 / π) + 180
C83: α_0 - B83
D83: ((2 * sin((C83 * π / 180)) / ntr) * 10000000)
E83: ((sin((C83 * π / 180)) + sin(((C83 - ε) * π / 180))) / ntr * 10000000)
F83: ((sin((C83 * π / 180)) + sin(((C83 + ε) * π / 180))) / ntr * 10000000)
B84: ((-asin((h_0 + A84 - p_0) / r_{rot})) * 180 / π) + 180
C84: α_0 - B84
D84: ((2 * sin((C84 * π / 180)) / ntr) * 10000000)
E84: ((sin((C84 * π / 180)) + sin(((C84 - ε) * π / 180))) / ntr * 10000000)
F84: ((sin((C84 * π / 180)) + sin(((C84 + ε) * π / 180))) / ntr * 10000000)
B85: ((-asin((h_0 + A85 - p_0) / r_{rot})) * 180 / π) + 180
C85: α_0 - B85
D85: ((2 * sin((C85 * π / 180)) / ntr) * 10000000)
E85: ((sin((C85 * π / 180)) + sin(((C85 - ε) * π / 180))) / ntr * 10000000)
F85: ((sin((C85 * π / 180)) + sin(((C85 + ε) * π / 180))) / ntr * 10000000)
B86: ((-asin((h_0 + A86 - p_0) / r_{rot})) * 180 / π) + 180
C86: α_0 - B86
D86: ((2 * sin((C86 * π / 180)) / ntr) * 10000000)
E86: ((sin((C86 * π / 180)) + sin(((C86 - ε) * π / 180))) / ntr * 10000000)
F86: ((sin((C86 * π / 180)) + sin(((C86 + ε) * π / 180))) / ntr * 10000000)
B87: ((-asin((h_0 + A87 - p_0) / r_{rot})) * 180 / π) + 180
C87: α_0 - B87
D87: ((2 * sin((C87 * π / 180)) / ntr) * 10000000)
E87: ((sin((C87 * π / 180)) + sin(((C87 - ε) * π / 180))) / ntr * 10000000)
F87: ((sin((C87 * π / 180)) + sin(((C87 + ε) * π / 180))) / ntr * 10000000)
B88: ((-asin((h_0 + A88 - p_0) / r_{rot})) * 180 / π) + 180
C88: α_0 - B88
D88: ((2 * sin((C88 * π / 180)) / ntr) * 10000000)
E88: ((sin((C88 * π / 180)) + sin(((C88 - ε) * π / 180))) / ntr * 10000000)
F88: ((sin((C88 * π / 180)) + sin(((C88 + ε) * π / 180))) / ntr * 10000000)
B89: ((-asin((h_0 + A89 - p_0) / r_{rot})) * 180 / π) + 180
C89: α_0 - B89
D89: ((2 * sin((C89 * π / 180)) / ntr) * 10000000)
E89: ((sin((C89 * π / 180)) + sin(((C89 - ε) * π / 180))) / ntr * 10000000)
F89: ((sin((C89 * π / 180)) + sin(((C89 + ε) * π / 180))) / ntr * 10000000)
B90: ((-asin((h_0 + A90 - p_0) / r_{rot})) * 180 / π) + 180
C90: α_0 - B90
D90: ((2 * sin((C90 * π / 180)) / ntr) * 10000000)
E90: ((sin((C90 * π / 180)) + sin(((C90 - ε) * π / 180))) / ntr * 10000000)
F90: ((sin((C90 * π / 180)) + sin(((C90 + ε) * π / 180))) / ntr * 10000000)
B91: ((-asin((h_0 + A91 - p_0) / r_{rot})) * 180 / π) + 180
C91: α_0 - B91
D91: ((2 * sin((C91 * π / 180)) / ntr) * 10000000)
E91: ((sin((C91 * π / 180)) + sin(((C91 - ε) * π / 180))) / ntr * 10000000)
F91: ((sin((C91 * π / 180)) + sin(((C91 + ε) * π / 180))) / ntr * 10000000)
B92: ((-asin((h_0 + A92 - p_0) / r_{rot})) * 180 / π) + 180
C92: α_0 - B92
D92: ((2 * sin((C92 * π / 180)) / ntr) * 10000000)
E92: ((sin((C92 * π / 180)) + sin(((C92 - ε) * π / 180))) / ntr * 10000000)
F92: ((sin((C92 * π / 180)) + sin(((C92 + ε) * π / 180))) / ntr * 10000000)
B93: ((-asin((h_0 + A93 - p_0) / r_{rot})) * 180 / π) + 180
C93: α_0 - B93
D93: ((2 * sin((C93 * π / 180)) / ntr) * 10000000)
E93: ((sin((C93 * π / 180)) + sin(((C93 - ε) * π / 180))) / ntr * 10000000)
F93: ((sin((C93 * π / 180)) + sin(((C93 + ε) * π / 180))) / ntr * 10000000)
B94: ((-asin((h_0 + A94 - p_0) / r_{rot})) * 180 / π) + 180
C94: α_0 - B94
D94: ((2 * sin((C94 * π / 180)) / ntr) * 10000000)
E94: ((sin((C94 * π / 180)) + sin(((C94 - ε) * π / 180))) / ntr * 10000000)
F94: ((sin((C94 * π / 180)) + sin(((C94 + ε) * π / 180))) / ntr * 10000000)
B95: ((-asin((h_0 + A95 - p_0) / r_{rot})) * 180 / π) + 180
C95: α_0 - B95
D95: ((2 * sin((C95 * π / 180)) / ntr) * 10000000)
E95: ((sin((C95 * π / 180)) + sin(((C95 - ε) * π / 180))) / ntr * 10000000)
F95: ((sin((C95 * π / 180)) + sin(((C95 + ε) * π / 180))) / ntr * 10000000)
G68: D68 / 2
H68: E68 / 2
I68: F68 / 2
G69: D69 / 2
H69: E69 / 2
I69: F69 / 2
G70: D70 / 2
H70: E70 / 2
I70: F70 / 2
G71: D71 / 2
H71: E71 / 2
I71: F71 / 2
G72: D72 / 2
H72: E72 / 2
I72: F72 / 2
G73: D73 / 2
H73: E73 / 2
I73: F73 / 2
G74: D74 / 2
H74: E74 / 2
I74: F74 / 2
G75: D75 / 2
H75: E75 / 2
I75: F75 / 2
G76: D76 / 2
H76: E76 / 2
I76: F76 / 2
G77: D77 / 2
H77: E77 / 2
I77: F77 / 2
G78: D78 / 2
H78: E78 / 2
I78: F78 / 2
G79: D79 / 2
H79: E79 / 2
I79: F79 / 2
G80: D80 / 2
H80: E80 / 2
I80: F80 / 2
G81: D81 / 2
H81: E81 / 2
I81: F81 / 2
G82: D82 / 2
H82: E82 / 2
I82: F82 / 2
G83: D83 / 2
H83: E83 / 2
I83: F83 / 2
G84: D84 / 2
H84: E84 / 2
I84: F84 / 2
G85: D85 / 2
H85: E85 / 2
I85: F85 / 2
G86: D86 / 2
H86: E86 / 2
I86: F86 / 2
G87: D87 / 2
H87: E87 / 2
I87: F87 / 2
G88: D88 / 2
H88: E88 / 2
I88: F88 / 2
G89: D89 / 2
H89: E89 / 2
I89: F89 / 2
G90: D90 / 2
H90: E90 / 2
I90: F90 / 2
G91: D91 / 2
H91: E91 / 2
I91: F91 / 2
G92: D92 / 2
H92: E92 / 2
I92: F92 / 2
G93: D93 / 2
H93: E93 / 2
I93: F93 / 2
G94: D94 / 2
H94: E94 / 2
I94: F94 / 2
G95: D95 / 2
H95: E95 / 2
I95: F95 / 2
J77: D77 / 3
K77: E77 / 3
L77: F77 / 3
J78: D78 / 3
K78: E78 / 3
L78: F78 / 3
J79: D79 / 3
K79: E79 / 3
L79: F79 / 3
J80: D80 / 3
K80: E80 / 3
L80: F80 / 3
J81: D81 / 3
K81: E81 / 3
L81: F81 / 3
J82: D82 / 3
K82: E82 / 3
L82: F82 / 3
J83: D83 / 3
K83: E83 / 3
L83: F83 / 3
J84: D84 / 3
K84: E84 / 3
L84: F84 / 3
J85: D85 / 3
K85: E85 / 3
L85: F85 / 3
J86: D86 / 3
K86: E86 / 3
L86: F86 / 3
J87: D87 / 3
K87: E87 / 3
L87: F87 / 3
J88: D88 / 3
K88: E88 / 3
L88: F88 / 3
J89: D89 / 3
K89: E89 / 3
L89: F89 / 3
J90: D90 / 3
K90: E90 / 3
L90: F90 / 3
J91: D91 / 3
K91: E91 / 3
L91: F91 / 3
J92: D92 / 3
K92: E92 / 3
L92: F92 / 3
J93: D93 / 3
K93: E93 / 3
L93: F93 / 3
J94: D94 / 3
K94: E94 / 3
L94: F94 / 3
J95: D95 / 3
K95: E95 / 3
L95: F95 / 3
J76: D76 / 3
K76: E76 / 3
L76: F76 / 3
J75: D75 / 3
K75: E75 / 3
L75: F75 / 3
J73: D73 / 3
K73: E73 / 3
L73: F73 / 3
J74: D74 / 3
K74: E74 / 3
L74: F74 / 3
J72: D72 / 3
K72: E72 / 3
L72: F72 / 3
G65: D65 / 2
H65: E65 / 2
I65: F65 / 2
G66: D66 / 2
H66: E66 / 2
I66: F66 / 2
G67: D67 / 2
H67: E67 / 2
I67: F67 / 2
G62: D62 / 2
H62: E62 / 2
I62: F62 / 2
G63: D63 / 2
H63: E63 / 2
I63: F63 / 2
G64: D64 / 2
H64: E64 / 2
I64: F64 / 2
G61: D61 / 2
H61: E61 / 2
I61: F61 / 2
r2_J = Ray(L, Vector[(cos((β + θ2_J)°), sin((β + θ2_J)°))])
r2_V = Ray(L, Vector[(cos((β + θ2_V)°), sin((β + θ2_V)°))])
r2_R = Ray(L, Vector[(cos((β + θ2_R)°), sin((β + θ2_R)°))])
r3_R = Ray(L, Vector[(cos((β + θ3_R)°), sin((β + θ3_R)°))])
r3_J = Ray(L, Vector[(cos((β + θ3_J)°), sin((β + θ3_J)°))])
r3_V = Ray(L, Vector[(cos((β + θ3_V)°), sin((β + θ3_V)°))])
λt_B: λ_B / divord
texte3: "Ordre 3 : λ central " + (λ_C / 3) + "
lambdas de " + (λ_B / 3) + " à " + (λ_H / 3) + ""
texte2: "Ordre 2 : λ central " + (λ_C / 2) + "
lambdas de " + (λ_B / 2) + " à " + (λ_H / 2) + ""
λt_H: ((sin(θ°) + sin((θ + ε)°)) / ntr * 10000000 / divord)
λt_C: λ_C / divord
lambdaH_1: "λ côté rouge " + λt_H + ""
lambdaC: "λ centre " + λt_C + ""
lambdaB: "λ côté violet " + λt_B + ""
dplan_{foc}: x = dfoc + x(L)
R1 = Intersect(r1_R, dplan_{foc})
V1 = Intersect(r1_V, dplan_{foc})
J1 = Intersect(r1_J, dplan_{foc})
J2 = Intersect(r2_J, dplan_{foc})
J3 = Intersect(r3_J, dplan_{foc})
R2 = Intersect(r2_R, dplan_{foc})
R3 = Intersect(r3_R, dplan_{foc})
V2 = Intersect(r2_V, dplan_{foc})
V3 = Intersect(r3_V, dplan_{foc})