#######################################################################################################################################
#                                                                                                                                     #
#         V I S U A L I S A T I O N   D E S   P R E M I E R E S   D E C I M A L E S   D E   P I                                       #
#         C O M M E   U N E   M A R C H E   A L E A T O I R E   E N   C O O R D O N N E E S   P O L A I R E S  :                      #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.PIPO.11.4.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20131115171707).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____RotationX                `GetParam $xrv/particule.10$X ROTATION_OX`
$Z                                      # Parametre introduit le 20131211105451...                                                    #

$Z                  setParam            _____RotationY                `GetParam $xrv/particule.10$X ROTATION_OY`
$Z                                      # Parametre introduit le 20131211105451...                                                    #

$Z                  setParam            _____RotationZ                `GetParam $xrv/particule.10$X ROTATION_OZ`
$Z                                      # Parametre introduit le 20131211105451...                                                    #

$Z                  set                 ArGuMeNtS="$K_VIDE"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" AXYZ=1 BXYZ=0"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" Lz=1000"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" ZOOM=$_____Zoom"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" ROTATION_OX=$_____RotationX"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" ROTATION_OY=$_____RotationY"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" ROTATION_OZ=$_____RotationZ"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" N_au_carre=FAUX"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" editer_extrema_hors=FAUX"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" editer_mauvais_encadrement_niveaux_interpoles=FAUX"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" $_____ParticulePara2"
$Z                  set                 ArGuMeNtS="$ArGuMeNtS"" chiffres=0"

$Z                  $xrv/particule.10$X npoints=$NPoInTs                                                                                \
$Z                                      LISTE_X=$FiLePoInTs$COORD_X                                                                     \
$Z                                      LISTE_Y=$FiLePoInTs$COORD_Y                                                                     \
$Z                                      LISTE_Z=$FiLePoInTs$COORD_Z                                                                     \
$Z                                      isoles=FAUX chainer=VRAI                                                                        \
$Z                                      ajuster_points=VRAI equidistance=VRAI                                                           \
$Z                                      distance_minimale=$_____DistanceMini                                                            \
$Z                                      Vrayon=$_____VRayon                                                                             \
$Z                                      LISTE_NIVEAU=$FiLePoInTs.Niveau                                                                 \
$Z                                      p=$_____Palette                                                                                 \
$Z                                      $ArGuMeNtS                                                                                      \
$Z                                      R=$_____ImageR                                                                                  \
$Z                                                                              $formatI

$Z                  $xrv/particule.10$X npoints=$NPoInTs                                                                                \
$Z                                      LISTE_X=$FiLePoInTs$COORD_X                                                                     \
$Z                                      LISTE_Y=$FiLePoInTs$COORD_Y                                                                     \
$Z                                      LISTE_Z=$FiLePoInTs$COORD_Z                                                                     \
$Z                                      isoles=VRAI                                                                                     \
$Z                                      Vrayon=`calcul 1.0*$_____VRayon`                                                                \
$Z                                      LISTE_ROUGE=$GRIS_6                                                                             \
$Z                                      LISTE_VERTE=$GRIS_6                                                                             \
$Z                                      LISTE_BLEUE=$GRIS_6                                                                             \
$Z                                      fond=VRAI F=$_____ImageR                                                                        \
$Z                                      $ArGuMeNtS                                                                                      \
$Z                                      R=$_____ImageR                                                                                  \
$Z                                                                              $formatI

$Z                  $xrv/particule.10$X npoints=1                                                                                       \
$Z                                      LISTE_X=$_XYZ                                                                                   \
$Z                                      LISTE_Y=$_XYZ                                                                                   \
$Z                                      LISTE_Z=$_XYZ                                                                                   \
$Z                                      isoles=VRAI                                                                                     \
$Z                                      Vrayon=`calcul 1.5*$_____VRayon`                                                                \
$Z                                      LISTE_ROUGE=$BLANC                                                                              \
$Z                                      LISTE_VERTE=$BLANC                                                                              \
$Z                                      LISTE_BLEUE=$BLANC                                                                              \
$Z                                      fond=VRAI F=$_____ImageR                                                                        \
$Z                                      $ArGuMeNtS                                                                                      \
$Z                                      R=$_____ImageR                                                                                  \
$Z                                                                              $formatI

$Z                  unset               ArGuMeNtS="$K_VIDE"