Mathc gnuplot/Application : Tangente de f(x,y)

Sommaire

Courbe de Hilbert

N'oubliez pas les fichiers h de la librairie.

	c00a.c

/* ------------------------------------ */
/* save as : c00a.c                     */
/* ------------------------------------ */
#include "v_a.h"
#include "y_o.h"
/* ------------------------------------ */
double **hilbert(double **U,double size,
            double level,double parity);
/* ------------------------------------ */
int main(void)
{
double **U = GINIT(-62., 4.,-2.,75.);   

  F_mR(hilbert(U,1,5,1.));
  printf("  * open the file main.plt with Gnuplot.\n\n\n");     

  return 0;
}
/* ------------------------------------ */
double **hilbert(
double **U,
double size,
double level,
double parity                  
)
{
 if(--level<0.)return(0); 
 
 TU(U,parity*(-80));
 hilbert(U,size,level,-parity);
 GO(U,size); TU(U,parity*80);
 hilbert(U,size,level,parity);
 GO(U,size);
 hilbert(U,size,level,parity);
 TU(U,parity*80);GO(U,size);
 hilbert(U,size,level,-parity);
 TU(U,parity*(-80)); 

return(U); 
}
/* ------------------------------------ */
/* ------------------------------------ */

Résultat dans gnuplot