Vajutage, et Maa hakkaks liikuma

Projekt: “Kuidas Maa tiirleb ümber Päikese.”

a = 675 (slider from 1 to 1000)
b = 38.0413817854581 (slider from 1 to 400)
c: (a^(2) - b^(2))^(0.5)
Paike: (b, 0)
F: ((-b), 0)
d: (a^(2) - b^(2))^(0.5)
e = Circle(Paike, (2 * a))
A = Point(e)
f = Segment(A, Paike)
g = Segment(A, F)
n = LineBisector(g)
B = Intersect(n, f)
loc1 = Locus(B, A)
C = (3.050477712231714, -0.4468948097761436)
k = Circle(Paike, 109)
Maa = Circle(B, 1)