r(x)

K=(θ, r(θ))

θ

r(θ)

P=(r(θ); θ)

r(θ)

θ

P_n=(|r(θ)|;θ)

θ

r(x)=x+1

P

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

Ha 2016

r(x) = If[-2 ≤ x ≤ 20, x + 1]
θ = 2.15 (slider from -1 to 20, step 0.05)
K: (θ, r(θ))
T: (x(K), 0)
O: (0, 0)
a = Segment(O, T)
b = Segment(K, T)
P: (r(θ); θ)
d = Segment(P, O)
A = Point(xAxis)
α = Angle(A, O, P)
P_n = Mirror(P, O)
β = Angle(A, O, P_n)
e = Segment(O, P_n)
x_1: 0
x_2 = 45
f = Circle(O, 0.5)
g = Circle(O, 0.5)
h: y = (tan(-1) * x)
i: y = x - 1
j = OrthogonalLine(O, d)
k = Circle(O, 1)
N, C = Intersect(k, j)
l = Segment(N, P)
t = OrthogonalLine(P, l)
Vieleck1, p, o, b_1 = Polygon(O, N, P)
n = Segment(N, O)
ende: 10
c = CurveCartesian((r(t) * cos(t)), (r(t) * sin(t)), t, x_1 - 1, ende)
m = false