+ 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]);
+ }
+ }
+ translate([1,0,-rearcurve_double_inrad])
+ rotate([0,-90,0]) rotate([0,0,-90])
+ linear_extrude(height= rearcurve_strt_len + 1)
+ Machine_NewRearProfile();
+ }
+}
+
+module Machine_RearProfile(){ ////toplevel
+ intersection(){
+ Machine_Profile();
+ translate([ -200 + machine_rear_to_front/2, -100 ]) {
+ square([200,200]);
+ }
+ }
+}
+
+module Machine_FrontProfile(){
+ intersection(){
+ Machine_Profile();
+ translate([ machine_rear_to_front/2, -100 ]) {
+ square([200,200]);
+ }
+ }
+}
+
+module Machine_Curves(){ ////toplevel
+ translate([ tile01_tr[0] - cutout_l_end_x + rearedge_len,
+ cutout_tile11_y,
+ 0 ]){
+ //%cube([20,20,20]);
+ translate([ -reartablet_x,
+ -1,
+ -reartablet_z + tablet_z_slop])
+ mirror([0,0,1])
+ cube([ reartablet_x+1,
+ reartablet_y+1,
+ 20 ]);
+ }
+ translate([ tile01_tr[0] - cutout_l_end_x + rearedge_len,
+ cutout_tile11_y,
+ frontcurve_z_slop ]){
+ translate([ 0, -first_front[0] , 0 ])
+ multmatrix([[1, -frontcurve_side_skew, 0, 0],
+ [0, 1, 0, 0],
+ [0, 0, 1, 0],
+ [0, 0, 0, 1]])
+ translate([ 0, first_front[0] , 0 ])
+ mirror([1,0,0]){
+ rotate([0,-90,0])rotate([0,0,-90]){
+ linear_extrude(height= 200)
+ Machine_FrontProfile();
+ }
+ }
+ translate([ rearcurve_strt_len,
+ 0,
+ rearcurve_z_slop ]){
+ Machine_NewRearCurve();
+ }