Mathc gnuplot/002y

Sommaire

Installer ce fichier dans votre répertoire de travail.

	fc.h

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

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

---