#######################################################################################################################################
#                                                                                                                                     #
#         C O U R B E   D E   H I L B E R T   S U R   U N E   V A R I E T E   B I D I M E N S I O N N E L L E  :                      #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.HILB.N5.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, 20240518111512).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  set       NPoInTs_XY=`$CA $FLiStE_PoInTs | $WCl`

$Z                  $CA       $FLiStE_PoInTs                                                                                      |     \
$Z                  $AW       ' { print $8 } '                                                                                    |     \
$Z                  $SE       -e "s/^.*=//"                                                                                             \
$Z                                                                                                            > $FLiStE_PoInTs$RAYON

$Z                  $CA       $FLiStE_PoInTs                                                                                      |     \
$Z                  $AW       ' { print $9 } '                                                                                    |     \
$Z                  $SE       -e "s/^.*=//"                                                                                       |     \
$Z                  $xrv/normalise.01$X ne=0 fichier==                                                                                  \
$Z                                      forcer=VRAI mA=$NOIR MA=$BLANC                                                                  \
$Z                                                                                                            > $FLiStE_PoInTs$ROUGE

$Z                  $CA       $FLiStE_PoInTs                                                                                      |     \
$Z                  $AW       ' { print $10 } '                                                                                   |     \
$Z                  $SE       -e "s/^.*=//"                                                                                       |     \
$Z                  $xrv/normalise.01$X ne=0 fichier==                                                                                  \
$Z                                      forcer=VRAI mA=$NOIR MA=$BLANC                                                                  \
$Z                                                                                                            > $FLiStE_PoInTs$VERTE

$Z                  $CA       $FLiStE_PoInTs                                                                                      |     \
$Z                  $AW       ' { print $11 } '                                                                                   |     \
$Z                  $SE       -e "s/^.*=//"                                                                                       |     \
$Z                  $xrv/normalise.01$X ne=0 fichier==                                                                                  \
$Z                                      forcer=VRAI mA=$NOIR MA=$BLANC                                                                  \
$Z                                                                                                            > $FLiStE_PoInTs$BLEUE



Copyright © Jean-François COLONNA, 2024-2024.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / École polytechnique, Institut Polytechnique de Paris, 2024-2024.