From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 3 Jun 2017 12:28:05 +0000 (+0100)
Subject: sewing-table: NewRearCurve: wip, mid section
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=41fbeb1342709933fdfe447d738aa69b7487e58a;p=reprap-play.git

sewing-table: NewRearCurve: wip, mid section
---

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index b2fbbfb..3e1050a 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -439,13 +439,15 @@ module Machine_NewRearProfile(){
 }
 
 module Machine_NewRearCurve(){
-  intersection(){
-    rotate_extrude(convexity=10, $fn=32)
-      rotate(90)
-      translate([ 0, -rearcurve_double_inrad ])
-      Machine_NewRearProfile();
-    translate([0,0,-500])
-      cube([500,500,1000]);
+  rotate([0,90,0]) rotate([-90,0,0]) {
+    intersection(){
+      rotate_extrude(convexity=10, $fn=64)
+	rotate(90)
+	translate([ 0, -rearcurve_double_inrad ])
+	Machine_NewRearProfile();
+      translate([0,0,-500])
+	cube([500,500,1000]);
+    }
   }
 }