openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-04-13 18:51:53 +02:00
Code Issues Releases Wiki Activity

refactor

Browse Source
This commit is contained in:
Justin Lin 2021-09-07 10:03:47 +08:00
parent 1d085c35d0
commit 9c532acce4
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/experimental/isosphere.scad
View File

@ -1,7 +1,7 @@
use <experimental/tri_subdivide.scad>;
module isosphere(radius, detail = 0) {
function prj2sphere(t) = [for(p = t) p / norm(p) * radius];
function prj2sphere(t, r) = [for(p = t) p / norm(p) * r];
// Icosahedron
t = (1 + sqrt(5)) / 2 ;
@ -24,9 +24,9 @@ module isosphere(radius, detail = 0) {
[for(i = face) icosahedron_points[i]]
];
points = detail == 0 ? [for(tri = tris) each prj2sphere(tri)] : [
points = detail == 0 ? [for(tri = tris) each prj2sphere(tri, radius)] : [
for(tri = tris)
each [for(t = tri_subdivide(tri, detail)) each prj2sphere(t)]
each [for(t = tri_subdivide(tri, detail)) each prj2sphere(t, radius)]
];
faces = [for(i = [0:3:len(points) - 3]) [i, i + 1, i + 2]];