From b51e8e5bb18b7be5a16269158e7f0dbf7c10c769 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 31 Oct 2018 01:28:41 +0000
Subject: [PATCH] ksafe-base: tests

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 ksafe-base.scad | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/ksafe-base.scad b/ksafe-base.scad
index 79cf6bd..4d9701f 100644
--- a/ksafe-base.scad
+++ b/ksafe-base.scad
@@ -263,6 +263,23 @@ module DemoProfiles(){
   translate([0,0,-4]) color("pink") WebProfile();
 }
 
+module RimTest(){ ////toplevel
+  intersection(){
+    Box();
+    cube(center=true, [ main_sz*2, main_sz*2,
+			2.5 ]);
+  }
+}
+
+module BoltTest(){ ////toplevel
+  dy = 0.5 * (bolthole_width+4);
+  intersection(){
+    KsafeBase();
+    translate([ 0, -dy, -(bolt_above + bolthole_height + 1) ])
+      cube([ main_sz, dy*2, 50 ]);
+  }
+}
+
 //DemoProfiles();
 //Box();
 //KsafeBase();
-- 
2.30.2