From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 9 Sep 2017 16:38:18 +0000 (+0100)
Subject: shelf-label-holder: working on Elevation
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=6013a909e18b3ac3a90d9000be603bd1641fa5df;p=reprap-play.git

shelf-label-holder: working on Elevation
---

diff --git a/shelf-label-holder.scad b/shelf-label-holder.scad
index cdc91a2..2912db7 100644
--- a/shelf-label-holder.scad
+++ b/shelf-label-holder.scad
@@ -5,6 +5,14 @@ prong_curverad = 30;
 prong_thick = 1.0;
 prong_maxdepth = 18;
 
+nom_shelf = 14.54;
+
+interference = 0.5;
+
+// calculated
+
+interference_angle = atan2(interference, prong_nomdepth);
+
 module ProngElevationUnrotated(){
   intersection(){
     union(){
@@ -18,4 +26,14 @@ module ProngElevationUnrotated(){
   }
 }
 
-ProngElevationUnrotated();
+module Elevation(){
+  rotate(-interference_angle)
+    ProngElevationUnrotated();
+  translate([0, -nom_shelf])
+    mirror([0,1])
+    rotate(-interference_angle)
+    ProngElevationUnrotated();
+}
+
+//ProngElevationUnrotated();
+Elevation();