//=time() ?>
#define N fsnoise(p-l*e)
vec2 m,M=r,p,k,l,e=vec2(1,0),U=FC.xy;for(int i;i++<8;){p+=(mix(m,M,.4+.2*N)-p)*(e=1.-e);if(abs(dot(p-U,e))<2.)return;k=-min(l=sign(p-U),0.);m+=max(k*p-m,0.)*e;M+=min(k*r+max(l,0.)*p-M,0.)*e;}o=N<.1?e.xyyx:N<.2?e.xxyx:N<.3?e.yyxx:o+1.;#つぶやきGLSL