chiark
/
gitweb
/
~ianmdlvl
/
reprap-play.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
scaffold-clamp-cleat: sort out toplevels
[reprap-play.git]
/
treefoil.scad.pl
diff --git
a/treefoil.scad.pl
b/treefoil.scad.pl
index f206f2ea669b87a9d36aa96b4ef96c46346889db..ee233a948661e66ebc82cdb80d4dc94ac8d059ec 100755
(executable)
--- a/
treefoil.scad.pl
+++ b/
treefoil.scad.pl
@@
-1,6
+1,6
@@
#!/usr/bin/perl -w
#!/usr/bin/perl -w
-#
Trying now with
:
+#
Use
:
# - support X/Y dist 0.5mm
use strict;
# - support X/Y dist 0.5mm
use strict;
@@
-10,6
+10,8
@@
xyyZZYYXYxxyzYYZXzzxyXXYXXXZxxxyyXXZyyyzXXzz
zxxYYXXZXzzxyXXYZyyzxZZXZZZYzzzxxZZYxxxyZZyy
yzzXXZZYZyyzxZZXYxxyzYYZYYYXyyyzzYYXzzzxYYxx
END
zxxYYXXZXzzxyXXYZyyzxZZXZZZYzzzxxZZYxxxyZZyy
yzzXXZZYZyyzxZZXYxxyzYYZYYYXyyyzzYYXzzzxYYxx
END
+# simple version (unknotted, [0,1,2]^3):
+# YxxyzYYZXzzxyXXYZyyzxZZX
sub o { print @_ or die $!; }
sub o { print @_ or die $!; }
@@
-66,7
+68,7
@@
module TraceEdge(p,q) {
}
}
}
}
-rotate([0,0,
90
])
+rotate([0,0,
45
])
rotate([0,90,0])
Trace();
rotate([0,90,0])
Trace();