#######################################################################################################################################
#                                                                                                                                     #
#         V I S U A L I S A T I O N   D E   L A   S U R F A C E   " F A N T O M A T I Q U E "                                         #
#         D U   M I L I E U   D E   P R O P A G A T I O N   C O R R E S P O N D A N T                                                 #
#         A   L A   C A R T E   D E   D E N S I T E   T R I D I M E N S I O N N E L L E                                               #
#         D E S   B R O N C H I O L E S   T E R M I N A L E S   D E S   P O U M O N S                                                 #
#         A V E C   A J U S T E M E N T   A U T O M A T I Q U E  :                                                                    #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiird/.ACIN.L.12.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  SETParam            _____Attenuation              0.30

$Z                  SETParam            _____Translation              $GRIS_1

$Z                  SETParam            _____Points                   121

$Z                  $xci/scale$X                                                                                                        \
$Z                                      A=$_____imagesS                                                                                 \
$Z                                      a=$_____Attenuation                                                                             \
$Z                                      b=$_____Translation                                                                             \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/convol.01$X                                                                                                    \
$Z                                      points=$_____Points                                                                             \
$Z                                      R=$xTV/SURFACE                                                                                  \
$Z                                                                                                  $formatI

$Z                  eval                `$xci/genere$X                                                                                \\\
$Z                                                           commande='($xci/neutre$X  A=$xTV/SURFACE R=$xTV/SURFACE$%s $formatI)'    \\\
$Z                                                           en_tete=FAUX RVB=VRAI postfixes_RVB=FAUX separateur=VRAI`