3
1
Back

? Ord : ird; y0=-0.1; y1=0; y2=abs(hsh); y3=hg-abs(hsh); y4=hg; y5=hg+0.1; if ( fsh == 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.

New Pull Request