Source de ode07.tex
Retour    vers le bas
Fichier TeX
Image PNG
\def\Func{exch 3.1415926 div 180 mul sin -9.8 mul}
    \psset{yunit=2.5, xunit=4}
    \begin{pspicture}(0,-2)(3,2)\psgrid
      \psplot[linewidth=3\pslinewidth, linecolor=Orange]{0}{3}{x 3.1415926 div 180 mul 9.8 sqrt mul cos .1 mul}
      \psplotequadiff[linecolor=blue, method=rk4, plotpoints=50]{0}{3}{.1 0}{\Func}
      \psplot[linewidth=3\pslinewidth, linecolor=Orange]{0}{3}{x 3.1415926 div 180 mul 9.8 sqrt mul cos .25 mul}
      \psplotequadiff[linecolor=blue, method=rk4, plotpoints=50]{0}{3}{.25 0}{\Func}
      \psplotequadiff[linecolor=blue, method=rk4, plotpoints=50]{0}{3}{.5 0}{\Func}
      \psplotequadiff[linecolor=blue, method=rk4, plotpoints=50]{0}{3}{1 0}{\Func}
      \psplotequadiff[linecolor=blue, method=rk4, plotpoints=100]{0}{3}{3.1415926 2 div 0}{\Func}
    \end{pspicture}

 

Validation CSS Validation XHTML — Syracuse — Dernière modification : 13 juin 2004 (0.07s - 3776271 - 20 novembre 2008) vers le haut