#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N   N O E U D  :                                                                                #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.KNOT.81.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20160124093339).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____MaillageUV               FAUX
$Z                                      # Argument introduit le 20160201150751...                                                     #

$Z                  setParam            _____DroiteUV                 VRAI
$Z                                      # Argument introduit le 20160201150751...                                                     #

$Z                  setParam            _____Aduv                     `GetParam $_____SurfaceA Aduv`
$Z                                      # Argument introduit le 20160201152051...                                                     #

$Z                  setParam            _____Bduv                     `GetParam $_____SurfaceA Bduv`
$Z                                      # Argument introduit le 20160201152051...                                                     #

$Z                  setParam            _____Cduv                     `GetParam $_____SurfaceA Cduv`
$Z                                      # Argument introduit le 20160201152051...                                                     #

$Z                  setParam            _____Zoom                     1

$Z                  setParam            _____RotationX                0

$Z                  setParam            _____RotationY                0

$Z                  setParam            _____RotationZ                0

$Z                  setParam            _____TranslationX             `GetParam $xrv/particule.10$X TRANSLATION_OX`

$Z                  setParam            _____TranslationY             `GetParam $xrv/particule.10$X TRANSLATION_OY`

$Z                  setParam            _____TranslationZ             `GetParam $xrv/particule.10$X TRANSLATION_OZ`

$Z                  setParam            _____NAuCarre                 FAUX

$Z                  setParam            _____SurfaceParam1            "$K_VIDE"

$Z                  setParam            _____SurfaceParam2            "$K_VIDE"

$Z                  $_____SurfaceA                                                                                                      \
$Z                                      np=1                                                                                            \
$Z                                      pu=$_____Pu pv=$_____Pv                                                                         \
$Z                                      eu=40       ev=40                                                                               \
$Z                                      dpu=80      dpv=80                                                                              \
$Z                                      maillage_uv=$_____MaillageUV droite_uv=$_____DroiteUV                                           \
$Z                                      tracer_une_droite_du_plan_uv_____compatibilite_20170130=VRAI                                    \
$Z                                      Aduv=$_____Aduv Bduv=$_____Bduv Cduv=$_____Cduv                                                 \
$Z                                      Lz=1000                                                                                         \
$Z                                      TRANSLATION_OX=$_____TranslationX                                                               \
$Z                                      TRANSLATION_OY=$_____TranslationY                                                               \
$Z                                      TRANSLATION_OZ=$_____TranslationZ                                                               \
$Z                                      ROTATION_OX=$_____RotationX                                                                     \
$Z                                      ROTATION_OY=$_____RotationY                                                                     \
$Z                                      ROTATION_OZ=$_____RotationZ                                                                     \
$Z                                      ZOOM=$_____Zoom                                                                                 \
$Z                                      N_AU_CARRE=$_____NAuCarre                                                                       \
$Z                                      extrema_differentielles_veritables=VRAI                                                         \
$Z                                      extrema_hors=FAUX                                                                               \
$Z                                      $_____SurfaceParam1                                                                             \
$Z                                      $_____SurfaceParam2                                                                             \
$Z                                      centre_des_spheres=VRAI                                                                         \
$Z                                      lister_les_points=VRAI                                                                          \
$Z                                      lister_les_points_apres=VRAI                                                                    \
$Z                                      R=$_____ImageR chiffres=0                                                                       \
$Z                                                                                                  $formatI                            \
$Z                                                                                                            >> $LiStEPoInTs2