# =========================================================================== # # From: # # www.contextfreeart.org/gallery2/#design/3422 # # HEIGHT: 600 # WIDTH: 600 # # =========================================================================== #
startshape Math_Eye(6,2)[s 14 r 270] CF::Background=[b -1] CF::Size=[s 16 9]
Fx(u,v)=cos(u+v)*sin(v) Fy(u,v)=sin(u+v)*sin(v)
shape Math_Eye(Su,Sv) {loop u=0, 360, Su []
{loop v=0, 90, Sv [] {P00=(Fx(u ,v ),Fy(u ,v )) P10=(Fx(u+Su,v ),Fy(u+Su,v )) P01=(Fx(u ,v+Sv),Fy(u ,v+Sv)) P11=(P10[0]+P01[0]-P00[0],P10[1]+P01[1]-P00[1]) transform [trans P00 P10 P11] transform [x .5 y .5 s 1 (2/sqrt(3)) skew -30 0] CIRCLE [h(u-v) sat(cos(v)^2) b 1 a-(cos(v)^24)]
}}}
# runcfdg math_eye