Aller au contenu

Mathc gnuplot/Animation : Plan tangent

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     =  10.;                        
double  incr     =   2.;                        
double  side_max = 7100.;                        

double **U = G_main(-2.,12.,-4.,10.);

   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(angle > side_max) return(0);

/*   DEBUG:

 clrscrn();        
 printf("    angle = %f \n\n",angle); 
 printf("  * open the file main.plt with Gnuplot.\n\n");       
 getchar(); 
*/

 vo(U,angle, side);                                /* 1 */
 fun(U,angle+shape+incr,shape,side,incr,side_max); /* 2 */
 
 return(U);         
}
/* ------------------------------------ */
/* ------------------------------------ */
Résultat dans gnuplot