Mathc initiation/a455

Sommaire

Installer ce fichier dans votre répertoire de travail.

Texte de la légende

fa.h /* ---------------------------------- */ /* save as fa.h */ /* ---------------------------------- */ #define LOOP 2*100 /* ---------------------------------- */ double Rx( double s, double t) { return( (sin(s)*cos(t)) ); } char Rxeq[] = "+(sin(s)*cos(t))"; /* ---------------------------------- */ double Ry( double s, double t) { return( (sin(s)*sin(t)) ); } char Ryeq[] = "+(sin(s)*sin(t))"; /* ---------------------------------- */ double Rz( double s, double t) { return( (cos(s)) ); } char Rzeq[] = "+(cos(s))"; /* ---------------------------------- */ /* ---------------------------------- */ double fi( double x, double y, double z) { return( (0) ); } char fieq[] = "(0)"; /* ---------------------------------- */ double fj( double x, double y, double z) { return( (0) ); } char fjeq[] = "(0)"; /* ---------------------------------- */ double fk( double x, double y, double z) { return( (z) ); } char fkeq[] = "(z)"; /* ---------------------------------- */ /* ---------------------------------- */ double v( double s) { return( (2.*PI) ); } char veq[] = "2*PI"; /* ---------------------------------- */ double u( double s) { return( (0.) ); } char ueq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */ double bs = PI; char bseq[] = "PI"; double as = 0.; char aseq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */

fb.h /* ---------------------------------- */ /* save as fb.h */ /* ---------------------------------- */ #define LOOP 2*100 /* ---------------------------------- */ double Rx( double s, double t) { return( (sin(s)*cos(t)) ); } char Rxeq[] = "+(sin(s)*cos(t))"; /* ---------------------------------- */ double Ry( double s, double t) { return( (sin(s)*sin(t)) ); } char Ryeq[] = "+(sin(s)*sin(t))"; /* ---------------------------------- */ double Rz( double s, double t) { return( (cos(s)) ); } char Rzeq[] = "+(cos(s))"; /* ---------------------------------- */ /* ---------------------------------- */ double fi( double x, double y, double z) { return( (0.) ); } char fieq[] = "(0)"; /* ---------------------------------- */ double fj( double x, double y, double z) { return( (0.) ); } char fjeq[] = "(0)"; /* ---------------------------------- */ double fk( double x, double y, double z) { return( (z) ); } char fkeq[] = "(z)"; /* ---------------------------------- */ /* ---------------------------------- */ double v( double t) { return( (PI) ); } char veq[] = "PI"; /* ---------------------------------- */ double u( double t) { return( (0) ); } char ueq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */ double bt = 2.*PI; char bteq[] = "2.*PI"; double at = 0.; char ateq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */