#######################################################################################################################################
#                                                                                                                                     #
#         A C C U M U L A T I O N S   D ' U N E   S E Q U E N C E   D ' I M A G E S  :                                                #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiird/.MORL.1.11.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20030417103533).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____Seuil                    $GRIS_6

$Z                  SET                 Premiere=1
$Z                  SET                 Derniere=512

$Z                  $xci/accumule.01$X                                                                                                  \
$Z                                      A=$_____imageA.                                                                                 \
$Z                                      premiere=$Premiere derniere=$Derniere                                                           \
$Z                                      maximum=VRAI                                                                                    \
$Z                                      lineaire=VRAI depart=0.0 arrivee=1.0                                                            \
$Z                                      R=$_____imageR.1                                                                                \
$Z                                                                                                  $formatI

$c                  #define   N0        Premiere
$c                  #define   N         Derniere
$c
$c                  int       main()
$c                            {
$c                            int       n;
$c
$c                            for       (n=N0 ; n<=N ; n++)
$c                                      {
$c                                      printf("$xci/format.01$X
$c                                                             A=$_____imageA.%04d
$c                                                                                                $formatI
$c                                                             mode=7
$c                                                             R=$xTV/SEQUENCE.%04d
$c                                                                                                $formatR_Sdu\n"
$c                                            ,n
$c                                            ,n
$c                                             );
$c                                      }
$c                            }

$Z                  Sdu

$Z                  $xci/accumule.02$X                                                                                                  \
$Z                                      A=$xTV/SEQUENCE.                                                                                \
$Z                                      premiere=$Premiere derniere=$Derniere                                                           \
$Z                                      seuil=$_____Seuil                                                                               \
$Z                                      trx=0.0005 try=0.0001                                                                           \
$Z                                      R=$xTV/ACCUMULE.2                                                                               \
$Z                                                                                                  $formatI

$Z                  $xci/format.01$X                                                                                                    \
$Z                                      A=$xTV/ACCUMULE.2                                                                               \
$Z                                                                                                  $formatI                            \
$Z                                      mode=7                                                                                          \
$Z                                      R=$_____imageR.2                                                                                \
$Z                                                                                                  $formatR_Pal

$Z                  $xci/gauss$X                                                                                                        \
$Z                                      R=$xTV/GAUSS                                                                                    \
$Z                                                                                                  $formatI

$Z                  $xci/accumule.02$X                                                                                                  \
$Z                                      A=$xTV/SEQUENCE.                                                                                \
$Z                                      premiere=$Premiere derniere=$Derniere pas=32                                                    \
$Z                                      seuil=$_____Seuil                                                                               \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/filtre.01$X                                                                                                    \
$Z                                      N=$xTV/GAUSS                                                                                    \
$Z                                      seuil=$GRIS_6                                                                                   \
$Z                                      R=$_____imageR.2.1                                                                              \
$Z                                                                                                  $formatI

$Z                  $xci/format.01$X                                                                                                    \
$Z                                      A=$_____imageR.2.1                                                                              \
$Z                                                                                                  $formatI                            \
$Z                                      mode=2                                                                                          \
$Z                                      R=$_____imageR.2.1                                                                              \
$Z                                                                                                  $formatR_Pal

$Z                  $xci/init$X                                                                                                         \
$Z                                      n=$BLANC                                                                                        \
$Z                                      R=$xTV/TEXTURE                                                                                  \
$Z                                                                                                  $formatI

$Z                  $xci/acces$X                                                                                                        \
$Z                                      A=$xiird/MORL.11.2.1                                                                            \
$Z                                      convertir=VRAI                                                                                  \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/normalise.01$X                                                                                                 \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/lissage$X                                                                                                      \
$Z                                      standard=FAUX                                                                                   \
$Z                                      passes=64                                                                                       \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/montagne.01$X                                                                                                  \
$Z                                      standard=FAUX                                                                                   \
$Z                                      zero=FAUX                                                                                       \
$Z                                      avion=VRAI                                                                                      \
$Z                                      T=$xTV/TEXTURE                                                                                  \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/vraies_C$X                                                                                                     \
$Z                                      p=$xiP/gris.01                                                                                  \
$Z                                      RVB=VRAI                                                                                        \
$Z                                      R=$xTV/CHAMP_1                                                                                  \
$Z                                                                                                  $formatI

$Z                  $xci/vraies_C$X                                                                                                     \
$Z                                      A=$xiird/MORL.11.2.1                                                                            \
$Z                                      p=$xiP/roug7_jaun7                                                                              \
$Z                                      RVB=VRAI                                                                                        \
$Z                                      R=$xTV/CHAMP_2                                                                                  \
$Z                                                                                                  $formatI

$Z                  $xci/gauss$X                                                                                                        \
$Z                                      c=4                                                                                             \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/substitue$X                                                                                                    \
$Z                                      p=$xiP/gris.08                                                                                  \
$Z                                      substitution=L_SUBSTITUTION_ROUGE                                                               \
$Z                                      R=$xTV/PONDERATEUR                                                                              \
$Z                                                                                                  $formatI

$Z                  eval                `$xci/genere$X                                                                                \\\
$Z         commande='($xci/interpole.02$X A1=$xTV/CHAMP_1$%s A2=$xTV/CHAMP_2$%s P=$xTV/PONDERATEUR R=$_____imageR.2.2$%s $formatI)'   \\\
$Z                                                           en_tete=FAUX RVB=VRAI postfixes_RVB=FAUX separateur=VRAI`

$Z                  eval                `$xci/genere$X                                                                                \\\
$Z                             commande='($xci/format.01$X A=$_____imageR.2.2$%s $formatI mode=2 R=$_____imageR.2.2$%s $formatR_Pal)' \\\
$Z                                                           en_tete=FAUX RVB=VRAI postfixes_RVB=FAUX separateur=VRAI`



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