sewing-table: NewRearCurve: wip, mid section

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index b2fbbfb72dc37f658e8dd0802eff6e86ba7cbe56..3e1050a875bcaa109774354c9b2e5f1dbaf9a6c7 100644 (file)
--- 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]);
+    }
   }
 }