vec3 p=vec3(0,-.4,t),q;for(float i,d,a;i++<1e2;o+=.01/exp(d*1e4)){q=p+=vec3((FC.xy-r*.5)/r.y,1)*rotate3D(.67,FC.wzz)*d*.5;d=s;for(a=.8;a<1e3;q+=a+=a)d+=abs(dot(sin(q*a),q/q))/a*.2;q=abs(fract(p)-.5);q=q.x>q.z?q.zyx:q;d=min(max(d,.4)-p.y,length(q.xy)-.02-pow(cos(q.z*75.)*.4,6.));}
