From: Jan "Yenya" Kasprzak <kas@fi.muni.cz>
Date: Wed, 5 Feb 2014 13:49:02 +0000 (+0100)
Subject: case.scad: round top corners
X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?a=commitdiff_plain;h=59ecb87304c43098bb0ca88d0a1df0dd4b4ce7f3;p=heater.git

case.scad: round top corners
---

diff --git a/case.scad b/case.scad
index 596b0da..bc4fd31 100644
--- a/case.scad
+++ b/case.scad
@@ -230,6 +230,16 @@ module case() {
 		for (x=[-1, 1]) scale([x, 1, 1])
 		translate([sw_xoff + sw_diam/2 + wall, batt_diam/2-pcb_width/2-wall/2, -batt_diam/2-pcb_thick-pcb_comp_h-pcb_comp_h2-wall-eps])
 			cube([plus_width, wall, wall/2]);
+		// rounded top
+		for (x=[-1, 1]) scale([x, 1, 1])
+		translate([batt_len/2 + wall + cable_sep, -infty/2, body_top_h - 2*wall])
+		rotate([-90, 0, 0])
+			scale([1, -2, 1])
+			difference() {
+				cube([wall+eps, wall+eps, infty]);
+				translate([0, 0, -eps])
+				cylinder(r=wall, h=infty+2*eps);
+			}
 	};
 	// clip barrier
 	for (x = [-1, 1]) scale([x, 1, 1]) hull () {