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

$Z                  Std

$Z                  $xci/complement$X                                                                                                   \
$Z                                      A=$xiio/SPIRALE                                                                                 \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/seuil$X                                                                                                        \
$Z                                      seuil=$SeuilBOITE                                                                               \
$Z                                      R=$xTV/BOITE.6                                                                                  \
$Z                                      $formatI

$Z                  set                 SeuilCENTRE=$GRIS_5

$Z                  $xci/complement$X                                                                                                   \
$Z                                      A=$xiio/SPIRALE                                                                                 \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/seuil$X                                                                                                        \
$Z                                      seuil=$SeuilCENTRE                                                                              \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/eor$X                                                                                                          \
$Z                                      A1=$xTV/BOITE.6                                                                                 \
$Z                                      R=$xTV/BOITE.6                                                                                  \
$Z                                      $formatI