sicmutils.examples.central-potential — net.littleredcomputer/sicmutils 0.13.0

-main clj

(-main & _)

equations clj/s

(equations)

evolver clj/s

(evolver {:keys [t dt m M x_0 y_0 xdot_0 ydot_0 observe]
          :or {t 1 dt 1 m 1 M 1 x_0 1 y_0 1 xdot_0 -0.05 ydot_0 0}})

L clj/s

state-derivative clj/s

(state-derivative m M)

T clj/s

(T & masses)

V clj/s

(V & masses)