#######################################################################################################################################
#                                                                                                                                     #
#         M O D U L E  :                                                                                                              #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.PART.4.14.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        setParam            _____ElargissementX           0
$Z                                      # Introduit le 20120814192235 afin de pouvoir generer des structures sortant du cadre carre   #
$Z                                      # par defaut...                                                                               #

$Z        setParam            _____GraineX                  314
$Z                                      # Introduit le 20141123093934...                                                              #

$Z        setParam            _____GraineY                  271
$Z                                      # Introduit le 20141123093934...                                                              #

$Z        setParam            _____GraineZ                  1789
$Z                                      # Introduit le 20141123093934...                                                              #

$Z        set       Min_XYZ=0.0
$Z        set       Max_XYZ=1.0

$Z        set       Min_X=`calcul $Min_XYZ-$_____ElargissementX`
$Z        set       Max_X=`calcul $Max_XYZ+$_____ElargissementX`
$Z                                      # Introduits le 20120814192235...                                                             #

$Z        $xci/valeurs_alea$X premiere=1 derniere=$NpartS2                                                                              \
$Z                            graine=$_____GraineX  inf=$Min_X sup=$Max_X                                                               \
$Z                            entiers=FAUX                                                                                              \
$Z                            | $AW ' { print $1 "\n" $1 } '                                                                            \
$Z                                                                                                  > $xTV/COORDONNEES$COORD_X
$Z        decaleC             $xTV/COORDONNEES$COORD_X      1

$Z        set       Min_Y=$Min_XYZ
$Z        set       Max_Y=$Max_XYZ
$Z                                      # Introduits le 20120814192235...                                                             #

$Z        $xci/valeurs_alea$X premiere=1 derniere=$NpartS2                                                                              \
$Z                            graine=$_____GraineY  inf=$Min_Y sup=$Max_Y                                                               \
$Z                            entiers=FAUX                                                                                              \
$Z                            | $AW ' { print $1 "\n" $1 } '                                                                            \
$Z                                                                                                  > $xTV/COORDONNEES$COORD_Y
$Z        decaleC             $xTV/COORDONNEES$COORD_Y      1

$Z        set       Min_Z=$Min_XYZ
$Z        set       Max_Z=$Max_XYZ
$Z                                      # Introduits le 20120814192235...                                                             #

$Z        $xci/valeurs_alea$X premiere=1 derniere=$NpartS2                                                                              \
$Z                            graine=$_____GraineZ inf=$Min_Z sup=$Max_Z                                                                \
$Z                            entiers=FAUX                                                                                              \
$Z                            | $AW ' { print $1 "\n" $1 } '                                                                            \
$Z                                                                                                  > $xTV/COORDONNEES$COORD_Z
$Z        decaleC             $xTV/COORDONNEES$COORD_Z      1



Copyright © Jean-François Colonna, 2019-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2019-2021.