Ruhelage

Rückstellkraft

Auslenkung

Fadenpendel - Dynamik

Version Stand
11.12.2021
Andreas Jäger

Stand

Ursache für die Rückstellkraft
ist die Tangential-Komponente
der Gewichtskraft des Pendel-
körpers

ACHTUNG
Die Bewegung des Pendelkörpers
ist nur in Nähe der Ruhelage hin-
reichend geradlinig !

||

>

x1: 0
t = 1.8221237390820801 (slider from 0 to 6.283185307179586, step π / 100)
x2: (x1 * cos(t))
NP: (0, 0)
P1: (x1, 0)
P3: (x1, 0)
a = false
b = false
d = false
l = 10.068664521686232 (slider from 6 to 16, step 0.1)
P2: (l * (sin(x2 / l), 1 - cos(x2 / l)))
P22: (l * (sin(x1 / l), 1 - cos(x1 / l)))
f = Segment(P1, P22)
MP: (0, l)
g = Segment(MP, P2)
sMax: abs((l * sin(x1 / l)))
sMin: (-abs((l * sin(x1 / l))))
ff(x) = If[sMin ≤ x ≤ sMax, (-sqrt(l^(2) - x^(2))) + l]
ff1(x) = If[x2 < 0 ∧ (-abs((l * sin(x2 / l)))) ≤ x ≤ 0, ff(x)]
ff2(x) = If[x2 > 0 ∧ abs((l * sin(x2 / l))) ≥ x ≥ 0, ff(x)]
h = Tangent(P2, ff)
D: 1.5
xx: abs((l * sin(x2 / l)))
e = Circle(P2, (D * xx))
A, B = Intersect(e, h)
FRl = Vector(P2, B)
FRr = Vector(P2, A)
u1 = Vector(P2 - (0.9 * (cos(x2 / l), sin(x2 / l))), P2)
u2 = Vector(P2 + (0.9 * (cos(x2 / l), sin(x2 / l))), P2)
Text1: "Pendel schlägt  " + (If[x2 < 0, "nach links", If[x2 > 0, "nach rechts", "nicht"]]) + " aus"