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

$Z                                      $xrv/normalise.01$X                                                                             \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier=$FDoNnEeSL.FData1____                                               \
$Z                                                          forcer_extrema=VRAI                                                         \
$Z                                                          minimum_force=$MinimumData1                                                 \
$Z                                                          maximum_force=$MaximumData1                                                 \
$Z                                                          origine=$NOIR_PLANCHER                                                      \
$Z                                                          extremite=$BLANC                                                      |     \
$Z                                      $xrv/neutre$X                                                                                   \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier==                                                                   \
$Z                                                          ChiffresFlot=16                                                             \
$Z                                                          exemplaires_fichier=$NExEmPlaiReS                                           \
$Z                                                                                        >   $FPoInTs$_____PostFixeData1$NIVEAU
$Z                                      # On notera le 20160222154511 que l'introduction de ce '$xrv/neutre$X' ne fut pas "neutre"    #
$Z                                      # car, en effet, le nombre de decimales implicite est defini a l'entree de ce programme       #
$Z                                      # via 'v $xci/valeurs.03$I nombre_de_chiffres_des_editions_flottantes'. Pour introduire       #
$Z                                      # la "neutralite", il suffit d'ajouter ci-dessus :                                            #
$Z                                      #                                                                                             #
$Z                                      #                    ChiffresFlot=16                                                          #
$Z                                      #                                                                                             #
$Z                                      # comme argument de '$xrv/neutre$X'...                                                        #
$Z                                      #                                                                                             #
$Z                                      # L'emploi de '$NOIR_PLANCHER' est destine a permettre l'usage de palettes telle              #
$Z                                      # 'v $xiio/MIRE p=$xiP/trou_noir.G4' qui commencent par du '$NOIR'...                         #

$Z                                      $xrv/normalise.01$X                                                                             \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier=$FDoNnEeSL.FData2____                                               \
$Z                                                          forcer_extrema=VRAI                                                         \
$Z                                                          minimum_force=$MinimumData2                                                 \
$Z                                                          maximum_force=$MaximumData2                                                 \
$Z                                                          origine=$NOIR_PLANCHER                                                      \
$Z                                                          extremite=$BLANC                                                      |     \
$Z                                      $xrv/neutre$X                                                                                   \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier==                                                                   \
$Z                                                          ChiffresFlot=16                                                             \
$Z                                                          exemplaires_fichier=$NExEmPlaiReS                                           \
$Z                                                                                        >   $FPoInTs$_____PostFixeData2$NIVEAU
$Z                                      # Meme remarque que ci-dessus en ce qui concerne "ChiffresFlot="...                           #
$Z                                      #                                                                                             #
$Z                                      # L'emploi de '$NOIR_PLANCHER' est destine a permettre l'usage de palettes telle              #
$Z                                      # 'v $xiio/MIRE p=$xiP/bleu_blanc_rouge.12' qui commencent par du '$NOIR'...                  #

$Z                                      $xrv/normalise.01$X                                                                             \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier=$FDoNnEeSL.FDiameter_                                               \
$Z                                                          forcer_extrema=VRAI                                                         \
$Z                                                          minimum_force=$MinimumD____                                                 \
$Z                                                          maximum_force=$MaximumD____                                                 \
$Z                                                          origine=$_____mRayon                                                        \
$Z                                                          extremite=$_____MRayon                                                |     \
$Z                                      $xrv/neutre$X                                                                                   \
$Z                                                          ne=$Npart                                                                   \
$Z                                                          fichier==                                                                   \
$Z                                                          ChiffresFlot=16                                                             \
$Z                                                          exemplaires_fichier=$NExEmPlaiReS                                           \
$Z                                                                                        >   $FPoInTs$RAYON
$Z                                      # Meme remarque que ci-dessus en ce qui concerne "ChiffresFlot="...                           #

$Z                                      set                 ArGuMeNtS="$K_VIDE"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" LISTE_RAYON=$FPoInTs$RAYON"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" grossissement=$_____Grossissement"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" Lz=1000"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" ZOOM=$_____Zoom"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" ROTATION_OX=0"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" ROTATION_OY=0"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" ROTATION_OZ=0"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" isoles=FAUX chainer=VRAI"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" ajuster_points=VRAI"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" equidistance=VRAI compatibilite_20051230=FAUX"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" distance_minimale=$_____DistanceMini"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" RVB=VRAI"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" N_AU_CARRE=FAUX"
$Z                                      set                 ArGuMeNtS="$ArGuMeNtS"" editer_extrema_hors=FAUX"



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