3
1
Back

0 cylinder(h=chg, r=cord-cdp*smt/100, $fn=2*cfn, center=false); shape(fsh, cird, cord-cdp*smt/100, cfn*4, chg); module shape(hsh, ird, ord, fn4, hg y0=-0.1; y1=0; y2=abs(hsh); y3=hg-abs(hsh); y4=hg; y5=hg+0.1; if ( hsh >= 0 } module make_surface(filename, h) { for (a = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16] if (h .

New Pull Request