From 4b24fd0d4b3eb5ef776d96cf8ecee1df4b55c359 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 30 Jun 2017 23:57:53 +0100
Subject: [PATCH] simplephone-case: TestLoop

---
 simplephone-case.scad | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/simplephone-case.scad b/simplephone-case.scad
index 5da6f53..cc25147 100644
--- a/simplephone-case.scad
+++ b/simplephone-case.scad
@@ -45,6 +45,8 @@ outer_cnr_rad = inner_cnr_rad + thick[2];
 
 x_sliced = outer_cnr_rad * (1-sin(45));
 
+$screen = true;
+
 module RoundedProfile(sz, cnr_rad){
   hull(){
     for (x=[ cnr_rad, sz[0]-cnr_rad ])
@@ -60,7 +62,7 @@ module RoundedCube(sz, cnr_rad){
       for (y=[ cnr_rad, sz[1]-cnr_rad ])
 	for (z=[ cnr_rad, sz[2]-cnr_rad ])
 	  translate([x,y,z])
-	    sphere(r= cnr_rad, $fn=20);
+	    sphere(r= cnr_rad, $fn=8);
   }
 }
 
@@ -87,7 +89,8 @@ module Case(){
 		psz[2] ])
       cube(concat(abtn_sz, [ thick[2]*3 ]), center=true);
 
-    mirror([1,0,0])
+    if ($screen)
+      mirror([1,0,0])
       translate([ screen_xbot,
 		  (psz[1] - screen_sz[1])/2,
 		  psz[2]-1 ])
@@ -126,5 +129,14 @@ module Case(){
   }
 }
 
+module TestLoop(){
+  intersection(){
+    Case($screen=false);
+    translate([ -vol_xbot, 0,0 ])
+      cube([ 4, 200,200 ], center=true);
+  }
+}
+
 Case();
+//TestLoop();
 //RoundedCube(psz, inner_cnr_rad);
-- 
2.30.2