#######################################################################################################################################
# #
# C O U R B E D E H I L B E R T D A N S U N E V A R I E T E T R I D I M E N S I O N N E L L E : #
# #
# #
# Author of '$xiirv/.HILB.M5.$U' : #
# #
# Jean-Francois COLONNA (LACTAMME, 20221222120015). #
# #
#######################################################################################################################################
$Z set NPoInTs_SuRfAcE=`$CA $FLiStE_PoInTs | $WCl`
$Z $CA $FLiStE_PoInTs | \
$Z $AW ' { print $3 } ' | \
$Z $SE -e 's/^.*=//' | \
$Z $xrv/normalise.01$X \
$Z ne=0 fichier== \
$Z $_____Renormalisation_u \
$Z > $FLiStE_PoInTs$COORD_X
$Z $CA $FLiStE_PoInTs | \
$Z $AW ' { print $4 } ' | \
$Z $SE -e 's/^.*=//' | \
$Z $xrv/normalise.01$X \
$Z ne=0 fichier== \
$Z $_____Renormalisation_v \
$Z > $FLiStE_PoInTs$COORD_Y
$Z $CA $FLiStE_PoInTs | \
$Z $AW ' { print $5 } ' | \
$Z $SE -e 's/^.*=//' | \
$Z $xrv/normalise.01$X \
$Z ne=0 fichier== \
$Z $_____Renormalisation_w \
$Z > $FLiStE_PoInTs$COORD_Z
$Z FilSTmpB FPaLeTtE
$m4 _____include(_____xiirv/.HILB.M5.1._____U)
$Z # Possibilite de coloriage arbitraire introduite le 20230124145850 et mise sous cette #
$Z # forme le 20230125093340... #
$Z $_____Variete \
$Z u_v_w_arbitraires=VRAI \
$Z nombre_elements=$NPoInTs_SuRfAcE \
$Z coordonnees_u=$FLiStE_PoInTs$COORD_X \
$Z coordonnees_v=$FLiStE_PoInTs$COORD_Y \
$Z coordonnees_w=$FLiStE_PoInTs$COORD_Z \
$Z $CoLoRiAgE \
$Z $_____ArgVariete \
$Z editer_extrema_hors=FAUX \
$Z chiffres=0 \
$Z R=$_____ImageR \
$Z $formatI
$Z # Le 20221222171014 a ete introduit "editer_extrema_hors=FAUX"... #
$Z FilSTmpE FPaLeTtE