float i,j,d=.1,e; vec3 p;
for(i=0.;i++<64.&&d>1e-4;){
p=vec3((FC.xy-.5*r)/r.y,1)*8.;
p.z-=4.;
for(j=0.;j++<4.;)
p=abs(p-.5)*rotate3D(i/j+t,vec3(-2)),
d=max(dot(p.zy,p.xz),dot(p.yx,p.xz))-.8,
d-=dot(p,p)/1e4;
e+=d;
}o+=vec4(log(p*p),1)*5./i;
