Sommaire
Installer ce fichier dans votre répertoire de travail.
fa.h
/* ---------------------------------- */ /* save as fa.h */ /* ---------------------------------- */ #define LOOP 2*100 /* ---------------------------------- */ double g( double r, double k) { return( (4 - r*r) ); } char geq[] = "4 - r**2"; /* ---------------------------------- */ /* ---------------------------------- */ double v( double k) { return( (2) ); } char veq[] = "2"; /* ---------------------------------- */ double u( double k) { return( (0) ); } char ueq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */ double b = PI/2.; char beq[] = "PI/2"; double a = 0.; char aeq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */
fb.h
/* ---------------------------------- */ /* save as fb.h */ /* ---------------------------------- */ #define LOOP 2*100 /* ---------------------------------- */ double g( double r, double k) { return( (7. - 7./25. * r*r) ); } char geq[] = "7 - 7./25 * r**2"; /* ---------------------------------- */ /* ---------------------------------- */ double v( double k) { return( (5) ); } char veq[] = "5"; /* ---------------------------------- */ double u( double k) { return( (0) ); } char ueq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */ double b = 2*PI; char beq[] = "2*PI"; double a = 0.; char aeq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */
fc.h
/* ---------------------------------- */ /* save as fc.h */ /* ---------------------------------- */ #define LOOP 2*100 /* ---------------------------------- */ double g( double r, double k) { return( (4 - r*r) ); } char geq[] = "4 - r**2"; /* ---------------------------------- */ /* ---------------------------------- */ double v( double r) { return( (PI/2) ); } char veq[] = "Pi/2"; /* ---------------------------------- */ double u( double r) { return( (0) ); } char ueq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */ double b = 2.; char beq[] = "2"; double a = 0.; char aeq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */
fd.h
/* ---------------------------------- */ /* save as fd.h */ /* ---------------------------------- */ #define LOOP 2*100 /* ---------------------------------- */ double g( double r, double k) { return( (7. - 7./25. * r*r) ); } char geq[] = "7 - 7./25 * r**2"; /* ---------------------------------- */ /* ---------------------------------- */ double v( double r) { return( (2*PI) ); } char veq[] = "2*Pi"; /* ---------------------------------- */ double u( double r) { return( (0) ); } char ueq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */ double b = 5.; char beq[] = "5"; double a = 0.; char aeq[] = "0"; /* ---------------------------------- */ /* ---------------------------------- */