X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=brompton-computer-guard.scad;h=35b0a182b6e9849e80609278345c2121e857b2ee;hp=88f1994f0a249a631ab7ae90d598cbcbe5fb5f99;hb=9b3087a6117d4143978dad2af8901be6de9bcd15;hpb=8ee576a28d90ae9ca304b5dfac68f76a8f05af0c

diff --git a/brompton-computer-guard.scad b/brompton-computer-guard.scad
index 88f1994..35b0a18 100644
--- a/brompton-computer-guard.scad
+++ b/brompton-computer-guard.scad
@@ -11,7 +11,7 @@ arch_breadth = 25;
 hole_dia = 4 + 0.5;
 
 pbase_tab = 12;
-pbase_thick = 2;
+pbase_thick = 4;
 
 // computed
 
@@ -21,6 +21,11 @@ echo(arch_alpha,arch_beta);
 arch_in_rad = arch_width/2 / sin(arch_beta);
 arch_to_chord = arch_in_rad * cos(arch_beta);
 
+inner_pbase_thick = 8;
+echo(inner_pbase_thick);
+
+inner_pbase_rad = arch_in_rad * 2;
+
 end_thick = arch_thick;
 
 holes = [[[  5  , 5  ], [16  , 21]], // left
@@ -77,13 +82,19 @@ module Arch(){
 	}
       }
       difference(){
+	translate([0,0, arch_breadth - pbase_thick])
 	linear_extrude(height=pbase_thick){
 	  difference(){
 	    hull(){
 	      ArchProfile(true);
 	      ArchProfile(false);
 	    }
-	    MainCutout();
+	    intersection(){
+	      MainCutout();
+	      translate([0, -inner_pbase_thick
+			 - (inner_pbase_rad - arch_in_rad)])
+		ArchCircle(inner_pbase_rad);
+	    }
 	  }
 	}
       }
@@ -92,4 +103,4 @@ module Arch(){
   }
 }
 
-rotate([0,0,45]) Arch();
+rotate([0,0,45]) translate([0,0,arch_breadth]) rotate([0,180,0]) Arch();