#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D E S   P S E U D O - P R O J E C T I O N S   D ' U N E   M O N T A G N E   F R A C T A L E  :        #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirs/.PROK.W1.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, 20230420101627).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____Graine1                  1789
$Z                  setParam            _____Graine2                  1947
$Z                  setParam            _____Graine3                  2001

$Z                  $xci/fract_2D.01$X                                                                                                  \
$Z                                      graine=$_____Graine1                                                                            \
$Z                                      standard=FAUX                                                                                   \
$Z                                                                                                                      $formatI  |     \
$Z                  $xci/normalise.01$X                                                                                                 \
$Z                                      R=$xTV/FRACTAL$COORD_X                                                                          \
$Z                                                                                                                      $formatI

$Z                  $xci/fract_2D.01$X                                                                                                  \
$Z                                      graine=$_____Graine2                                                                            \
$Z                                      standard=FAUX                                                                                   \
$Z                                                                                                                      $formatI  |     \
$Z                  $xci/normalise.01$X                                                                                                 \
$Z                                      R=$xTV/FRACTAL$COORD_Y                                                                          \
$Z                                                                                                                      $formatI

$Z                  $xci/fract_2D.01$X                                                                                                  \
$Z                                      graine=$_____Graine3                                                                            \
$Z                                      standard=FAUX                                                                                   \
$Z                                                                                                                      $formatI  |     \
$Z                  $xci/normalise.01$X                                                                                                 \
$Z                                      R=$xTV/FRACTAL$COORD_Z                                                                          \
$Z                                                                                                                      $formatI

$Z                  $xci/lineaire$X                                                                                                     \
$Z                                      standard=FAUX                                                                                   \
$Z                                      carre_X_CHAMP_3D=FAUX carre_Y_CHAMP_3D=FAUX                                                     \
$Z                                      amplificateur=2 translateur=-1                                                                  \
$Z                                      Tx=0 carre_X_CHAMP_3D_____compatibilite_20100210=VRAI                                           \
$Z                                      Ty=0 carre_Y_CHAMP_3D_____compatibilite_20100210=VRAI                                           \
$Z                                      A=1 B=0 C=0                                                                                     \
$Z                                      R=$xTV/MIRE$COORD_X                                                                             \
$Z                                                                                                                      $formatI

$Z                  $xci/lineaire$X                                                                                                     \
$Z                                      standard=FAUX                                                                                   \
$Z                                      carre_X_CHAMP_3D=FAUX carre_Y_CHAMP_3D=FAUX                                                     \
$Z                                      amplificateur=2 translateur=-1                                                                  \
$Z                                      Tx=0 carre_X_CHAMP_3D_____compatibilite_20100210=VRAI                                           \
$Z                                      Ty=0 carre_Y_CHAMP_3D_____compatibilite_20100210=VRAI                                           \
$Z                                      A=0 B=1 C=0                                                                                     \
$Z                                      R=$xTV/MIRE$COORD_Y                                                                             \
$Z                                                                                                                      $formatI

$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      standard=FAUX                                                                                   \
$Z                                      A1=$xTV/MIRE$COORD_X                                                                            \
$Z                                      A2=$xTV/FRACTAL$COORD_X                                                                         \
$Z                                      R=$xTV/PROK$COORD_X                                                                             \
$Z                                                                                                                      $formatI

$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      standard=FAUX                                                                                   \
$Z                                      A1=$xTV/MIRE$COORD_Y                                                                            \
$Z                                      A2=$xTV/FRACTAL$COORD_Y                                                                         \
$Z                                      R=$xTV/PROK$COORD_Y                                                                             \
$Z                                                                                                                      $formatI

$Z                  $xci/gauss$X                                                                                                        \
$Z                                      standard=FAUX                                                                                   \
$Z                                      c=2 cx2=0.5 cy2=1.0                                                                             \
$Z                                                                                                                      $formatI  |     \
$Z                  $xci/normalise.01$X                                                                                                 \
$Z                                                                                                                      $formatI  |     \
$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      standard=FAUX                                                                                   \
$Z                                      A2=$xTV/FRACTAL$COORD_Z                                                                         \
$Z                                                                                                                      $formatI  |     \
$Z                  $xci/normalise.01$X                                                                                                 \
$Z                                      origine=-1 extremite=+1                                                                         \
$Z                                      R=$xTV/PROK$COORD_Z                                                                             \
$Z                                                                                                                      $formatI