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

$Z                  setParam            _____ExposantR                `calcul -1/2`

$Z                  setParam            _____FRayon                   4000

$Z                  setParam            _____CourbeFond               "$K_VIDE"

$Z                  set                 _____ParticulePara1="$_____ParticulePara1"" dernier_premier=FAUX"
$Z                  set                 _____ParticulePara1="$_____ParticulePara1"" isoles=VRAI"
$Z                                      # En effet, '$_____ParticulePara1' existe deja 'v $xiirv/.HILB.I1.$U _____ParticulePara1'...  #
$Z                  set                 _____ParticulePara1="$_____ParticulePara1"" $_____CourbeFond"
$Z                                      # Introduit le 20220928155844...                                                              #

$Z                  set                 _____PartN=`calcul $Npart+1`

$Z                  saut
$Z                  echo                "PremierNombreEntier=$_____Part0"
$Z                  echo                "DernierNombreEntier=`calcul $Npart+$_____Part0-1`"
$Z                  saut

$Z                  $xci/valeurs_prem$X                                                                                                 \
$Z                                      premiere=$_____Part0 derniere=$_____PartN                                                       \
$Z                                      editer_diviseurs=VRAI                                                                           \
$Z                                      editer_nombres=VRAI                                                                             \
$Z                                      diviseurs_premiers=VRAI                                                                         \
$Z                                      multiplicite_diviseurs_premiers=FAUX                                                            \
$Z                                      editer_fonction=FAUX                                                                            \
$Z                                      editer_somme_diviseurs=FAUX                                                               |     \
$Z                  $SE                 -e "s/^.*=+\([$Alphabet_0_9]*\) *"'$/\1/'                                                 |     \
$Z                  $xrv/LOGX.01$X      ne=0                                                                                            \
$Z                                      fichier==                                                                                 |     \
$Z                  $xrv/MUL2.11$X      ne=0                                                                                            \
$Z                                      fichier2==                                                                                      \
$Z                                      fichier1=$_____FRayon                                                                     |     \
$Z                  $xrv/PUIX.01$X      ne=0                                                                                            \
$Z                                      fichier==                                                                                       \
$Z                                      exposant=$_____ExposantR                                                                        \
$Z                                                          >   $FiLeTmP_HILBERT$RAYON
$Z                                      # Generation de la liste des rayons...                                                        #