openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-05 06:17:32 +02:00
Code Issues Releases Wiki Activity

optimization

Browse Source
This commit is contained in:
Justin Lin
2022-05-05 12:05:17 +08:00
parent e714fb0bc3
commit 65a19f5f42
1 changed files with 15 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
src/polyhedra/_impl/_geom_platonic_polyhedra.scad
View File

@@ -1,22 +1,24 @@
function _tri_subdivide(points, detail) = function _tri_subdivide(points, detail) =
let( let(
rows = detail + 1, rows = detail + 1,
dr = (points[2] - points[0]) / rows, p0 = points[0],
dc = (points[1] - points[0]) / rows, basis = [points[2] - p0, points[1] - p0] / rows,
pts = [ pts = [
for(ri = [0:rows], ci = [0:rows - ri]) for(ri = [0:rows], ci = [0:rows - ri])
points[0] + ci * dc + ri * dr p0 + [ri, ci] * basis
], ],
ri_base = [for(ri = 0, acc = 0; ri <= rows; ri = ri + 1, acc = acc + rows - ri + 2) acc], ri_base = [for(ri = 0, row_2 = rows + 2; ri <= rows; ri = ri + 1) ri * row_2 - ri * (ri + 1) * 0.5],
idx = function(ci, ri) ci + ri_base[ri],
faces = [ faces = [
for(ri = [0:rows - 1]) for(ri = [0:rows - 1], base_i = ri_base[ri], base_i1 = ri_base[ri + 1])
let(cols = rows - ri - 1) let(cols = rows - ri - 1)
for(ci = [0:cols]) for(ci = [0:cols])
if(ci != cols)
each [ each [
[idx(ci + 1, ri), idx(ci, ri + 1), idx(ci, ri)], [ci + 1 + base_i, ci + base_i1, ci + base_i],
if(ci != cols) [idx(ci + 1, ri + 1), idx(ci, ri + 1), idx(ci + 1, ri)] [ci + 1 + base_i1, ci + base_i1, ci + 1 + base_i]
] ]
else
[ci + 1 + base_i, ci + base_i1, ci + base_i]
] ]
) )
[pts, faces]; [pts, faces];