/*************************************************************************************************************************************/ /* */ /* 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 P S E U D O - T O R E A D E U X T R O U S : */ /* */ /* */ /* Author of '$xrs/huit.12$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 20161202104426). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* 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. */ =define PARAMETRE_M \ FU 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_D \ FDEUX 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_R \ 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. */ =define PARAMETRE_A \ 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 \ FDEUX 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 \ FDEUX 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. */