/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        E T U D E   D E   L A   C O M P L E X I T E   S T R U C T U R E L L E                                                      */
/*        D ' U N E   I M A G E   " R E E L L E "   M O N T R A N T                                                                  */
/*        P O U R   L A   S C I E N C E  23  :                                                                                       */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrC/ObjetComplexe.F23__1$vv$c' :                                                                               */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20150129113759).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#ifdef    COMMENTS
#         undef     COMMENTS
#else
#endif

#define   COMMENTS  "Pour La Science 23 (format octet) -luminance-"

#include  "images_1octet.01.vv.I"

#ifndef   PAVE_X
#         define    PAVE_X                                                                                                              \
                              (1)
#else
#endif

#ifndef   PAVE_Y
#         define    PAVE_Y                                                                                                              \
                              (1)
#else
#endif

int       pave_X=PAVE_X;
int       pave_Y=PAVE_Y;

#define   NOM_DE_L_IMAGE_RELLE                                                                                                          \
                    xiirC"IMAGE_SYNTHETIQUE.POUR_LA_SCIENCE.23"

TypeImage image_reelle[]={
#include  "ChaineOctetsUniformesAlternees_1024x1024.08.vv.I"
                         };
                                        /* Cette facon de faire (lineariser l'image) est destinee a faire que le source, commme le   */
                                        /* binaire non executable, aient des longueurs proportionnelles a la taille de l'image).     */
                                        /* On notera de plus que cette chaine ne peut etre nulle (voire uniforme), c'est pourquoi    */
                                        /* la repetition {0,1} est utilisee...                                                       */

MAIN(
          {
          ACCES_IMAGE_SYNTHETIQUE(NOM_DE_L_IMAGE_RELLE);

          CONVOLUTION_IMAGE;

          SORTIE_DU_FICHIER_IMAGE
          EDITER_LES_COMPTEURS_DES_FONCTIONS
          }
     )