#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D E S   C O N D I T I O N S   I N I T I A L E S   ( M E R )                                           #
#         D U   G E N E R A T E U R   D E   C O T E S   B 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/.COT2.11.0.1.$U' :                                                                                        #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____NiveauMer                $BLANC

$Z                  setParam            _____SeuilMer                 $NOIR_PLANCHER
$Z                                      # Parametre introduit le 20040908133621...                                                    #

$Z                  Std

$Z                  $xci/transpose$X                                                                                                    \
$Z                                      A=$xiio/MIRE                                                                                    \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/Sx$X                                                                                                           \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/passe_bande$X                                                                                                  \
$Z                                      inf=$_____NiveauMer                                                                             \
$Z                                      sup=$BLANC                                                                                      \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/seuil$X                                                                                                        \
$Z                                      seuil=$_____SeuilMer                                                                            \
$Z                                      inferieur=$NOIR                                                                                 \
$Z                                      superieur=$BLANC                                                                                \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/format.01$X                                                                                                    \
$Z                                      mode=0                                                                                          \
$Z                                                                                                  $formatI                            \
$Z                                      R=$xTV/MER                                                                                      \
$Z                                                                                                                      $formatR_Pal

$Z                  Pal