#######################################################################################################################################
#                                                                                                                                     #
#         V I S U A L I S A T I O N   D E   L ' A C I N U S   P U L M O N A I R E  :                                                  #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiird/.ACIN.Y1.4.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20160222104924).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                                      $xrv/normalise.01$X                                                                             \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier=$FDoNnEeSL.FLength___                                               \
$Z                                                          forcer_extrema=VRAI                                                         \
$Z                                                          minimum_force=$MinimumL____                                                 \
$Z                                                          maximum_force=$MaximumL____                                                 \
$Z                                                          origine=0                                                                   \
$Z                                                          extremite=1                                                           |     \
$Z                                      $xrv/accumule.01$X                                                                              \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier==                                                             |     \
$Z                                      $xrv/MUL2.11$X                                                                                  \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier1=$_____FCoordonneeX                                                 \
$Z                                                          fichier2==                                                                  \
$Z                                                                                        >   $FPoInTs$COORD_X

$Z                                      set                 DeLtAY=0.15
$Z                                      set                 CoOrDoNnEeY=0.5
$Z                                      set                 CoOrDoNnEeY_Data2=`calcul $CoOrDoNnEeY-$DeLtAY`
$Z                                      set                 CoOrDoNnEeY_Data1=`calcul $CoOrDoNnEeY+$DeLtAY`
$Z                                      set                 CoOrDoNnEeZ=0.5

$Z                                      $xrv/neutre$X                                                                                   \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier=$CoOrDoNnEeY_Data1                                                  \
$Z                                                                                        >   $FPoInTs$_____PostFixeData1$COORD_Y

$Z                                      $xrv/neutre$X                                                                                   \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier=$CoOrDoNnEeY_Data2                                                  \
$Z                                                                                        >   $FPoInTs$_____PostFixeData2$COORD_Y

$Z                                      $xrv/neutre$X                                                                                   \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier=$CoOrDoNnEeZ                                                        \
$Z                                                                                        >   $FPoInTs$COORD_Z

$Z                                      execRVB             $xci/neutre$X                                                               \
$Z                                                                              A=$xTV/MIRE%s                                           \
$Z                                                                              R=$_____ImageR.$TeMpS%s                                 \
$Z                                                                                                                      $formatI

$Z                                      set                 NExEmPlaiReS=1