/*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N S R E L A T I V E S A U X P A R A M E T R E S */ /* D ' U N E H E L I C E " E P A I S S I E " : */ /* */ /* */ /* Author of '$xrs/helicoide.13$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 20161226095208). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* F O N C T I O N S D E V I S U A L I S A T I O N E T D ' I N T E R P O L A T I O N : */ /* */ /*************************************************************************************************************************************/ #TestADef RAYON_DE_VISUALISATION \ FRA4(FRA10(FU)) \ /* Rayon du disque materialisant une iteration. */ #include xrs/surfaces.11.I" dfTRANSFORMAT_31(liste_PARAMETRE_Ra,fichier_PARAMETRE_Ra,PARAMETRE_Ra_IMPLICITE,PARAMETRE_Ra) /* Definition du fichier du parametre 'Ra'. */ #define sPARAMETRE_Ra(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_Ra)) \ /* Formule generale definissant les variations de 'Ra' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_Rb,fichier_PARAMETRE_Rb,PARAMETRE_Rb_IMPLICITE,PARAMETRE_Rb) /* Definition du fichier du parametre 'Rb'. */ #define sPARAMETRE_Rb(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_Rb)) \ /* Formule generale definissant les variations de 'Rb' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_R,fichier_PARAMETRE_R,PARAMETRE_R_IMPLICITE,PARAMETRE_R) /* Definition du fichier du parametre 'R'. */ #define sPARAMETRE_R(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_R)) \ /* Formule generale definissant les variations de 'R' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_A,fichier_PARAMETRE_A,PARAMETRE_A_IMPLICITE,PARAMETRE_A) /* Definition du fichier du parametre 'A'. */ #define sPARAMETRE_A(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_A)) \ /* Formule generale definissant les variations de 'A' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_B,fichier_PARAMETRE_B,PARAMETRE_B_IMPLICITE,PARAMETRE_B) /* Definition du fichier du parametre 'B'. */ #define sPARAMETRE_B(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_B)) \ /* Formule generale definissant les variations de 'B' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_C,fichier_PARAMETRE_C,PARAMETRE_C_IMPLICITE,PARAMETRE_C) /* Definition du fichier du parametre 'C'. */ #define sPARAMETRE_C(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_C)) \ /* Formule generale definissant les variations de 'C' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_D,fichier_PARAMETRE_D,PARAMETRE_D_IMPLICITE,PARAMETRE_D) /* Definition du fichier du parametre 'D'. */ #define sPARAMETRE_D(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_D)) \ /* Formule generale definissant les variations de 'D' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_E,fichier_PARAMETRE_E,PARAMETRE_E_IMPLICITE,PARAMETRE_E) /* Definition du fichier du parametre 'E'. */ #define sPARAMETRE_E(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_E)) \ /* Formule generale definissant les variations de 'E' au cours du temps. */ dfTRANSFORMAT_31(liste_PARAMETRE_F,fichier_PARAMETRE_F,PARAMETRE_F_IMPLICITE,PARAMETRE_F) /* Definition du fichier du parametre 'F'. */ #define sPARAMETRE_F(numero_de_la_periode) \ FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_F)) \ /* Formule generale definissant les variations de 'F' au cours du temps. */