#######################################################################################################################################
#                                                                                                                                     #
#         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.22.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  SETParam            _____Attenuation              0.30

$Z                  SETParam            _____Translation              $GRIS_1

$Z                  SETParam            _____Points1                  121

$Z                  SETParam            _____Points2                  9

$Z                  SETParam            _____Seuil                    4

$Z                  SETParam            _____Points3                  81

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

$Z                  $xci/convol.01$X                                                                                                    \
$Z                                      A=$_____imagesS                                                                                 \
$Z                                      points=$_____Points1                                                                            \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/convol.05$X                                                                                                    \
$Z                                      contours=VRAI                                                                                   \
$Z                                      points=$_____Points2                                                                            \
$Z                                      seuil=$_____Seuil                                                                               \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/convol.01$X                                                                                                    \
$Z                                      points=$_____Points3                                                                            \
$Z                                                                                                  $formatI                      |     \
$Z                  $xci/acces$X                                                                                                        \
$Z                                      renormaliser=VRAI                                                                               \
$Z                                      R=$xTV/SURFACE.2                                                                                \
$Z                                                                                                  $formatI

$Z                  $xci/vitre.51$X     A=$xTV/SURFACE.1 V=$xTV/SURFACE.2 R=$xTV/SURFACE            $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`



Copyright © Jean-François Colonna, 2019-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2019-2021.