const_1 = (2, 4)
Sun = (8, 4)
Aphelion = Point(yAxis)
EarthOrbit = Ellipse(const_1, Sun, Aphelion)
const_2 = 3.141592653589793 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
const_3 = 0 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
const_4 = Rotate(Aphelion, const_2, const_1)
const_5 = Angle(Aphelion, const_1, const_4)
const_6 = Line(const_1, const_4)
Earth = Intersect(EarthOrbit, const_6, 2.0)
MoonOrbit = Circle(Earth, 0.5)
const_7 = Point(MoonOrbit)
Moon = Rotate(const_7, const_3, Earth)
const_8 = Angle(const_7, Earth, Moon)
Construction = false
distSunEarth = Segment(Sun, Earth)
Perihelion = Point(EarthOrbit)