float i,j,d=.1,e; vec3 p;
for(i=0.;i++<64.&&d>1e-4;){
p=vec3((FC.xy-.5*r)/r.y,e)*d*16.;
for(j=0.;j++<4.;)
p=abs(p)*rotate3D(t*.7,vec3(-4,4,6)),
d=min(length(sin(p.zx)),length(cos(p.yz)))/d,
d-=dot(p,p)/1e4;
e-=d;
}o+=vec4(p,1)*3./i;
