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

$Z                  unsetenv            PremiereA
$Z                  unsetenv            DerniereA

$Z                  if                  ($?tPremiereA == $NEXIST) then
$Z                                      # Test introduit le 20160308100913 par symetrie avec celui de '$tDerniereA'...                #
$Z                                      SET                 tPremiereA=1
$Z                  else
$Z                  endif

$Z                  if                  ($?tDerniereA == $NEXIST) then
$Z                                      # Introduit le 20070410074137 pour 'v $xiak/$Fnota Debut_listG_REFN_11'...                    #
#20150220180838____:$Z                                      SET                 tDerniereA=0512                                       #
$Z                                      SET                 tDerniereA=512
$Z                  else
$Z                  endif
$Z
$Z                  EVAL                NimagesA = $tDerniereA - $tPremiereA
$Z                  EVAL                NimagesA = $NimagesA + 1
$Z
#20150220152539____:$Z                  set                 Premiere=$tPremiereA                                                      #
#20150220152539____:$Z                  set                 Derniere=$tDerniereA                                                      #
$Z
$Z                  SET                 Premiere=$tPremiereA
$Z                  SET                 Derniere=$tDerniereA
$Z
$Z                  SETENV              PremiereA $tPremiereA
$Z                  SETENV              DerniereA $tDerniereA

$X                  echo                "neutre"
$X                                      # commande destinee uniquement a mettre a jour l'environnement 'env'...                       #

#20150220133218____:$Z                  Pal                                                                                           #



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