Experimenting...

Hi everyone

I have started experimenting some more with shapes for all kind of purposes. The equations for this one are:

#declare FxA = function(u,v) {sin(v)*(0.5+0.5*cos(u*pi/2))*(0.5+0.1*exp(abs(cos(10*v)+0.3)))}
#declare FyA = function(u,v) {pow(u-1, 2)/4}
#declare FzA = function(u,v) {cos(v)*(0.5+0.5*cos(u*pi/2))*(0.5+0.1*exp(abs(cos(10*v)+0.3)))}

with u ranging from -1 to 1, and v from -pi to pi. Enjoy