Die rutschende Leiter
Author: Haftendorn
Date: Mai 05

Ha 05

Die rutschende Leiter

Ziehe Q

Variiere T

Zeichne auch die 

Spur der Rautenseiten.

Fuss = (10, 0)
Leiter = (10, 7.999999999999993)
L = Segment(Leiter, Fuss)
T = Point(L)
Q = Point(xAxis)
c = Circle(Q, y(Leiter))
A, B = Intersect(c, yAxis)
Q': (-x(Q), 0)
P_1, q', b, q, a = Polygon(Q', B, Q, A)
d = Circle(Q, y(T))
P = Intersect(d, q)
D = Intersect(d, b)
E = Mirror(P, yAxis)
F = Mirror(D, yAxis)