#######################################################################################################################################
#                                                                                                                                     #
#         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                                                 #
#         E N   F O R M E   D E   F L O C O N   D E   N E I G E   T R O N Q U E  :                                                    #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xivP/disk.000000009/face.2/.REFN.1.23.$U' :                                                                                    #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20070606140944).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  Std

$Z                  $xrc/Cfract_2D.01$X                                                                                                 \
$Z                                      c00=VRAI a00=0                                                                                  \
$Z                                      c01=VRAI a01=+$pis2                                                                             \
$Z                                      c02=VRAI a02=-$pis2                                                                             \
$Z                                      c03=VRAI a03=-$pis2                                                                             \
$Z                                      c04=VRAI a04=0                                                                                  \
$Z                                      c05=VRAI a05=+$pis2                                                                             \
$Z                                      c06=VRAI a06=+$pis2                                                                             \
$Z                                      c07=VRAI a07=-$pis2                                                                             \
$Z                                      rapport=4                                                                                       \
$Z                                      argument=FAUX                                                                                   \
$Z                                      niveau=$BLANC                                                                                   \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/dilate.01$X                                                                                                    \
$Z                                      points=81                                                                                       \
$Z                                      R=$xTV/BOITE.41                                                                                 \
$Z                                      $formatI
$Z
$Z                  $xci/rotate$X                                                                                                       \
$Z                                      A=$xTV/BOITE.41                                                                                 \
$Z                                      angle=$pis2                                                                                     \
$Z                                      R=$xTV/BOITE.51                                                                                 \
$Z                                      $formatI
$Z
$Z                  $xci/format.01$X                                                                                                    \
$Z                                      A=$xTV/BOITE.41                                                                                 \
$Z                                      $formatI                                                                                        \
$Z                                      mode=7                                                                                          \
$Z                                      R=$xTV/BOITE.41                                                                                 \
$Z                                      $formatR_Sdu
$Z                  $xci/format.01$X                                                                                                    \
$Z                                      A=$xTV/BOITE.51                                                                                 \
$Z                                      $formatI                                                                                        \
$Z                                      mode=7                                                                                          \
$Z                                      R=$xTV/BOITE.51                                                                                 \
$Z                                      $formatR_Sdu

$Z                  Sdu

$Z                  $xci/gauss$X                                                                                                        \
$Z                                      R=$xTV/GAUSS                                                                                    \
$Z                                      $formatI
$Z
$Z                  $xci/move$X                                                                                                         \
$Z                                      A=$xTV/BOITE.41                                                                                 \
$Z                                      yR=+0.25                                                                                        \
$Z                                      R=$xTV/BOITE.411                                                                                \
$Z                                      $formatI
$Z                  $xci/move$X                                                                                                         \
$Z                                      A=$xTV/BOITE.41                                                                                 \
$Z                                      yR=-0.25                                                                                        \
$Z                                      R=$xTV/BOITE.412                                                                                \
$Z                                      $formatI
$Z
$Z                  $xci/move$X                                                                                                         \
$Z                                      A=$xTV/BOITE.51                                                                                 \
$Z                                      xR=+0.25                                                                                        \
$Z                                      R=$xTV/BOITE.511                                                                                \
$Z                                      $formatI
$Z                  $xci/move$X                                                                                                         \
$Z                                      A=$xTV/BOITE.51                                                                                 \
$Z                                      xR=-0.25                                                                                        \
$Z                                      R=$xTV/BOITE.512                                                                                \
$Z                                      $formatI
$Z
$Z                  $xci/or_02$X                                                                                                        \
$Z                                      A1=$xTV/BOITE.411                                                                               \
$Z                                      A2=$xTV/BOITE.412                                                                               \
$Z                                      R=$xTV/BOITE.42                                                                                 \
$Z                                      $formatI
$Z                  $xci/or_02$X                                                                                                        \
$Z                                      A1=$xTV/BOITE.511                                                                               \
$Z                                      A2=$xTV/BOITE.512                                                                               \
$Z                                      R=$xTV/BOITE.52                                                                                 \
$Z                                      $formatI
$Z
$Z                  $xci/or_02$X                                                                                                        \
$Z                                      A1=$xTV/BOITE.42                                                                                \
$Z                                      A2=$xTV/BOITE.52                                                                                \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/filtre.01$X                                                                                                    \
$Z                                      N=$xTV/GAUSS                                                                                    \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/complement$X                                                                                                   \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/seuil$X                                                                                                        \
$Z                                      seuil=$GRIS_3                                                                                   \
$Z                                      R=$xTV/BOITE.11                                                                                 \
$Z                                      $formatI
$Z
$Z                  $xci/format.01$X                                                                                                    \
$Z                                      A=$xTV/BOITE.11                                                                                 \
$Z                                      $formatI                                                                                        \
$Z                                      mode=7                                                                                          \
$Z                                      R=$xTV/BOITE.6                                                                                  \
$Z                                      $formatR_Pal
$Z                                      # On utilise "mode=7" et non pas "mode=0" afin que le flocon de neige soit le plus grand      #
$Z                                      # possible...                                                                                 #

$Z                  Std

$Z                  $xci/complement$X                                                                                                   \
$Z                                      A=$xiio/SPIRALE                                                                                 \
$Z                                      $formatI                                                                                  |     \
$Z                  $xci/seuil$X                                                                                                        \
$Z                                      seuil=$GRIS_1                                                                                   \
$Z                                      R=$xTV/BOITE.21                                                                                 \
$Z                                      $formatI
$Z
$Z                  $xci/format.01$X                                                                                                    \
$Z                                      A=$xTV/BOITE.21                                                                                 \
$Z                                      $formatI                                                                                        \
$Z                                      mode=0                                                                                          \
$Z                                      R=$xTV/BOITE.31                                                                                 \
$Z                                      $formatR_Pal

$Z                  Pal

$Z                  $xci/and$X                                                                                                          \
$Z                                      A1=$xTV/BOITE.6                                                                                 \
$Z                                      A2=$xTV/BOITE.31                                                                                \
$Z                                      R=$xTV/BOITE.6                                                                                  \
$Z                                      $formatI
$Z                                      # Ainsi on "ferme" le flocon de neige, qui sinon, a cause du "mode=7" ci-dessus (dans un      #
$Z                                      # '$xci/format.01$X') serait "ouvert"...                                                      #