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

because [each undef] is []

Browse Source
This commit is contained in:
Justin Lin
2022-04-28 09:08:22 +08:00
parent d06455082e
commit aff15eae5e
1 changed files with 4 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/surface/sf_thickenT.scad
View File

@@ -22,21 +22,16 @@ module sf_thickenT(points, thickness, triangles = undef, direction = "BOTH", con
real_triangles = is_undef(triangles) ? tri_delaunay([for(p = points) __to2d(p)]) : triangles; real_triangles = is_undef(triangles) ? tri_delaunay([for(p = points) __to2d(p)]) : triangles;
function connected_tris(leng_pts, triangles) = function connected_tris(leng_pts, triangles) =
let( let(leng = len(triangles))
leng = len(triangles), _connected_tris(triangles, leng, leng_pts, []);
cnt_tris = [for(i = [0:leng_pts - 1]) []]
)
_connected_tris(triangles, leng, leng_pts, cnt_tris);
function _connected_tris(triangles, leng, leng_pts, cnt_tris, i = 0) = function _connected_tris(triangles, leng, leng_pts, cnt_tris, i = 0) =
i == leng ? cnt_tris : i == leng ? cnt_tris :
let( let(
tri = reverse(triangles[i]), tri = reverse(triangles[i]), // OpenSCAD requires clockwise
n_cnt_tris = [ n_cnt_tris = [
for(k = [0:leng_pts - 1]) for(k = [0:leng_pts - 1])
contains(tri, k) ? contains(tri, k) ? [each cnt_tris[k], tri] : cnt_tris[k]
// OpenSCAD requires clockwise
[each cnt_tris[k], tri] : cnt_tris[k]
] ]
) )
_connected_tris(triangles, leng, leng_pts, n_cnt_tris, i + 1); _connected_tris(triangles, leng, leng_pts, n_cnt_tris, i + 1);