/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N   D E S   O P E R A T I O N S   D E   D I L A T A T I O N   P O U R   L E S   R E D U C T I O N S  :   */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xci/reduction.12$I' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20010612150435).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        M A C R O S   U T I L E S  :                                                                                               */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
#define   dilatation_tous                                                                                                               \
                    dilatation_tous_les_niveaux                                                                                         \
                                        /* Afin d'eviter une ligne trop longue ci-apres...                                           */

#define   DILATATION_D_UNE_IMAGE_AVANT_REDUCTION(nom_image_dilatee,nom_image,dimension_du_pave)                                         \
                    Bblock                                                                                                              \
                    Test(IL_FAUT(dilater_les_images))                                                                                   \
                         Bblock                                                                                                         \
                         EGAL(nom_image_dilatee,generation_d_un_nom_absolu_dans_xT_temporaire(C_VIDE));                                 \
                                        /* Generation du nom de l'image dilatee.                                                     */ \
                                                                                                                                        \
                         EXECUTION_D_UNE_SUITE_DE_COMMANDES_SOUS_SH(chain_Aconcaten6(GENERATION_NOM_D_UNE_COMMANDE_X(Direct_xci         \
                                                                                                                    ,"dilate.01"        \
                                                                                                                     )                  \
                                                                                    ,chain_Aconcaten2(" A=",nom_image)                  \
                                                                                    ,chain_Aconcaten6(" tous_niveaux="                  \
                                                                                                     ,ETAT_LOGIQUE(dilatation_tous)     \
                                                                                                     ," carre="                         \
                                                                                                     ,ETAT_LOGIQUE(dilatation_carree)   \
                                                                                                     ," points="                        \
                                                                                                     ,chain_Aentier(dimension_du_pave)  \
                                                                                                      )                                 \
                                                                                    ,chain_Aconcaten2(" R=",nom_image_dilatee)          \
                                                                                    ,GENERATION_DE_CAL1_CAL2_CAL3_CAL4                  \
                                                                                    ,GENERATION_DE_formatI                              \
                                                                                     )                                                  \
                                                                    );                                                                  \
                                        /* Dilatation de l'image courante. L'option "GENERATION_DE_CAL1_CAL2_CAL3_CAL4" a ete        */ \
                                        /* introduite le 20011112143354 apres l'introduction de l'option '$attendre' dans les        */ \
                                        /* commanes '$xci/reduction_??$Z ' le 20011112114927 (a cause du "CAL1=FAUX" qui doit        */ \
                                        /* etre evidemment transmis a '$xci/dilate.01$X').                                           */ \
                         Eblock                                                                                                         \
                    ATes                                                                                                                \
                         Bblock                                                                                                         \
                         Eblock                                                                                                         \
                    ETes                                                                                                                \
                    Eblock                                                                                                              \
                                        /* Procedure de dilatation d'une image avant reduction...                                    */