Source de ode08.tex

$Fichier TeX$

\psset{xunit=.7}
    \begin{pspicture}(0,-4)(26,6)\psgrid
      \psplot[plotpoints=200, linewidth=4\pslinewidth, linecolor=gray]{0}{26}{2.71828182846 x -8 div exp
        x 127 sqrt 8 div mul 180 mul 3.1415926535 div dup cos 5 mul exch sin 127 sqrt div 5
        mul add mul}
      \psplotequadiff[linecolor=red, plotpoints=500]{0}{26}{5 0}
      {dup 3 1 roll -4 div exch 2 mul sub}
      \psplotequadiff[linecolor=blue, method=rk4, plotpoints=50]{0}{26}{5 0}
      {dup 3 1 roll -4 div exch 2 mul sub}
    \end{pspicture}

— Syracuse — Dernière modification : 13 juin 2004 (0.06s - 3776023 - 20 novembre 2008)