/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        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   D R O I T E S   V E R T I C A L E S   E Q U I D I S T A N T E S  :                                                   */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrC/ObjetComplexe.E1$vv$c' :                                                                                   */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20130513100250).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#ifdef    COMMENTS
#         undef     COMMENTS
#else
#endif

#define   COMMENTS  "Droites verticales equidistantes (format octet) -noir ou blanc-"

#define   DEFINE_01 "-DPAS=375"
#define   DEFINE_02 "-DPAS=350"
#define   DEFINE_03 "-DPAS=325"
#define   DEFINE_04 "-DPAS=300"
#define   DEFINE_05 "-DPAS=275"
#define   DEFINE_06 "-DPAS=250"
#define   DEFINE_07 "-DPAS=225"
#define   DEFINE_08 "-DPAS=200"
#define   DEFINE_09 "-DPAS=175"
#define   DEFINE_10 "-DPAS=150"
#define   DEFINE_11 "-DPAS=125"
#define   DEFINE_12 "-DPAS=100"
#define   DEFINE_13 "-DPAS=75"
#define   DEFINE_14 "-DPAS=50"
#define   DEFINE_15 "-DPAS=25"
#define   DEFINE_16 "-DPAS=1"
                                        /* Les pas ont ete obtenus par :                                                             */
                                        /*                                                                                           */
                                        /*                  $xci/valeurs_inte$X                                                   \  */
                                        /*                                      p=1 d=16                                          \  */
                                        /*                                      lineaire=VRAI                                     \  */
                                        /*                                      vD=1 vA=375                                       \  */
                                        /*                                      entiers=VRAI                                         */
                                        /*                                                                                           */

#include  "images_1octet.01.vv.I"

#ifndef   PAS
#         define    PAS                                                                                                                 \
                              (50)
#else
#endif

int       pas=PAS;

MAIN(
          {
          INITIALISATION_IMAGE(NOIR);

          for       (x=Xmin ; x <= Xmax ; x=ADD2(x,pas))
                    {
                    for       (y=Ymin ; y <= Ymax ; y=ADD2(y,1))
                              {
                              STORE_IMAGE_TORE(x,y,BLANC);
                              }
                    }

          SORTIE_DU_FICHIER_IMAGE;
          EDITER_LES_COMPTEURS_DES_FONCTIONS;
          }
     )