Aller au contenu

Mathc gnuplot/Animation : Vecteur normal

Un livre de Wikilivres.


Sommaire


N'oubliez pas les fichiers h de la librairie.

c00a.c
/* ------------------------------------ */
/* save as : c00a.c                     */
/* ------------------------------------ */
#include "v_a.h"
#include "y_r.h"
/* ------------------------------------ */  
double **fun(double **U,double angle,double shape,
        double side,double incr,double side_max);
/* ------------------------------------ */   
int main(void)
{
double angle     =   0.;   
double shape     = 120.;   
double  side     =   2.;                        
double  incr     =   4.;                        
double  side_max = 270.;                        
                   
double **U = G_main(-175.,175.,-100.,175.);

  F_mR(fun(U,angle,shape,side,incr,side_max));
  
  printf("  ... load \"a_main.plt\" ... with gnuplot.\n");
  getchar(); 
     
  return 0;
}
/* ------------------------------------ */   
double **fun(
double **U,
double angle,
double shape,
double side,
double incr,                             
double side_max
)
{
 if(side > side_max) return(0);

/*   DEBUG:

 clrscrn();        
 printf("    side = %f \n\n",side); 
 printf("  * open the file main.plt with Gnuplot.\n\n");       
 getchar(); 
*/
 
 vo(U,angle, side);                       
 fun(U,angle+shape,shape,side+incr,incr,side_max);  
 
 return(U);        
}
/* ------------------------------------ */
/* ------------------------------------ */
Résultat dans gnuplot