sicmutils.examples.driven-pendulum — net.littleredcomputer/sicmutils 0.13.0

equations clj/s

(equations)

evolver clj/s

(evolver {:keys [t dt a omega g theta_0 thetadot_0 observe]
          :or {t 1 dt (/ 1 60) a 0 omega 0 g 9.8 theta_0 1 thetadot_0 0}})

L clj/s

(L m l g a ω)

state-derivative clj/s

(state-derivative m l g a ω)

vertical-periodic-drive clj/s

(vertical-periodic-drive amplitude frequency phase)