variables orbites
Author: aaa

a en ua

a en km

dates

hLE

hLE

gLM

gLM

eccentricity

annual period

1.1   February 17, 1585

1.2   January 5, 1587

2.1   March 10, 1585

2.2   January 26, 1587

3.1   March 28, 1587

3.2   12 fev 1589

4.1   February 12, 1589

4.2   August 6, 1593

5.1   December 7, 1593

5.2   October 25, 1595

heliocentric longitude of Earth

geocentric longitude of Mars

Earth

périhelion

longitude of périhelion = %v

apside

longitude of périhelion

B8 = 1.796589572125403 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B6 = 0.017
B5 = 1
BD8 = 0
S = (0, 0)
B7 = 365.256
B4 = 1.4959807E8
F2_T: (2.0 * B5 * B6; B8 + 180.0°)
el_T = Ellipse(S, F2_T, B5)
B11 = 2.7817057618285626 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C11 = 2.3596851486963333 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B12 = 2.013237292175459 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C12 = 3.1787681666572722 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B13 = 0.10088003076527226 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C13 = 4.961971063419879 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B14 = 5.6449183997252605 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C14 = 6.055070773943927 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B15 = 1.4988887616127302 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C15 = 0.053581608036225914 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B16 = 0.7278022980816354 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C16 = 0.8674286382411819 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B17 = 3.435331566700439 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C17 = 2.935643801854462 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B18 = 2.682571060315284 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C18 = 3.818780403363593 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B19 = 3.1360075999834116 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C19 = 2.3003439541285267 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
B20 = 2.3753931119642826 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C20 = 3.2236231284335264 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
a = Line(F2_T, S)
P = Intersect(el_T, a, 2.0)
κ = Angle((1.0; 0.0*°), S, P)
affApside = false
F2 = 0
se11 = Ray(S, (1.0; 159.38*°))
Earth11 = Intersect(el_T, se11, 1.0)
C1 = 0
em11 = Ray(Earth11, Vector[Vector[S, (1.0; C11)]])
se12 = Ray(S, (1.0; B12))
Earth12 = Intersect(el_T, se12, 1.0)
em12 = Ray(Earth12, Vector[Vector[S, (1.0; C12)]])
Mars1 = Intersect(em11, em12)
se21 = Ray(S, (1.0; B13))
Earth21 = Intersect(el_T, se21, 1.0)
em21 = Ray(Earth21, Vector[Vector[S, (1.0; C13)]])
se22 = Ray(S, (1.0; B14))
Earth22 = Intersect(el_T, se22, 1.0)
em22 = Ray(Earth22, Vector[Vector[S, (1.0; C14)]])
Mars2 = Intersect(em21, em22)
se31 = Ray(S, (1.0; B15))
Earth31 = Intersect(el_T, se31, 1.0)
em31 = Ray(Earth31, Vector[Vector[S, (1.0; C15)]])
se32 = Ray(S, (1.0; B16))
Earth32 = Intersect(el_T, se32, 1.0)
em32 = Ray(Earth32, Vector[Vector[S, (1.0; C16)]])
Mars3 = Intersect(em31, em32)
se41 = Ray(S, (1.0; B17))
Earth41 = Intersect(el_T, se41, 1.0)
em41 = Ray(Earth41, Vector[Vector[S, (1.0; C17)]])
se42 = Ray(S, (1.0; B18))
Earth42 = Intersect(el_T, se42, 1.0)
em42 = Ray(Earth42, Vector[Vector[S, (1.0; C18)]])
Mars4 = Intersect(em41, em42)
se51 = Ray(S, (1.0; B19))
Earth51 = Intersect(el_T, se51, 1.0)
em51 = Ray(Earth51, Vector[Vector[S, (1.0; C19)]])
se52 = Ray(S, (1.0; B20))
Earth52 = Intersect(el_T, se52, 1.0)
em52 = Ray(Earth52, Vector[Vector[S, (1.0; C20)]])
Mars5 = Intersect(em51, em52)
c = Conic(Mars1, Mars5, Mars4, Mars2, Mars3)
A = (0.7472261722372107, 2.5463843176617433)