https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 7.6.1.1: S.206
www.kurven-erkunden-und-verstehen.de

Ha 2016

p: 3
eps: 0.8
r(x) = p / (1 - (eps * cos(x)))
a = CurveCartesian((r(t) * cos(t)), (r(t) * sin(t)), t, 0, (2 * π))
g(x) = 4 / (1 - (0.9 * cos(x)))
b = CurveCartesian((g(t) * cos(t)), (g(t) * sin(t)), t, 0, (2 * π))
f(x) = 1.3 / (1 - (0.75 * cos(x)))
c = CurveCartesian((f(t) * cos(t)), (f(t) * sin(t)), t, 0, (2 * π))
h(x) = 2 / (1 - cos(x))
q(x) = 3.1 / (1 - (1.1 * cos(x)))
d = CurveCartesian((h(t) * cos(t)), (h(t) * sin(t)), t, 0, (2 * π))
e = CurveCartesian((q(t) * cos(t)), (q(t) * sin(t)), t, 0, (2 * π))
Sonne = Point(yAxis)
Venus = Point(c)
Erde = Point(a)
Jupiter = Point(b)
Komet_H = Point(e)
A = Point(d)
Komet_p = (9.87, 6.61)
i = false