#######################################################################################################################################
#                                                                                                                                     #
#         E X T R A C T I O N   D E   F I L A M E N T S  :                                                                            #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.FRB3.q2.1.1.$U' :                                                                                        #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20140828123924).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        SETParam            _____ConvolPoints             81

$Z        SETParam            _____NCarres                  0

$Z        SETParam            _____BorneInferieure          70

$Z        SETParam            _____BorneSuperieure          80

$Z                  FilSTmpB            FFrAcTaL

$c                  #include  <stdio.h>
$c
$c                  #define   N0        cPremiere
$c                  #define   N         cDerniere
$c
$c                  int       main()
$c                            {
$c                            int       n;
$c
$c                            for       (n=N0 ; n<=N ; n++)
$c                                      {
$c                                      printf("echo      %c$xci/convol.01$X
$c                                                                    A=$_____ImageT2.%04d
$c                                                                    points=%d
$c                                                                                                                      $formatI  |
$c                                                          $xci/complement$X
$c                                                                                                                      $formatI  |
$c                                                          $xci/multi_02.01$X
$c                                                                    A2=$_____ImageT2.%04d
$c                                                                    renormaliser=VRAI
$c                                                                                                                      $formatI  |
$c                                                          $xci/multi_02.01$X
$c                                                                    carre_image=VRAI nombre_carres=%d
$c                                                                    renormaliser=VRAI
$c                                                                                                                      $formatI  |
$c                                                          $xci/passe_bande$X
$c                                                                    forcer_niveau_intermediaire=VRAI niveau_intermediaire=$BLANC
$c                                                                    seuil_inferieur=%d
$c                                                                    seuil_superieur=%d
$c                                                                    R=$_____ImageT1.%04d
$c                                                                                                                      $formatI%c
$c                                                                              >> $FFrAcTaL\n"
$c                                            ,'\''
$c                                            ,n
$c                                            ,_____ConvolPoints
$c                                            ,n
$c                                            ,_____NCarres
$c                                            ,_____BorneInferieure
$c                                            ,_____BorneSuperieure
$c                                            ,n
$c                                            ,'\''
$c                                             );
$c                                      }
$c                            }

$Z                  execPar_V           $FFrAcTaL

$Z                  FilSTmpE            FFrAcTaL