added "circle_polar"

dan-reznik · Aug 6, 2024 · cb8a3ce · cb8a3ce
1 parent 266efcf
commit cb8a3ce
Show file tree

Hide file tree

Showing 3 changed files with 11 additions and 0 deletions.
diff --git a/circles.js b/circles.js
@@ -410,6 +410,15 @@ function circle_bevan(tri,sides) {
     return { ctr:x40, R:R, n:40 };
 }
 
+// 8/6/2024: https://mathworld.wolfram.com/PolarCircle.html
+function circle_polar(tri,sides) {
+    const x4 = get_Xn_cartesians(4,tri,sides);
+    const R = get_circumradius(sides);
+    const l2 = sum(sides.map(s => s * s));
+    const rpol2 = 4*R*R - l2/2; 
+    return { ctr:x4, R:sqrt(Math.abs(rpol2)), n:4 };
+}
+
 function circle_mandart(tri,sides) {
     const ext_ts = extouch_triangle(sides);
     const ext = generic_triangle(tri,sides,ext_ts);

diff --git a/components.js b/components.js
@@ -142,6 +142,7 @@ var html = function(xn_number, trilins_selected, tri_selected, rgb_color, hex_co
                     `<option value="neuberg_refls">neubs.123r</option>
                     <option value="parry">parry</option>
                     <option value="poincs">poincs123</option>
+                    <option value="polar">polar</option>
                     <option value="power1">power1</option>
                     <option value="powers">powers123</option>
                     <option value="reflection">reflection</option>

diff --git a/locus.js b/locus.js
@@ -43,6 +43,7 @@ const dict_circles = {
     moses_radical: circle_moses_radical,
     spieker: circle_spieker,
     parry: circle_parry,
+    polar: circle_polar,
     power1: circle_power_1,
     reflection: circle_reflection,
     schoutte: circle_schoutte,