#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N   A R B R E   A   P R I O R I   B I N A I R E  :                                              #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.TREE.C4.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20160306134719).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____RayonMin                 0.005

$Z                  setParam            _____RayonMax                 0.020

$Z                  set                 OrigineX=`GetParam $xci/valeurs_Arbre.01$X X1`
$Z                  set                 OrigineY=`GetParam $xci/valeurs_Arbre.01$X Y1`

$Z                  $xrv/SOUS.11$X      ne=$Nparticules_                                                                                \
$Z                                      fichier1=$LiStEPoInTs$COORD_X                                                                   \
$Z                                      fichier2=$OrigineX                                                                              \
$Z                                                                                                  >  $LiStEPoInTs.1$COORD_X

$Z                  $xrv/SOUS.11$X      ne=$Nparticules_                                                                                \
$Z                                      fichier1=$LiStEPoInTs$COORD_Y                                                                   \
$Z                                      fichier2=$OrigineY                                                                              \
$Z                                                                                                  >  $LiStEPoInTs.1$COORD_Y

$Z                  $xrv/XY_RT.01$X     ne=$Nparticules_                                                                                \
$Z                                      LISTE_X=$LiStEPoInTs.1$COORD_X                                                                  \
$Z                                      LISTE_Y=$LiStEPoInTs.1$COORD_Y                                                                  \
$Z                                      pRHO=1 pTHETA=0                                                                           |     \
$Z                  $xrv/normalise.01$X ne=0                                                                                            \
$Z                                      fichier==                                                                                       \
$Z                                      origine=$_____RayonMax                                                                          \
$Z                                      extremite=$_____RayonMin                                                                        \
$Z                                                                                                  >  $LiStEPoInTs$RAYON