#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N E   L I G N E   D ' I S O - V A L E U R   D A N S                                             #
#         L A   D E N S I T E   R E N O R M A L I S E E   E T   F I L T R E E                                                         #
#         ( V E R S I O N   P A R A L L E L E   M U L T I - M A C H I N E S ,   P A R T I E   S E Q U E N T I E L L E )  :            #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirk/.DIFZ.14.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20070713090233).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        setParam            _____Inferieur                $GRIS_1

$Z        setParam            _____Superieur                $GRIS_2

$Z        setParam            _____Points                   `GetParam $xci/convol.01$X points`

$X                  echo                "neutre"
$X                                      # commande destinee uniquement a eviter la concatenation du 'main(...)' qui suit et de        #
$X                                      # l'eventuel 'main(...)' qui precede ('v $xivP_d09_f2/.REFL.A.14.2.$U main').                 #
$X                                      # L'essentiel etant donc d'avoir un marqueur ('$X') different de '$c' entre le groupe '$xc'   #
$X                                      # eventuel qui precede et le groupe '$xc' qui suit, et ce afin donc d'eviter cette            #
$X                                      # concatenation et donc deux 'main(...)'s dans le meme programme...                           #

$c                  #include  <stdio.h>
$c
$c                  extern    int       atoi();
$c                  extern    char      *getenv();
$c
$c                  #define   NA0       (atoi(getenv("PremiereA")))
$c                  #define   NA        (atoi(getenv("DerniereA")))
$c
$c                  int       main()
$c                            {
$c                            int       n;
$c
$c                            for       (n=NA0 ; n<=NA ; n++)
$c                                      {
$c                                      printf("$xci/acces$X
$c                                                          A=$_____imagesWW.%04d
$c                                                          standard=FAUX
$c                                                          zero=FAUX
$c                                                                                                  $formatI                      |
$c                                              $xci/passe_bande$X
$c                                                          seuil_inferieur=$_____Inferieur
$c                                                          seuil_superieur=$_____Superieur
$c                                                                                                  $formatI                      |
$c                                              $xci/seuil$X
$c                                                                                                  $formatI                      |
$c                                              $xci/convol.01$X
$c                                                          circulaire=VRAI circulaire_optimale=VRAI points=$_____Points
$c                                                          R=$_____imagesDN.%04d
$c                                                                                                  $formatI\n"
$c                                            ,n
$c                                            ,n
$c                                             );
$c                                      /* Et enfin conversion "standard" avec renormalisation locale et filtrage...                 */
$c                                      }
$c                            }



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