Source de ode05.tex
Retour    vers le bas
Fichier TeX
Image PNG
\def\Funct{exch}
    \psset{xunit=5, yunit=1.1}
    \begin{pspicture}(0,0)(2,7)\psgrid
      %%e^x
      \psplot[linewidth=4\pslinewidth, linecolor=green]{0}{2}{2.71828182846 x exp}
      \psplotequadiff[linecolor=magenta, plotpoints=11]{0}{2}{1 1}{\Funct}
      \psplotequadiff[linecolor=blue, plotpoints=101]{0}{2}{1 1}{\Funct}
      \psplotequadiff[linecolor=red, method=rk4, plotpoints=11]{0}{2}{1 1}{\Funct}
      %%ch(x)
      \psplot[linewidth=4\pslinewidth, linecolor=green]{0}{2}{2.71828182846 dup x exp
      exch x neg exp add 2 div}
      \psplotequadiff[linecolor=magenta, plotpoints=11]{0}{2}{1 0}{\Funct}
      \psplotequadiff[linecolor=blue, plotpoints=101]{0}{2}{1 0}{\Funct}
      \psplotequadiff[linecolor=red, method=rk4, plotpoints=11]{0}{2}{1 0}{\Funct}
      %%sh(x)
      \psplot[linewidth=4\pslinewidth, linecolor=green]{0}{2}{2.71828182846 dup x exp
      exch x neg exp sub 2 div}
      \psplotequadiff[linecolor=magenta, plotpoints=11]{0}{2}{0 1}{\Funct}
      \psplotequadiff[linecolor=blue, plotpoints=101]{0}{2}{0 1}{\Funct}
      \psplotequadiff[linecolor=red, method=rk4, plotpoints=11]{0}{2}{0 1}{\Funct}
      \rput*(2.1,1.9){\psline[linecolor=magenta](-.75cm,0)}
      \rput*[l](2.1,1.9){\small\textsc{Euler} ordre 1 $h=1$}
      \rput*(2.1,2.8){\psline[linecolor=blue](-.75cm,0)}
      \rput*[l](2.1,2.8){\small\textsc{Euler} ordre 1 $h=0{,}1$}
      \rput*(2.1,3.7){\psline[linecolor=red](-.75cm,0)}
      \rput*[l](2.1,3.7){\small RK ordre 4 $h=1$}
      \rput*(2.1,4.6){\psline[linecolor=green](-.75cm,0)}
      \rput*[l](2.1,4.6){\small solution exacte}
    \end{pspicture}

 

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