On 27 Mar 2002 21:57:44 -0500, Steve <ste### [at] zeroppsuklinuxnet> wrote:
> Don't know exactly what you were shooting for here

It's free experiment around my iso_chars include file.

ABX
--
disc{z,-z#macro O()asc(substr("-+((1*(,1,/.-,*/(,&.323/'1"e,1))*.1-4#declare
e=e-1;#end#local e=26;5pigment{#local g=function(_){ceil(_)-_}function#local
k=function{pattern{object{sphere_sweep{linear_spline 13#while(e)<O(),O()//35
>.01#end}}}}{k(g(atan2(x,y)),g(ln((y+x)^2+1e-5)),0)}}finish{ambient 1}}//ABX

Post a reply to this message