/*************************************************************************************************************************************/ /* */ /* 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 P O R T R A I T R E E L ( L E N A ) : */ /* */ /* */ /* Author of '$xrC/ObjetComplexe.R____1$vv$c' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 20130726100430). */ /* */ /*************************************************************************************************************************************/ #ifdef COMMENTS # undef COMMENTS #else #endif #define COMMENTS "Portrait reel -Lena- (format octet) -luminance-" #define DEFINE_01 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=1 -DPAVE_Y=PAVE_X" #define DEFINE_02 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=2 -DPAVE_Y=PAVE_X" #define DEFINE_03 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=3 -DPAVE_Y=PAVE_X" #define DEFINE_04 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=4 -DPAVE_Y=PAVE_X" #define DEFINE_05 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=5 -DPAVE_Y=PAVE_X" #define DEFINE_06 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=6 -DPAVE_Y=PAVE_X" #define DEFINE_07 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=7 -DPAVE_Y=PAVE_X" #define DEFINE_08 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=8 -DPAVE_Y=PAVE_X" #define DEFINE_09 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=9 -DPAVE_Y=PAVE_X" #define DEFINE_10 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=10 -DPAVE_Y=PAVE_X" #define DEFINE_11 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=11 -DPAVE_Y=PAVE_X" #define DEFINE_12 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=12 -DPAVE_Y=PAVE_X" #define DEFINE_13 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=13 -DPAVE_Y=PAVE_X" #define DEFINE_14 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=14 -DPAVE_Y=PAVE_X" #define DEFINE_15 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=15 -DPAVE_Y=PAVE_X" #define DEFINE_16 "-DCONVOLUER_LE_FICHIER_IMAGE -DMETHODE_CONVOLUTION_IMAGE_PAVE -DPAVE_X=16 -DPAVE_Y=PAVE_X" #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; #ifndef PLAN # define PLAN \ (0) #else #endif int plan=PLAN; #define NOM_DE_L_IMAGE_RELLE \ xiirC"IMAGE_REELLE.LENA.11" TypeImage image_reelle[]={ #include "ChaineOctetsUniformesAlternees_1024x1024.08.vv.I" }; /* Cette facon de faire (lineariser l'image) est destinee a faire que le source, commme */ /* 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_REELLE(NOM_DE_L_IMAGE_RELLE); SORTIE_DU_FICHIER_IMAGE; EDITER_LES_COMPTEURS_DES_FONCTIONS; } )