/*************************************************************************************************************************************/
/* */
/* 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 : */
/* */
/* */
/* Author of '$xrs/cylindre.12$I' : */
/* */
/* Jean-Francois Colonna (LACTAMME, 20061011093708). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* 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_R \
GRO6(FRA10(FU))
DEFV(Local,DEFV(Float,INIT(parametre_r,PARAMETRE_R)));
DEFV(Local,DEFV(Float,INIT(d_parametre_r,d_FCONSTANTES)));
/* Definition de la valeur du parametre 'r' au cours du temps. */