vec3 u,v,p,C=vec3(0,0,2),q=C--,s=FC.rgb-r.xyx*.5;float w,d,e,j,i;for(;++i<39.;u=v,v=q,q+=s*d/r.x+cos(i)/1e2)for(d=w=6.;--w>0.;){p=q;p.xz*=rotate2D(w/.8+t);p.xy*=rotate2D(1.);for(j=e=0.;j++<4.;p=p.bgr*C,e=max(e,dot(p,C)));d=min(d,e-.5);}o+=cos(cross(q-v,q-u).x*5e4);