1 s

2 s

4 s

Version Stand
04.12.2020
Andreas Jäger

t-s- und x-s-Darstellung

Stand

t

x

Elementarpendel

s(t)

s(x)

3D

t

x

Elementarpendel

{\lambda\over 2}

{T\over 2}

t = 0 (slider from 0 to 4, step 0.001)
T = 2 (slider from 1 to 4, step 0.5)
l = 1.1 (slider from -1 to 2, step 0.001)
bInfo = false
alpha = 1.0471975511965976 rad (slider from 20° to 60°, step 0.1°)
NP: (0, 0)
lx: 10
lt: 10
Px: ((lx * cos(alpha)), ((-lx) * sin(alpha)))
Pt: ((lt * cos(alpha)), (lt * sin(alpha)))
vt = Vector(NP, Pt)
vx = Vector(NP, Px)
s0: 5
vs = Vector((0, (-s0)), (0, s0))
n0 = 10 (slider from 10 to 50, step 1)
l1 = Sequence((((lx * i / n0) * cos(alpha)), ((-((lx * i / n0) - (s0 * sin(((2 * π / l) * i / n0) - ((2 * π / T) * t))))) * sin(alpha))), i, 0, n0)
f = Sequence(Segment[Element[l1, i - 1], Element[l1, i]], i, 2, n0 + 1)
nn = 0 (slider from 0 to 10, step 1)
x0: (lx / n0 * nn)
Xt: (((lx * x0 / n0) * cos(alpha)), ((-((lx * x0 / n0) - (s0 * sin(((2 * π / l) * x0 / n0) - ((2 * π / T) * t))))) * sin(alpha)))
X0: (((lx * x0 / n0) * cos(alpha)), ((-((lx * x0 / n0))) * sin(alpha)))
g = Segment(X0, Xt)
l2 = Sequence((((i + nn) * cos(alpha)), ((i - nn + (s0 * sin(((2 * π / l) * (i - nn)) - ((2 * π / T) * t)))) * sin(alpha))), i, 0, n0)
l3 = Sequence(Segment[Element[l2, i - 1], Element[l2, i]], i, 2, n0 + 1)
phi0: 0
bPendel = false
bs = false
vt2: vt
l4 = Sequence((((i + nn) * cos(alpha)), ((i - nn + (0 * sin(((2 * π / l) * (i - nn)) - ((2 * π / T) * t)))) * sin(alpha))), i, 0, n0)
l5 = Sequence(Segment[Element[l4, i], Element[l2, i]], i, 1, n0 + 1)
h = Segment(Element[l4, 1], Element[l4, n0 + 1])
l6 = Sequence((((lx * i / n0) * cos(alpha)), ((-((lx * i / n0) - (0 * sin(((2 * π / l) * i / n0) - ((2 * π / T) * t))))) * sin(alpha))), i, 0, n0)
l7 = Sequence(Segment[Element[l6, i], Element[l1, i]], i, 1, n0 + 1)
bx = true
vx2: vx
a = false
T2 = NaN
Eingabefeld1 = Textfield(nn)
LH = Segment((0, 0), ((5.5 * cos(alpha)), (-5.5 * sin(alpha))))
PLH: ((5.5 * cos(alpha)), (-5.5 * sin(alpha)))
PTH: ((5.5 * cos(alpha)), (5.5 * sin(alpha)))
TH = Segment((0, 0), PTH)
i = Segment(Element[l4, 1], (Element[l4, n0 + 1] + Element[l4, n0 + 2]) / 2)
A: (((i + n0 / 2) * cos(alpha)), ((i - n0 / 2 - (0 * sin(((2 * π / l) * (i - n0 / 2)) - ((2 * π / T) * t)))) * sin(alpha)))
B: (((5.5 + nn) * cos(alpha)), ((5.5 - nn - (0 * sin(((2 * π / l) * (5.5 - nn)) - ((2 * π / T) * t)))) * sin(alpha)))
j = Segment(Element[l4, 1], B)