/*************************************************************************************************************************************/ /* */ /* 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... */