From 44a2c41d10d681f52df27211a2aa94ba71dd1dd3 Mon Sep 17 00:00:00 2001
From: Stephen Carpenter <sjc@carpanet.net>
Date: Fri, 29 Dec 2023 09:17:20 -0500
Subject: [PATCH] Updated Mean Path Calc

---
 core_uy1658-60.scad | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/core_uy1658-60.scad b/core_uy1658-60.scad
index 0f2ad18..fcf68a2 100644
--- a/core_uy1658-60.scad
+++ b/core_uy1658-60.scad
@@ -1,14 +1,13 @@
 
 include <BOSL/constants.scad>
 use <BOSL/transforms.scad>
-use <BOSL/joiners.scad>
 
 /* [Options] */
 
 LegLength=30.40;
 LegDiameter=16;
-BoltDiameter=7.06;
-CoreGap=0;
+BoltDiameter=5;
+CoreGap=0.0;
 NumberCoils=10;
 YokeHeight=12.14;
 YokeLen=28.00;
@@ -25,15 +24,17 @@ $fa= ($preview) ? $fa : render_fa;
  
 
 // Area Info
-leg_a1 = PI * (LegDiameter/2)^2;
-leg_a2 = PI * (BoltDiameter/2)^2/2;
+leg_a1 = PI * (LegDiameter/20)^2;
+leg_a2 = PI * (BoltDiameter/20)^2/2;
+yoke_a = LegDiameter * YokeHeight;
+path_l1 = 2*LegLength - YokeHeight;
+path_l2 = YokeLen + LegDiameter;
 
 echo("Leg Len:", 2*LegLength, "mm");
 echo("Bobbin_Max:", 2*LegLength-2*YokeHeight, "mm");
-echo("Leg Cross Section Area: ", leg_a1-leg_a2, "mm^2");
-yoke_a = LegDiameter * YokeHeight;
+echo("Leg Cross Section Area: ", leg_a1-leg_a2, "cm^2");
 echo("Yoke A: ", yoke_a);
-echo("Magnetic Path: ", 2*(YokeLen+LegDiameter)+4*(LegLength-YokeHeight), "mm");
+echo("Magnetic Path: ", 2*(path_l1+path_l2), "mm");
 
 module core_leg(d=LegDiameter, l=LegLength, bd=BoltDiameter) {
 	difference() {