Mathc gnuplot/000i

Sommaire

Petit jeux sur les carrés

N'oubliez pas les fichiers h de la librairie.

	c00a.c

/* ------------------------------------ */
/* save as : c00a.c                     */
/* ------------------------------------ */
#include "v_a.h"
#include "y_o.h"
/* ------------------------------------ */  
double **sqr(double **U,double size);
/* ------------------------------------ */
int main(void)
{
double **U = GINIT(-200.,800.,-300.,650.);    

  F_mR(sqr(U,400.));

  printf("  ... load \"a_main.plt\" ... with gnuplot.\n");
  getchar();        

  return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */
double **sqr(
double **U,
double size                  
)
{
int i=5;

 if(size<10.) return(0); 
 
 for(;i--;)
  {
   TU(U,-108.);
   
   sqr(U,size/4.);
   
   TU(U,108.);GO(U,size);TU(U,72.);
 } 
 return(U); 
}
/* ------------------------------------ */
/* ------------------------------------ */

Résultat dans gnuplot