openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-11 01:04:07 +02:00
Code Issues Releases Wiki Activity

add tri_circumcenter

Browse Source
This commit is contained in:
Justin Lin
2021-04-25 17:54:05 +08:00
parent 056a09920c
commit 662915c805
2 changed files with 15 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/triangle/tri_circumcenter.scad Normal file
View File

@@ -0,0 +1,15 @@
function tri_circumcenter(shape_pts) =
let(
p0 = shape_pts[0],
p1 = shape_pts[1],
p2 = shape_pts[2],
v0 = p1 - p0,
d0 = (p1 + p0) / 2 * v0,
v1 = p2 - p1,
d1 = (p2 + p1) / 2 * v1,
det = -cross(v0 , v1)
)
det == 0 ? undef : [
(d1 * v0[1] - d0 * v1[1]) / det,
(d0 * v1[0] - d1 * v0[0]) / det
];

20
src/triangle/tri_circumcircle.scad
View File

@@ -1,20 +0,0 @@
function tri_circumcircle(shape_pts) =
let(
p0 = shape_pts[0],
p1 = shape_pts[1],
p2 = shape_pts[2],
v0 = p1 - p0,
d0 = (p1 + p0) / 2 * v0,
v1 = p2 - p1,
d1 = (p2 + p1) / 2 * v1,
det = -cross(v0 , v1)
)
det == 0 ? undef :
let(
x = (d1 * v0[1] - d0 * v1[1]) / det,
y = (d0 * v1[0] - d1 * v0[0]) / det,
center = [x, y],
v = p0 - center,
r = norm(v)
)
[center, r];