x(t)

y(t)

s

y(t)sin(s)

y(t)cos(s)

https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 5.3.2.1: S. 150

Ha 2016

e = 3
r(x) = sqrt(((2 * e^(2)) * cos((2 * x))))
a = Surface((r(t) * cos(t)), ((r(t) * sin(t)) * cos(s)), ((r(t) * sin(t)) * sin(s)), t, 0, 6.28319, s, -3.14159, 3.141592653589793)
tt = 0.4
b = CurveCartesian((r(tt) * cos(tt)), ((r(tt) * sin(tt)) * cos(s)), ((r(tt) * sin(tt)) * sin(s)), s, -3.14159, 3.141592653589793)
c = CurveCartesian((r(t) * cos(t)), (r(t) * sin(t)), 0, t, 0, 6.28319)
O = (0, 0)
d = Circle(O, (r(tt) * sin(tt)))
P = Point(d)
f = Segment(O, P)
A, B = Intersect(d, xAxis)
α = Angle(B, O, P)
P_1: (x(P), 0)
g = Segment(P, P_1)
h = Segment(O, P_1)
i = false