Aller au contenu

Mathc gnuplot/002q

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.

fd.h
/* --------------------------------- */
/* save as fd.h                      */
/* --------------------------------- */
double Y(
double t)
{
double n;
double r;

double T = .25;

         for(n=0,r=0;n<40;++n)   /* xmax = 10 = 40 * .25 */
         
              r += (t*t) * pow(-1,n)*H(t- T * n);

      return(r);
}
char  Yeq[] = "Sum(t**2 * (-1)^n*H(t-.25*n),n=0..10)";
/* --------------------------------- */
/* --------------------------------- */