hinge-test: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/hinge-test.scad b/hinge-test.scad
new file mode 100644 (file)
index 0000000..658bfa3
--- /dev/null
+++ b/hinge-test.scad
@@ -0,0 +1,23 @@
+// -*- C -*-
+
+$hinge_pin_dia = 0.795 + 0.35;
+$hinge_main_dia = 4.0;
+$hinge_inter_gap = 0.50;
+$hinge_noncrit_gap = 1.0;
+
+$fa = 3;
+$fs = 0.05;
+
+module HingeProngPlan(behind){
+  difference(){
+    hull(){
+      circle(r= $hinge_main_dia/2);
+      polygon([[0,0],
+              [-$hinge_main_dia/2, -behind],
+              [+$hinge_main_dia/2, -behind]]);
+    }
+    circle(r= $hinge_pin_dia/2);
+  }
+}
+
+HingeProngPlan(5);