/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        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 E   2 5 5   D R O I T E S   D E G R A D E E S   E Q U I D I S T A N T E S  :                                             */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrC/ObjetComplexe.H12__1$vv$c' :                                                                               */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20150820113141).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#ifdef    COMMENTS
#         undef     COMMENTS
#else
#endif

#define   COMMENTS  "255 droites horizontales equidistantes (format octet) -fausses couleurs-"

#include  "images_1octet.01.vv.I"

#ifndef   PAS
#         define    PAS                                                                                                                 \
                              (dimY/BLANC)
#else
#endif

int       pas=PAS;

MAIN(
          {
          int       niveau=NOIR+1;
          INITIALISATION_IMAGE(NOIR);

          for       (y=ADD2(Ymin,pas) ; y <= Ymax ; y=ADD2(y,pas))
                                        /* Le 'ADD2(Ymin,pas)' est destine a compenser le fait que ne disposant que de 255 niveaux   */
                                        /* (a cause du niveau 'NOIR' du fond), on ne peut tracer que 255 lignes horizontales.        */
                    {
                    for       (x=Xmin ; x <= Xmax ; x=ADD2(x,1))
                              {
                              STORE_IMAGE_TORE(x,y,niveau);
                              }

                    niveau++;
                    }

          SORTIE_DU_FICHIER_IMAGE;
          EDITER_LES_COMPTEURS_DES_FONCTIONS;
          }
     )



Copyright © Jean-François Colonna, 2015-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2015-2021.