sewing-table: NewRearCurve: wip, rear section

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 3e1050a875bcaa109774354c9b2e5f1dbaf9a6c7..3bfe20824412ea7d07a25f890b25fc6a40ef23dc 100644 (file)
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -439,6 +439,14 @@ module Machine_NewRearProfile(){
 }
 
 module Machine_NewRearCurve(){
 }
 
 module Machine_NewRearCurve(){

+  translate([ -rearcurve_double_inrad, 0, 10 ]){
+    rotate([180,0,0]) rotate([0,0,-90]) linear_extrude(height=30){
+      hull(){
+       Machine_NewRearProfile();
+      translate([0,-100]) Machine_NewRearProfile();
+      }
+    }
+  }

   rotate([0,90,0]) rotate([-90,0,0]) {
     intersection(){
       rotate_extrude(convexity=10, $fn=64)
   rotate([0,90,0]) rotate([-90,0,0]) {
     intersection(){
       rotate_extrude(convexity=10, $fn=64)