#######################################################################################################################################
#                                                                                                                                     #
#         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/.HILB.24.$U' :                                                                                            #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, 20220928140953).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                                      $CA                 $FiLeTmP_HILBERT$COORD_X                                                    \
$Z                                                                              >>! $FiLeTmP_HILBERT_all$COORD_X
$Z                                      $CA                 $FiLeTmP_HILBERT$COORD_Y                                                    \
$Z                                                                              >>! $FiLeTmP_HILBERT_all$COORD_Y

$Z                                      if                  (-e $FiLeTmP_HILBERT$RAYON) then
$Z                                      # Test introduit le 20221205111130 pour 'v $xiirv/$Fnota Debut_listG_JULK_I2'...              #
$Z                                                          $CA                 $FiLeTmP_HILBERT$RAYON                                  \
$Z                                                                                                  >>! $FiLeTmP_HILBERT_all$RAYON
$Z                                      else
$Z                                      endif

$Z                                      if                  (-e $FiLeTmP_HILBERT$LUMIN) then
$Z                                      # Test introduit le 20221205111130 pour 'v $xiirv/$Fnota Debut_listG_JULK_I2'...              #
$Z                                                          $CA                 $FiLeTmP_HILBERT$LUMIN                                  \
$Z                                                                                                  >>! $FiLeTmP_HILBERT_all$LUMIN
$Z                                      else
$Z                                      endif

$Z                                      FileTmpE            FiLeTmP_HILBERT

$Z                                      @         NuMeRo = $NuMeRo + 1
$Z                  end