/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N S   R E L A T I V E S   A U X   C O O R D O N N E E S                                                  */
/*        D ' U N   P S E U D O - T O R E   " E P Y C Y C L O I D A L "   T R I D I M E N S I O N N E L  :                           */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrs/epicycloide.22$I' :                                                                                        */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20161230081909).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N   D E S   P A R A M E T R E S  :                                                                       */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
=define   PARAMETRE_Ra                                                                                                                  \
                    GRO4(FRA10(FU))
DEFV(Local,DEFV(Float,INIT(parametre_Ra,PARAMETRE_Ra)));
DEFV(Local,DEFV(Float,INIT(d_parametre_Ra,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'Ra' au cours du temps.                              */
=define   PARAMETRE_Rb                                                                                                                  \
                    GRO4(FRA10(FU))
DEFV(Local,DEFV(Float,INIT(parametre_Rb,PARAMETRE_Rb)));
DEFV(Local,DEFV(Float,INIT(d_parametre_Rb,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'Rb' au cours du temps.                              */

=define   PARAMETRE_A                                                                                                                   \
                    GRO8(FU)
=define   PARAMETRE_a                                                                                                                   \
                    GRO1(FU)
=define   PARAMETRE_L                                                                                                                   \
                    GRO4(FU)

=define   PARAMETRE_B                                                                                                                   \
                    ADD2(PARAMETRE_A,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_B,PARAMETRE_B)));
DEFV(Local,DEFV(Float,INIT(d_parametre_B,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'B' au cours du temps.                               */
=define   PARAMETRE_C                                                                                                                   \
                    FU
DEFV(Local,DEFV(Float,INIT(parametre_C,PARAMETRE_C)));
DEFV(Local,DEFV(Float,INIT(d_parametre_C,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'C' au cours du temps.                               */
=define   PARAMETRE_D                                                                                                                   \
                    MUL2(PARAMETRE_L,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_D,PARAMETRE_D)));
DEFV(Local,DEFV(Float,INIT(d_parametre_D,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'D' au cours du temps.                               */
=define   PARAMETRE_E                                                                                                                   \
                    DIVI(PARAMETRE_B,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_E,PARAMETRE_E)));
DEFV(Local,DEFV(Float,INIT(d_parametre_E,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'E' au cours du temps.                               */

=define   PARAMETRE_F                                                                                                                   \
                    ADD2(PARAMETRE_A,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_F,PARAMETRE_F)));
DEFV(Local,DEFV(Float,INIT(d_parametre_F,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'F' au cours du temps.                               */
=define   PARAMETRE_G                                                                                                                   \
                    FU
DEFV(Local,DEFV(Float,INIT(parametre_G,PARAMETRE_G)));
DEFV(Local,DEFV(Float,INIT(d_parametre_G,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'G' au cours du temps.                               */
=define   PARAMETRE_H                                                                                                                   \
                    MUL2(PARAMETRE_L,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_H,PARAMETRE_H)));
DEFV(Local,DEFV(Float,INIT(d_parametre_H,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'H' au cours du temps.                               */
=define   PARAMETRE_I                                                                                                                   \
                    DIVI(PARAMETRE_B,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_I,PARAMETRE_I)));
DEFV(Local,DEFV(Float,INIT(d_parametre_I,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'I' au cours du temps.                               */

=define   PARAMETRE_M                                                                                                                   \
                    ADD2(PARAMETRE_A,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_M,PARAMETRE_M)));
DEFV(Local,DEFV(Float,INIT(d_parametre_M,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'M' au cours du temps.                               */
=define   PARAMETRE_N                                                                                                                   \
                    FU
DEFV(Local,DEFV(Float,INIT(parametre_N,PARAMETRE_N)));
DEFV(Local,DEFV(Float,INIT(d_parametre_N,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'N' au cours du temps.                               */
=define   PARAMETRE_O                                                                                                                   \
                    MUL2(PARAMETRE_L,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_O,PARAMETRE_O)));
DEFV(Local,DEFV(Float,INIT(d_parametre_O,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'O' au cours du temps.                               */
=define   PARAMETRE_P                                                                                                                   \
                    DIVI(PARAMETRE_B,PARAMETRE_a)
DEFV(Local,DEFV(Float,INIT(parametre_P,PARAMETRE_P)));
DEFV(Local,DEFV(Float,INIT(d_parametre_P,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'P' au cours du temps.                               */