#######################################################################################################################################
#                                                                                                                                     #
#         I N I T I A L I S A T I O N   S U R   U N E   D E M I _ L U N E   P O U R   L A                                             #
#         D E F I N I T I O N   D ' U N   O R N E M E N T   D E   Y O U R T E   F U N E R A I R E                                     #
#         E N   V E R S I O N   R E C U R S I V E  :                                                                                  #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.YOUF.31.0.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, 20070724124947).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____Cubique                  VRAI

$Z                  setParam            _____Etages                   4

$Z                  setParam            _____Reduction                2

$Z                  setParam            _____Z0                       0
$Z                                      # Parametre introduit le 20070723101924...                                                    #

$Z                  setParam            _____MinROUGE                 $BLANC

$Z                  setParam            _____MaxROUGE                 $BLANC

$Z                  setParam            _____MinVERTE                 $BLANC

$Z                  setParam            _____MaxVERTE                 $BLANC

$Z                  setParam            _____MinBLEUE                 $BLANC

$Z                  setParam            _____MaxBLEUE                 $BLANC

$Z                  setParam            _____Graine                   1789

$Z                  setParam            _____DGraine                  1111

$Z                  setParam            _____Zoom                     1
$Z                                      # Parametre introduit le 20070723094618...                                                    #

#20250211120511____:$Z                  setenv    LONGUEUR_NOMS 60                                                                    #
$Z                  set       PrecisionCalcul=4
$Z                                      # Parametrage general...                                                                      #

$Z                  FileTmpB  FPoint1
$Z                                      # Definition du "premier etage" (et qui sera ensuite mis a jour autosimilairement au cours    #
$Z                                      # des iterations) :                                                                           #