
PROGRAMM   ZU DEN KRFTEN AUF DIE ACHSE EINER SCHAUKEL

|t|x|h|v|e|q|z|W|J|j|r|m|=|0|0|0.01|0|0|0|0|2.157|252.8|12.8|2|60|: Erst diese  Zeile

Wiederhole bis t>40:und dann diese doppelt anklicken !
a= (-pi/4*W*W*cos(W*e)*j- m*9.81*r*sin(x+z/2))/J
z=v*h+0.5*a*h^2
x=x+z
v=v+a*h
wenn x>0
q=0
ohnewenn
wenn x<0
wenn q=0
wenn e>2.9
W=2*pi/e
e=0
q=1
ohnewenn
t=t+h
e=e+h
F=m*v*v*r + m*9.81*cos(x)
E=- j*pi/(4*r) * W*W* cos(W*e) - a *j / r
t;F;;1
t;E;;10
zurck







dL/dt = - dl/dt + 1177*w
a=pi/4*sin(2*pi/T*t)
l = J*da/dt
di/dt= - pi^3/T^2*sin(2*pi/T*t)*12.8
dL/dt = 240 * dw/dt
