float i,e,s,g,k;for(o++;i++<1e2;){vec3 q,p=vec3((FC.xy-.5r)/r.yg+snoise2D(r+t),g-35.);k=9./length(p.xz);p.xz*=rotate2D(sin(t+k)PI);e=-p.y+5.-k9.;for(s=1.;s<8.;s+=s)q=sin(protate3D(s,p-p+s)s)/s,e+=abs(q.x+q.y+q.z);o+=o.wmin(e,0.)/3e2/k;g+=max(.1,e.3);}