#######################################################################################################################################
#                                                                                                                                     #
#         R E D U C T I O N   S A N S   E P A I S S I S S E M E N T   E T   S A N S   M O Y E N N A G E                               #
#         D ' U N E   S E Q U E N C E   E N   F A U S S E S   C O U L E U R S  :                                                      #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xivP/disk.000000009/face.2/.ITER.1.12.$U' :                                                                                    #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        set       OpTiOnS_ReDuCtIoN="moyenne=FAUX dilater=FAUX"
$Z                                      # Options introduites sous cette forme le 20120305135728...                                   #

$Z        $xci/reduction_16$X A=$_____images. premiere=$Premiere derniere=$Derniere                                                     \
$Z                            calculer=VRAI                                                                                             \
$Z                            $OpTiOnS_ReDuCtIoN                                                                                        \
$Z                            R=$_____animation$R16                                                                                     \
$Z                            $formatI

#20120720181227____:$Z        ro                  $_____animation$R16                                                                 #
#20120720181227____:$Z        $xcg/unite$Z        $_____animation$R16                                                                 #

$Z        SET       Nombre=$UNDEF
$Z                                      # Pour eviter des problemes de generation avec 'listN' avec les 'if(...)' qui suivent...      #
$Z        @         Nombre = $Derniere - $Premiere
$Z        @         Nombre = $Nombre + 1

$Z        if        ($Nombre < 0) then
$Z                  @         Nombre = 0 - $Nombre
$Z        else
$Z        endif

$Z        if        ($Nombre >= 64) then
$Z                  $xci/reduction_64$X A=$_____images. premiere=$Premiere derniere=$Derniere                                           \
$Z                                      calculer=VRAI                                                                                   \
$Z                                      $OpTiOnS_ReDuCtIoN                                                                              \
$Z                                      R=$_____animation$R64                                                                           \
$Z                                      $formatI
$Z
#20120720181227____:$Z                  ro                  $_____animation$R64                                                       #
#20120720181227____:$Z                  $xcg/unite$Z        $_____animation$R64                                                       #
$Z        else
$Z        endif