Ptolemäische Epizyklen
Author: Haftendorn
Date: Mai 05

Variiere k, am besten mit umdefinieren, da die Ortskurve dann nur einmal nei berechnet werden muss.

Ptolemäische Epizyklen

Ha Mai 05

O=Erde

P=Planet

Bei einer Umdrehung von Q

variiere k

füge (in GeoGebra) die Ortskurve ein

R

s

R = 6
ρ = 1.9999999999999991
O = (0, 0)
c = Circle(O, R)
Q = Point(c)
d = Circle(Q, ρ)
a = Ray(O, Q)
A, B = Intersect(d, a)
C, D = Intersect(c, xAxis)
t = Angle(D, O, Q)
k = 4.9999999999999964
P = Rotate(A, k t, Q)
α = Angle(A, Q, P)
b = Segment(P, Q)
T6: "macht P k=" + k + " Runden"
r = Segment(P, O)
φ = Angle(D, O, P)