mic-table-clamp: Adjustments from blank, binary chop

[reprap-play.git] / treefoil.scad.pl

diff --git a/treefoil.scad.pl b/treefoil.scad.pl
index 50a28bfd9aa62184829f05c1b658af07db941a6f..ee233a948661e66ebc82cdb80d4dc94ac8d059ec 100755 (executable)
--- 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();