Ha 2016

https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 7.6.3.1: S.211
www.kurven-erkunden-und-verstehen.de
Anregung von
Anselm Lambert in
mathematik lehren (196)
S. 44-46, (Umsetzung Ha)

h = 1.2
r: 1
Z: (-3, 0, 3)
B = (0, 0, 2.999999999999999)
wand: x = 0
a = CurveCartesian(0, (r * cos(t)), (r * sin(t)) + h, t, 0, (2 * π))
Q = Point(a)
f = Line(Z, Q)
P = Intersect(f, xOyPlane)
Ortslinie1 = Locus(P, Q)
b = 3
A: B + (b * (0, 1, 0))
c = Plane(Z, B, A)
g = IntersectPath(wand, c)
d = Plane(A, P, Z)
i = Segment(Z, A)
Vieleck1, a_1, z_1, b_1 = Polygon(Z, B, A)
j = IntersectPath(d, z = 0)
k = Line(Z, A)
C = Intersect(yAxis, d)
l = Segment(C, A)