oscil_energy_t
Author: EKFE Kallipolis
Date: 19 Μάρτιος 2014

Η ενέργεια στην απλή αρμονική ταλάντωση

start

stop

restart

E

K

U

φ_0ο = 0 (slider from 0 to 180, step 15)
h = -10 (slider from -10 to 30, step 1)
t = 0 (slider from 0 to 10, step 0.0050)
A = 1 (slider from 1 to 3, step 0.5)
T = 1 (slider from 1 to 3, step 0.5)
φ_0: φ_0ο * π / 180
ω: 2 * π / T
d = 3 (slider from 0 to 5, step 1)
Α: (d + A * sin(ω * t + φ_0), h)
O: (d, h)
f = If(0 ≤ x, A * sin(ω * x + φ_0))
v = If(0 ≤ x, ω * A * cos(ω * x + φ_0))
Γ: (d - A, h)
Δ: (d + A, h)
b = Segment(Γ, Δ)
K(x) = 0.5 * v(x)^(2)
U(x) = 0.5 * ω^(2) * f(x)^(2)
a = OrthogonalLine(Α, xAxis)
E(x) = K(x) + U(x)
c: x = t
Β = Intersect(E, c, (0, 19.739208802178716))
Ε = Intersect(K, c, (0, 19.739208802178716))
Ζ = Intersect(U, c, (0, 0))
e = true
g = true
i = true