From d8d55b854bf63c2660a3f10579e3cb15b9fcb507 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 9 Sep 2017 17:12:02 +0100
Subject: [PATCH] shelf-label-holder: ProngElevationUnrotated

---
 shelf-label-holder.scad | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 shelf-label-holder.scad

diff --git a/shelf-label-holder.scad b/shelf-label-holder.scad
new file mode 100644
index 0000000..73cc3ae
--- /dev/null
+++ b/shelf-label-holder.scad
@@ -0,0 +1,20 @@
+// -*- C -*-
+
+prong_nomdepth = 15;
+prong_curverad = 15;
+prong_thick = 1.0;
+
+module ProngElevationUnrotated(){
+  intersection(){
+    union(){
+      translate([ prong_nomdepth, prong_curverad ])
+	circle( prong_curverad , $fa=0.5 );
+      translate([ -10, 0 ])
+	square([ prong_curverad + 10, 10 ]);
+    }
+    translate([-5, -5])
+      square([ 100, prong_thick + 5]);
+  }
+}
+
+ProngElevationUnrotated();
-- 
2.30.2