chiark / gitweb /
earring-stand: wip EclipPPlanCore
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 23 Jul 2016 12:53:20 +0000 (13:53 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 23 Jul 2016 12:53:20 +0000 (13:53 +0100)
earring-stand.scad

index ace6c7a..e87f150 100644 (file)
@@ -38,4 +38,16 @@ module EclipLPlanCore(alpha){
   }
 }
 
-EclipLPlanCore(10);
+module EclipLPlan(alpha){
+  rotate(alpha) EclipLPlanCore(alpha);
+}
+
+module EclipPPlanCore(){
+  hull(){
+    circle(r0);
+    rotate(45) square([r0,r0]);
+  }
+}
+
+color("red") EclipLPlanCore(10);
+color("blue") EclipPPlanCore(10);