?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Windows installer: Update texinfo.
[maxima.git] / share / contrib / gentran / test / ham.in
blob6b50e138ad096c891a32a28dc9e3fdffc1d6ff49
1 /*  Hamiltonian Calculation  */                         
2                                                         
3 difq : diff(h, p)$                                      
4 difp : -diff(h, q) - ratsubst(p/m, qdot, diff(d, qdot))$
5 rungekutta(difp, difq, p, q, tt)$                       
Maxima, a Computer Algebra System