/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        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   C Y L I N D R E   " S P I R A L A N T "  :                                                                       */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrs/cylindre.23$I' :                                                                                           */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20120720120440).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        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_R,fichier_PARAMETRE_R,PARAMETRE_R_IMPLICITE,PARAMETRE_R)
dfTRANSFORMAT_31(liste_PARAMETRE_A,fichier_PARAMETRE_A,PARAMETRE_A_IMPLICITE,PARAMETRE_A)
dfTRANSFORMAT_31(liste_PARAMETRE_B,fichier_PARAMETRE_B,PARAMETRE_B_IMPLICITE,PARAMETRE_B)
                                        /* Definition du fichier des parametres 'r', 'a' et 'b'.                                     */

#define   sPARAMETRE_R(numero_de_la_periode)                                                                                            \
                    FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_R))
#define   sPARAMETRE_A(numero_de_la_periode)                                                                                            \
                    FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_A))
#define   sPARAMETRE_B(numero_de_la_periode)                                                                                            \
                    FLOT(sTRANSFORMAT_31(numero_de_la_periode,liste_PARAMETRE_B))
                                        /* Formule generale definissant les variations de 'r', 'a' et 'b' au cours du temps.         */