Aller au contenu

Mathc gnuplot/002u

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.

ff.h
/* --------------------------------- */
/* save as ff.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 += cos(t)* pow(-1,n)*H(t- T * n);

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