From d35b8a0838ee83bf4159ef01881771b20e7ff941 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 13 Nov 2020 18:17:54 +0000
Subject: [PATCH] summit-lantern-hook: break out EndCurl nfc

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 summit-lantern-hook.scad | 19 +++++++++++--------
 1 file changed, 11 insertions(+), 8 deletions(-)

diff --git a/summit-lantern-hook.scad b/summit-lantern-hook.scad
index 955199d..bee914d 100644
--- a/summit-lantern-hook.scad
+++ b/summit-lantern-hook.scad
@@ -22,18 +22,21 @@ module UpperPlan(){
   circle(r = upper_r);
 }
 
+module EndCurl(){
+  rotate([90,0,0])
+    rotate_extrude(angle=180)
+    translate([upper_ctr_maj_r, 0])
+    UpperPlan();
+  translate([-upper_ctr_maj_r, 0,0])
+    sphere(r= upper_r);
+}
+
 module Upper(){
   translate([upper_ctr_maj_r, 0, 0])
     linextr(-0.1, height + 0.1)
     UpperPlan();
-  translate([0, 0, height]){
-    rotate([90,0,0])
-      rotate_extrude(angle=180)
-      translate([upper_ctr_maj_r, 0])
-      UpperPlan();
-    translate([-upper_ctr_maj_r, 0,0])
-      sphere(r= upper_r);
-  }
+  translate([0, 0, height])
+    EndCurl();
 }
 
 module Lower(){
-- 
2.30.2