/*************************************************************************************************************************************/
/* */
/* T R A N S F O R M A T I O N I T E R A T I V E D ' U N E I M A G E */
/* P A R L A D Y N A M I Q U E D E V E R H U L S T : */
/* */
/* */
/* Author of '$xci/Verhulst.01$I' : */
/* */
/* Jean-Francois Colonna (LACTAMME, 20040916110805). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* C H A R G E M E N T D ' U N E I M A G E F L O T T A N T E D E P A R A M E T R A G E : */
/* */
/*************************************************************************************************************************************/
#define LOAD_D_UNE_IMAGE_FLOTTANTE_DE_PARAMETRAGE(image,nom_image,valeur_par_defaut,nom_de_la_nom_de_la_valeur_par_defaut) \
Bblock \
CALi(IFinitialisation(image,valeur_par_defaut)); \
/* Initialisation du taux de croissance a priori... */ \
\
Test(IFNE_chaine(nom_image,NOM_PIPE)) \
Bblock \
Test(PAS_D_ERREUR(CODE_ERROR(IloadF_image(image,nom_image)))) \
Bblock \
Eblock \
ATes \
Bblock \
Test__CODE_ERREUR__ERREUR07; \
\
PRINT_ATTENTION("c'est la valeur par defaut qui va etre utilisee"); \
CAL1(Prer2("elle vaut (%s) %.^^^\n\n",nom_de_la_nom_de_la_valeur_par_defaut,valeur_par_defaut)); \
/* Le 20060105155839, le format "16g" est passe a "^^g" pour plus de souplesse... */ \
/* */ \
/* Le 20091123123319, le format "^^g" est passe a "^^^" pour plus de souplesse... */ \
Eblock \
ETes \
Eblock \
ATes \
Bblock \
Eblock \
ETes \
Eblock \
/* Entree d'une image flottante de parametrage... */