ksafe-base: front and back of base

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/ksafe-base.scad b/ksafe-base.scad
index 1d4048b5a78bd3cbbc6fc8925e8e54dc0e559d73..875d58082483a2f3dc4f9d1eb9834db737710626 100644 (file)
--- a/ksafe-base.scad
+++ b/ksafe-base.scad
@@ -190,11 +190,20 @@ module AtTwoCorners(){
 }
 
 module KsafeBase(){
-  /// corners
+  /// corners, and front and back of base
   for (ym=[0,1]) mirror([0,ym,0]) {
     AtTwoCorners(){
       UsualProfile();
     }
+    hull() AtTwoCorners(){
+      upp_app_Vars(bevel){
+       polygon([ $xppI,
+                 $xppF,
+                 $xppF + [0.1, 0],
+                 $xppI + [0.1, 0]
+                 ]);
+      }
+    }
   }
 
   // side walls and base