for(float e,i,a,w,x,g,h;i <90.;o =.01-.02/exp(max(s,e)*3e3)/h){vec3 p=vec3((FC.xy-.5*r)/r.y*g 2.,g);p.zy*=rotate2D(.5);e=p.y;h=e p.x*.3;p.z =t;for(a=.6;a>.001;a*=.7)p.xz*=rotate2D(5.),x=(p.x p.z)/a t t,e-=w=exp(sin(x)-3.)*a,h =abs(dot(sin(p.xz/a*.3)*a,r/r));g =e=min(e,h*.5-1.);}