fragment_shader_source:
db      "uniform ivec2 WindowSize;"
db      "float f(vec3 o){"
db              "float a=sin(o.z)*.3927,s=sin(a),c=cos(a);"            ; pi/8 ~= 0.3927
db              "o=cos(vec3(c*o.x-s*o.y,s*o.x+c*o.y,o.z));"
db              "return dot(o,o)-1.2;"
db      "}"
db      "vec3 s(vec3 o,vec3 d){"
db              "float t=0.,a,b;"
db              "for(int i=0;i<75;i++){"
db                      "if(f(o+d*t)<.0){"
db                              "a=t-.125;b=t;"
db                              "for(int i=0;i<10;i++){"
db                                      "t=(a+b)*.5;"
db                                      "if(f(o+d*t)<.0)b=t;else a=t;"
db                              "}"
db                              "vec3 e=vec3(.1,0,0),"
db                              "p=o+d*t,"
db                              "n=normalize(vec3(f(p+e),f(p+e.yxy),f(p+e.yyx))+sin(p*75.)*.01);"
db                              "return mix(((max(dot(n,vec3(.577)),0.)+0.125*max(dot(n,vec3(-.707,-.707,0.)),0.)))*(mod(length(p.xy)*20.,2.)"
db                                      "<1.0?vec3(.71,.85,.25):vec3(.79,.93,.4))"
db                                      ",vec3(.93,.94,.85),vec3(pow(t*0.111,5.))"
db                              ");"
db                      "}"
db                      "t+=.125;"
db              "}"
db              "return vec3(.93,.94,.85);"
db      "}"
db      "void main(){"
db              "vec2 hws=vec2(WindowSize)*.5;"
db              "float t=dot(gl_Color.xyz,vec3(1,256,65536))*.5;"
db              "gl_FragColor=vec4(s(vec3(sin(t*1.5)*.5,cos(t)*.5,t),normalize(vec3(gl_FragCoord.xy-hws,hws.x))),1);"
db      "}",0