#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N   N O E U D   " E N   T R E F L E "  :                                                        #
#                                                                                                                                     #
#                                                                                                                                     #
#                                                                                   *****                                             #
#                                                                             ******      ***                                         #
#                                                        1 (derriere)     ****               **                                       #
#                                                            \        ****              6     **                                      #
#                                                             \    ****                        **                                     #
#                                            *************     \ ***                            *                                     #
#                                        ***                *****                               *                                     #
#                                     ***                   ***  ***                            *                                     #
#                                   ***                    **    /   ***                        *                                     #
#                                  **                    **     /         ***                  **                                     #
#                                 **                     *   5 (devant)       ***             **                                      #
#                                 ** 9                  **                       **          **                                       #
#                                  *                    **                         *        **                                        #
#                                  **                    *                          *     **                                          #
#                                   ***                  *                          **  **                                            #
#                                     ***                *            7 (derriere)   ***                                              #
#                                       ***              *                         ****   2 (devant)                                  #
#                                         ****           **                     **   **                                               #
#                                            ****        **                  **       *                                               #
#                                                ****     *  8 (devant)   ***         **                                              #
#                                                    ******            ***            **                                              #
#                                                         *************               **                                              #
#                                           4 (derriere)  **                          **                                              #
#                                                          *                          **                                              #
#                                                          **                         **                                              #
#                                                           *                        **                                               #
#                                                            *                       **                                               #
#                                                             **                    **                                                #
#                                                              **                   **                                                #
#                                                                ***        3     ***                                                 #
#                                                                   ****        ***                                                   #
#                                                                        *******                                                      #
#                                                                                                                                     #
#                                                                                                                                     #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.KNOT.21.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20060811121245).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  set       Xc=0.5
$Z                  set       Yc=0.5
$Z                  set       Zc=0.5
$Z                  set       DZ=0.4
$Z                  set       DT=`calcul $dpi/3`
$Z                  set       R1=0.2
$Z                  set       T1=$pis2
$Z                  set       R2=0.4
$Z                  set       T2=`calcul $pi/6`

$Z                  echo      "01 `calcul ($R1*cos($T1-(0*$DT)))+$Xc` `calcul ($R1*sin($T1-(0*$DT)))+$Yc` `calcul $Zc-$DZ`"  >>! $TeMp1
$Z                  echo      "05 `calcul ($R1*cos($T1-(0*$DT)))+$Xc` `calcul ($R1*sin($T1-(0*$DT)))+$Yc` `calcul $Zc+$DZ`"  >>! $TeMp1

$Z                  echo      "02 `calcul ($R1*cos($T1-(1*$DT)))+$Xc` `calcul ($R1*sin($T1-(1*$DT)))+$Yc` `calcul $Zc+$DZ`"  >>! $TeMp1
$Z                  echo      "07 `calcul ($R1*cos($T1-(1*$DT)))+$Xc` `calcul ($R1*sin($T1-(1*$DT)))+$Yc` `calcul $Zc-$DZ`"  >>! $TeMp1

$Z                  echo      "04 `calcul ($R1*cos($T1-(2*$DT)))+$Xc` `calcul ($R1*sin($T1-(2*$DT)))+$Yc` `calcul $Zc-$DZ`"  >>! $TeMp1
$Z                  echo      "08 `calcul ($R1*cos($T1-(2*$DT)))+$Xc` `calcul ($R1*sin($T1-(2*$DT)))+$Yc` `calcul $Zc+$DZ`"  >>! $TeMp1

$Z                  echo      "06 `calcul ($R2*cos($T2-(0*$DT)))+$Xc` `calcul ($R2*sin($T2-(0*$DT)))+$Yc` `calcul $Zc`"      >>! $TeMp1
$Z                  echo      "03 `calcul ($R2*cos($T2-(1*$DT)))+$Xc` `calcul ($R2*sin($T2-(1*$DT)))+$Yc` `calcul $Zc`"      >>! $TeMp1
$Z                  echo      "09 `calcul ($R2*cos($T2-(2*$DT)))+$Xc` `calcul ($R2*sin($T2-(2*$DT)))+$Yc` `calcul $Zc`"      >>! $TeMp1