#######################################################################################################################################
#                                                                                                                                     #
#         C A L C U L   D ' U N E   D E N S I T E  :                                                                                  #
#                                                                                                                                     #
#                                                                                                                                     #
#         Nota :                                                                                                                      #
#                                                                                                                                     #
#                     Le 20170727112504, je rappelle qu'une                                                                           #
#                   version simplifiee (sans le calcul de la                                                                          #
#                   densite par 'v $xci/densite_3D.11$K') de ce                                                                       #
#                   fichier est 'v $xiirf/.MENG.22.2.$U'.                                                                             #
#                                                                                                                                     #
#                                                                                                                                     #
#         Nota :                                                                                                                      #
#                                                                                                                                     #
#                     Le 20170727113701, je note que le mode                                                                          #
#                   "standardR=VRAI" donne des resultats plus                                                                         #
#                   "granuleux" que le mode "standardR=FAUX"                                                                          #
#                   (qui correspond a 'v $xiirc/.MANE.41.2.$U').                                                                      #
#                   C'est pourquoi, a cette date, ce '$U' n'est                                                                       #
#                   pas utilise...                                                                                                    #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.FRB3.z4.6.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20170727112504).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  SET       _____Standard=VRAI

$Z                  else
$Z                  endif

$Z                  setParam            _____IncompletDZ              FAUX

$Z                  setParam            _____DxDyDz                   2

$Z                  setParam            _____SuperEchelle             `GetParam $xci/densite_3D.11$X super_echelle`

$Z                  setParam            _____DRotation                FAUX

$Z                  setParam            _____DRotationX               0

$Z                  setParam            _____DRotationY               0

$Z                  setParam            _____InterpolerD              VRAI

$Z                  setParam            _____LineaireD                VRAI

$Z                  setParam            _____EpsilonAxes              `GetParam $xci/densite_3D.11$X EpsilonAxes`

$Z                  $xci/densite_3D.11$X                                                                                                \
$Z                                      A=$_____ImageT1.                                                                                \
$Z                                      incomplet_Z=$_____IncompletDZ                                                                   \
$Z                                      standardA=VRAI                                                                                  \
$Z                                      standardR=$_____Standard                                                                        \
$Z                                      premiere=$cPremiere                                                                             \
$Z                                      Zmin=`calcul $cPremiere-$cPremiere`                                                             \
$Z                                      Zmax=`calcul $cDerniere-$cPremiere`                                                             \
$Z                                      dx=$_____DxDyDz dy=$_____DxDyDz dz=$_____DxDyDz                                                 \
$Z                                      super_echelle=$_____SuperEchelle                                                                \
$Z                                      rotation=$_____DRotation                                                                        \
$Z                                      ROTATION_OX=$_____DRotationX                                                                    \
$Z                                      ROTATION_OY=$_____DRotationY                                                                    \
$Z                                      interpoler=$_____InterpolerD lineaire=$_____LineaireD                                           \
$Z                                      EpsilonAxes=$_____EpsilonAxes                                                                   \
$Z                                      Progression=VRAI                                                                                \
$Z                                      ChronometrerCommande=VRAI                                                                       \
$Z                                      R=$_____ImageTd.                                                                                \
$Z                                                                                                                      $formatI