Tyb
for(float e,i,a,w,x,g,h;i++<99.;o+=.01-.02/exp(max(s,e)5e3)/h){vec3 p=vec3((FC.xy-.5r)/rg+1.,g);p.zy=rotate2D(.4);e=p.y;h=e;p.z+=t+3.;for(a=.7;a>.001;a=.7)p.xz=rotate2D(5.),e-=w=exp(sin(p.z/a+t)-3.)a,h+=abs(dot(sin(p.xz/a.27)a,r/r));g+=e=min(e,h.5-1.);}