Aller au contenu

Mathc gnuplot/0034

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.

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

double T = .10;

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

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