X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=treefoil.scad.pl;h=ee233a948661e66ebc82cdb80d4dc94ac8d059ec;hb=6dba99d4594590c1af949fbd0379d366a05c2ca6;hp=50a28bfd9aa62184829f05c1b658af07db941a6f;hpb=895dfa8b439120d6e746290c380a6b54c8434e0b;p=reprap-play.git

diff --git a/treefoil.scad.pl b/treefoil.scad.pl
index 50a28bf..ee233a9 100755
--- a/treefoil.scad.pl
+++ b/treefoil.scad.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 
-# Trying now with:
+# Use:
 #   - support X/Y dist 0.5mm
 
 use strict;
@@ -10,6 +10,8 @@ xyyZZYYXYxxyzYYZXzzxyXXYXXXZxxxyyXXZyyyzXXzz
 zxxYYXXZXzzxyXXYZyyzxZZXZZZYzzzxxZZYxxxyZZyy
 yzzXXZZYZyyzxZZXYxxyzYYZYYYXyyyzzYYXzzzxYYxx
 END
+# simple version (unknotted, [0,1,2]^3):
+# YxxyzYYZXzzxyXXYZyyzxZZX
 
 sub o { print @_ or die $!; }
 
@@ -66,6 +68,8 @@ module TraceEdge(p,q) {
     }
 }
 
-Trace();
+rotate([0,0,45])
+  rotate([0,90,0])
+  Trace();