#######################################################################################################################################
#                                                                                                                                     #
#         V I S U A L I S A T I O N   D ' U N   G R A P H E  :                                                                        #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.FLOR.11.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20121224180213).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  set       PaRaMeTrEs="$K_VIDE"
$Z                  set       PaRaMeTrEs="$PaRaMeTrEs"" premiere=1 derniere=$NMaximalNoeuds"
$Z                  set       PaRaMeTrEs="$PaRaMeTrEs"" inf=$GRIS_0 sup=$GRIS_8"
$Z                  set       PaRaMeTrEs="$PaRaMeTrEs"" entiers=VRAI"
$Z                  set       PaRaMeTrEs="$PaRaMeTrEs"" mbse=FAUX"

$Z                  set       CoR=`$xci/valeurs_alea$X $PaRaMeTrEs graine=17891`
$Z                  set       CoV=`$xci/valeurs_alea$X $PaRaMeTrEs graine=17893`
$Z                  set       CoB=`$xci/valeurs_alea$X $PaRaMeTrEs graine=17895`

$Z                  alias     Gnoeud    'set NuM=\!:1 ; set CoX=\!:2 set CoY=\!:3                                                 ;    \\
$Z                                       set      SeT="set N_$NuM=($CoX $CoY $CoZ[$Nc] $CoR[$Nc] $CoV[$Nc] $CoB[$Nc])"            ;    \\
$Z                                       eval     "$SeT"                                                                          ;    \\
$Z                                       @        Nc = $Nc + 1                                                                    ;    \\
$Z                                       unset    SeT NuM CoX CoY'

$Z                  Gnoeud    0001 0.27 0.92
$Z                  Gnoeud    0002 0.43 0.99
$Z                  Gnoeud    0003 0.90 0.95
$Z                  Gnoeud    0004 0.40 0.84
$Z                  Gnoeud    0005 0.18 0.77
$Z                  Gnoeud    0006 0.10 0.86
$Z                  Gnoeud    0007 0.62 0.75
$Z                  Gnoeud    0008 0.83 0.76
$Z                  Gnoeud    0009 0.05 0.60
$Z                  Gnoeud    0010 0.20 0.65
$Z                  Gnoeud    0011 0.65 0.61
$Z                  Gnoeud    0012 0.73 0.62
$Z                  Gnoeud    0013 0.43 0.50
$Z                  Gnoeud    0014 0.66 0.52
$Z                  Gnoeud    0015 0.00 0.42
$Z                  Gnoeud    0016 0.30 0.39
$Z                  Gnoeud    0017 0.43 0.30
$Z                  Gnoeud    0018 0.52 0.44
$Z                  Gnoeud    0019 0.78 0.47
$Z                  Gnoeud    0020 0.16 0.22
$Z                  Gnoeud    0021 0.30 0.27
$Z                  Gnoeud    0022 0.64 0.32
$Z                  Gnoeud    0023 0.97 0.37
$Z                  Gnoeud    0024 0.85 0.23
$Z                  Gnoeud    0025 0.39 0.10
$Z                  Gnoeud    0026 0.66 0.12
$Z                  Gnoeud    0027 0.84 0.12