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