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

$Z                  FilSTmpB  FCoOrD

$Z                  alias     Garc      'set      NoEuD1=(\!:1) ; set NoEuD2=(\!:2)                                               ;    \\
$Z                                       echo     $NoEuD1[1] >>! $FCoOrD$COORD_X ; echo     $NoEuD2[1] >>! $FCoOrD$COORD_X        ;    \\
$Z                                       echo     $NoEuD1[2] >>! $FCoOrD$COORD_Y ; echo     $NoEuD2[2] >>! $FCoOrD$COORD_Y        ;    \\
$Z                                       echo     $NoEuD1[3] >>! $FCoOrD$COORD_Z ; echo     $NoEuD2[3] >>! $FCoOrD$COORD_Z        ;    \\
$Z                                       echo     $NoEuD1[4] >>! $FCoOrD$ROUGE   ; echo     $NoEuD2[4] >>! $FCoOrD$ROUGE          ;    \\
$Z                                       echo     $NoEuD1[5] >>! $FCoOrD$VERTE   ; echo     $NoEuD2[5] >>! $FCoOrD$VERTE          ;    \\
$Z                                       echo     $NoEuD1[6] >>! $FCoOrD$BLEUE   ; echo     $NoEuD2[6] >>! $FCoOrD$BLEUE          ;    \\
$Z                                       unset    NoEuD1 NoEuD2'



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