"Collapse" in 242 chars of
#GLSL:
vec2 p=(FC.xy-r*.5)/r.y*mat2(8,-3,3,8),v;for(float i;i <50.;o =(cos(sin(i)*vec4(2,5,6,1)) 1.)*exp(sin(i*i t))/length(max(v,vec2(v.x*(3. snoise2D(p vec2(t*7.,i)))/1e2,v.y*.2))))v=p cos(i*i t*.2 vec2(i/1e2,11))*2.;o=tanh(pow(o/3e2,vec4(1.5)));