#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T E U R   D E   C O T E S   T R I D I M E N S I O N N E L L E S   E T   E R O S I O N  :                        #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.COT3.11.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  if                  ($?Premiere == $NEXIST) then
$Z                                      SET                 Premiere=0
$Z                  else
$Z                  endif

$Z                  if                  ($?Derniere == $NEXIST) then
$Z                                      SET                 Derniere=15
$Z                  else
$Z                  endif

$Z                  Pal