#######################################################################################################################################
#                                                                                                                                     #
#         E T A L E M E N T   D E S   E X T R E M A   L O C A U X   V E R S   L E S   E X T R E M A   G L O B A U X  :                #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.FRB3.m2.1.1.$U' :                                                                                        #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20140818174241).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        setParam            _____Th_cn                    8

$Z        setParam            _____Th_phase                 `GetParam $xci/tangente_hyperbolique$X phase`

$Z        setParam            _____Th_SeuilInferieur        6

$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("$xci/acces$X
$c                                                     A=$_____ImageT2.%04d
$c                                                     convertir=VRAI
$c                                                                                                                      $formatI  |
$c                                              $xci/normalise.01$X
$c                                                     origine=-1 extremite=+1
$c                                                                                                                      $formatI  |
$c                                              $xci/tangente_hyperbolique$X
$c                                                     standard=FAUX
$c                                                     cx=0 cy=0 ct=0 cn=$_____Th_cn phase=$_____Th_phase
$c                                                                                                                      $formatI  |
$c                                              $xci/acces$X
$c                                                     standard=FAUX zero=FAUX
$c                                                                                                                      $formatI  |
$c                                              $xci/passe_bande$X
$c                                                     forcer_niveau_intermediaire=VRAI
$c                                                     niveau_intermediaire=$BLANC
$c                                                     seuil_inferieur=`calcul $GRIS_8-$_____Th_SeuilInferieur`
$c                                                     seuil_superieur=`calcul $GRIS_8`
$c                                                     R=$_____ImageT1.%04d
$c                                                                                                                      $formatI\n"
$c                                            ,n
$c                                            ,n
$c                                             );
$c                                      }
$c                            }