# Mathc initiation/Fichiers h : c51

Sommaire
Installer ce fichier dans votre répertoire de travail.
Texte de la légende :
| f_krz.h /* --------------------------------- */ /* save as f_krz.h */ /* --------------------------------- */ #define LOOP 2*100 /* --------------------------------- */ double f( double r, double k, double z) { return( (z) ); } char feq = "z"; /* ---------- k b------------------- */ double v( double k, double z) { return( 2*PI); } char veq = "2*PI"; /* ---------- k a------------------- */ double u( double k, double z) { return( 0); } char ueq = "0"; /* ----------- r b------------------- */ double t( double z) { return( 2); } char teq = "2"; /* ----------- r a------------------- */ double s( double z) { return( 0); } char seq = "0"; /* ------------- z ----------------- */ double b = 1.; char beq = "1"; double a = 0.; char aeq = "0"; /* --------------------------------- */ /* --------------------------------- */ | f_kzr.h /* --------------------------------- */ /* save as f_kzr.h */ /* --------------------------------- */ #define LOOP 2*100 /* --------------------------------- */ double f( double r, double k, double z) { return( (z) ); } char feq = "z"; /* ---------- k b------------------- */ double v( double k, double z) { return( 2*PI); } char veq = "2*PI"; /* ---------- k a------------------- */ double u( double k, double z) { return( 0); } char ueq = "0"; /* ----------- z b------------------- */ double t( double z) { return( 1); } char teq = "1"; /* ----------- z a------------------- */ double s( double z) { return( 0); } char seq = "0"; /* ------------- r ----------------- */ double b = 2.; char beq = "2"; double a = 0.; char aeq = "0"; /* --------------------------------- */ /* --------------------------------- */ |
| f_rkz.h /* --------------------------------- */ /* save as f_rkz.h */ /* --------------------------------- */ #define LOOP 2*100 /* --------------------------------- */ double f( double r, double k, double z) { return( (z) ); } char feq = "z"; /* ---------- r b------------------- */ double v( double k, double z) { return( sqrt(4-z)); } char veq = "sqrt(4-z)"; /* ---------- r a------------------- */ double u( double k, double z) { return( 0); } char ueq = "0"; /* ----------- k b------------------- */ double t( double z) { return( 2*PI); } char teq = "2*PI"; /* ----------- k a------------------- */ double s( double z) { return( 0); } char seq = "0"; /* ------------- z ----------------- */ double b = 2.; char beq = "2"; double a = 0.; char aeq = "0"; /* --------------------------------- */ /* --------------------------------- */ | f_rzk.h /* --------------------------------- */ /* save as f_rzk.h */ /* --------------------------------- */ #define LOOP 2*100 /* --------------------------------- */ double f( double r, double k, double z) { return( (z) ); } char feq = "z"; /* ---------- r b------------------- */ double v( double k, double z) { return(sqrt(4-z)); } char veq = "sqrt(4-z)"; /* ---------- r a------------------- */ double u( double k, double z) { return(0); } char ueq = "0"; /* ---------- z b------------------- */ double t( double k) { return( 2); } char teq = "2"; /* ---------- z a------------------- */ double s( double k) { return( 1); } char seq = "1"; /* -------------- k ---------------- */ double b = 2.*PI; char beq = "2*PI"; double a = 0.; char aeq = "0"; /* --------------------------------- */ /* --------------------------------- */ |
| f_zkr.h /* --------------------------------- */ /* save as f_zkr.h */ /* --------------------------------- */ #define LOOP 2*100 /* --------------------------------- */ double f( double r, double k, double z) { return( (z) ); } char feq = "z"; /* ---------- z b------------------- */ double v( double r, double k) { return(2.); } char veq = "2."; /* ---------- z a------------------- */ double u( double r, double k) { return(0); } char ueq = "0"; /* ---------- k b------------------- */ double t( double k) { return( PI/2.); } char teq = "PI/2."; /* ---------- k a------------------- */ double s( double k) { return( 0); } char seq = "0"; /* ------------ r ------------------ */ double b = 3.; char beq = "3"; double a = 0.; char aeq = "0"; /* --------------------------------- */ /* --------------------------------- */ | f_zrk.h /* --------------------------------- */ /* save as f_zrk.h */ /* --------------------------------- */ #define LOOP 2*100 /* --------------------------------- */ double f( double r, double k, double z) { return( (z) ); } char feq = "z"; /* ---------- z b------------------- */ double v( double r, double k) { return(sqrt(4-r*r)); } char veq = "sqrt(4-r**2)"; /* ---------- z a------------------- */ double u( double r, double k) { return(0); } char ueq = "0"; /* ---------- r b------------------- */ double t( double k) { return( 1); } char teq = "1"; /* ---------- r a------------------- */ double s( double k) { return( 0); } char seq = "0"; /* ------------ k ------------------ */ double b = PI/2.; char beq = "PI/2"; double a = 0.; char aeq = "0"; /* --------------------------------- */ /* --------------------------------- */ |