List: discuss@lists.openscad.org
From: berkenb
Re: [OpenSCAD] Coating a sphere with bumps (golf-ball-ish) for wheel treads
Fri, May 25, 2018 6:14 PM
= concat(pts, flatten([for (f=fcs) [(pts[f[0]]+pts[f[1]]),
(pts[f[1]]+pts[f[2]]), (pts[f[2]]+pts[f[0]])]]));
nsfcs = flatten([for (i=[0:len(fcs)-1]) [[fcs[i][0], len(pts)+3*i+0,
len(pts)+3*i+2], [len(pts)+3*i+0, len(pts)+3*i+1, len(pts)+3*i+2],
[len(pts)+3*i+0, fcs[i][1], len(pts)+3*i+1], [len(pts)+3*i+2,
len(pts)+3*i+1, fcs[i][2]]]]);
nspts = [for (v=spts