Rotations ensemble

Jour

Vis. horizon

Durée du jour sur Vénus

flg1 = true
porb = 224.7
tps = 0 (slider from 0 to 500, step 0.1)
flg2 = true
th1 = If(flg2 ∧ (¬flg1), 0.0, 2.0 * 3.14 / porb tps)
rorb = 10
prot = -243
S = (0, 0)
orbite = Circle((0.0, 0.0), rorb)
hvert = 2
th2: 2.0 * 3.14 tps / prot + 3.141592653589793
Z: (rorb cos(th1) + hvert cos(th2), rorb sin(th1) + hvert sin(th2))
V: (rorb cos(th1), rorb sin(th1))
vz = Ray(V, Z)
vzt = Vector(V, Z)
u = Vector((10.0, 0.0), (rorb cos(If[flg2, 0.0, th1]) + hvert cos(th2), rorb sin(If[flg2, 0.0, th1]) + hvert sin(th2)))
lh = 0.4
rpla = 0.25
H: (x(V) + rpla cos(th2), y(V) + rpla sin(th2))
th3: th2 - 3.141592653589793 / 2.0
H_O: (x(H) + lh cos(th3), y(H) + lh sin(th3))
H_E: (x(H) - lh cos(th3), y(H) - lh sin(th3))
horizon = Line(H_E, H_O)
hor = Segment(H_E, H_O)
flh = true