/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        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 E   L ' E L L I P S O I D E  :               */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrs/ellipsoid.12$I' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 1993??????????).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        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_A                                                                                                                   \
                    GRO6(FRA10(FU))
DEFV(Local,DEFV(Float,INIT(parametre_a,PARAMETRE_A)));
DEFV(Local,DEFV(Float,INIT(d_parametre_a,d_FCONSTANTES)));
                                        /* Definition de la valeur du parametre 'a' au cours du temps.                               */
=define   PARAMETRE_B                                                                                                                   \
                    GRO6(FRA10(FU))
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                                                                                                                   \
                    GRO6(FRA10(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.                               */