#######################################################################################################################################
#                                                                                                                                     #
#         R E C A L C U L   D E S   S E C T I O N S   D ' U N   F R A C T A L  :                                                      #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiac/.MANF.D4.5.$U' :                                                                                           #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20210417103122).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____Nota                     $xiirc/$Fnota

$Z                  setParam            _____FormatA                  "Sdu"

$Z                  setParam            _____FormatR                  "Sud"

$Z                  setParam            _____NIHorizontales           4

$Z                  setParam            _____NIVerticales             4

$Z                  setParam            _____Postfixe                 $R16

$Z                  set                 NImAgEs=`calculINS $_____NIHorizontales*$_____NIVerticales`

$Z                  FilSTmpB            FNoTaT
$Z                                      # Definition du '$Fnota' qui va contenir le '$Z' de generation de l'animation...              #

$Z                  set                 DeBuT_S='Debut_listG_MANF_D4_5_sequence'
$Z                  set                 FiN___S='Fin_listG_MANF_D4_5_sequence'

$Z                  echo                "#    :""$DeBuT_S"":                                                                 #"         \
$Z                                                                                                                      >> $FNoTaT

$Z                  (listMN              $_____Nota ":"$_____Debut":" ":"$_____Fin__":")                                          |     \
$Z                  $SE                  -e "s/ $_____FormatA / $_____FormatR /"                                                        \
$Z                                       -e "s/\(SET       cDerniere=\)[^ ][^ ]* /\1$NImAgEs/"                                          \
$Z                                                                                                                      >> $FNoTaT
$Z                                      # Recuperation de la sequence originale de generation de l'animation en reduisant quelques    #
$Z                                      # parametres (le format et le nombre d'images)...                                             #

$Z                  set                 DeBuT_L='# $Z '
$Z                  set                 FiN___L='  #'

$Z                  set                 PaS=1
$Z                  set                 ChIfFrEs=`GetParam $xci/regroupe.01$X chiffres`

$Z                  echo                "$DeBuT_L"'$xci/regroupe.02$Z                                                     \\'"$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L"'                    $_____ImageT2.                                     \\'"$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L""                    $_____animation$_____Postfixe                      \\""$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L"'                    $cPremiere '"$PaS                                  \\""$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L""                    $_____NIHorizontales $_____NIVerticales            \\""$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L""                    $K_QD$K_DOLLAR""K_VIDE$K_QD                        \\""$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L""                    $K_QD$K_DOLLAR""formatR_$_____FormatA$K_QD         \\""$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L""                    $ChIfFrEs                                          \\""$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                  echo                "$DeBuT_L""                    FAUX                                                 ""$FiN___L" \
$Z                                                                                                                      >> $FNoTaT
$Z                                      # Mise en place des instructions de regroupement des differentes images generees...           #

$Z                  echo                "#    :""$FiN___S"":                                                             #"             \
$Z                                                                                                                      >> $FNoTaT

$Z                  $DELETE             $xTV/$Fnota
$Z                  $CP                 $FNoTaT $xTV/$Fnota

$Z                  FilSTmpE            FNoTaT

$Z                  xTV

$Z                  set                 FScRiPt=`(glistN              $DeBuT_S) | $GRE '\$Z$'`
$Z                  eval                $FScRiPt
$Z                                      # Generation des images et regroupement...                                                    #

$Z                  eval                $DELETE             $FScRiPt
$Z                                      # Introduit le 20210418122119...                                                              #

$Z                  $DELETE             $xTV/$Fnota