1_4_polar

Code 1.6, 1.7, 1.8, Figure 1.10:

1_4_polar.frag

#version 300 es precision highp float; out vec4 fragColor; uniform float u_time; uniform vec2 u_resolution; const float PI = 3.1415926; float atan2(float y, float x){ if (x == 0.0){ return sign(y) * PI / 2.0; } else { return atan(y, x); } // or use '?:' as follows: // return x == 0.0 ? sign(y) * PI / 2.0 : atan(y, x); } vec2 xy2pol(vec2 xy){ return vec2(atan2(xy.y, xy.x), length(xy)); } vec2 pol2xy(vec2 pol){ return pol.y * vec2(cos(pol.x), sin(pol.x)); } vec3 tex(vec2 st){ vec3[3] col3 = vec3[]( vec3(0.0, 0.0, 1.0), vec3(1.0, 0.0, 0.0), vec3(1.0) ); st.s = st.s / PI + 1.0; int ind = int(st.s) ; vec3 col = mix(col3[ind % 2], col3[(ind + 1) % 2], fract(st.s)); return mix(col3[2], col, st.t); } void main(){ vec2 pos = gl_FragCoord.xy / u_resolution.xy; pos = 2.0 * pos.xy - vec2(1.0); pos = xy2pol(pos); fragColor = vec4(tex(pos), 1.0); }

#version 300 es
precision highp float;
out vec4 fragColor;
uniform float u_time;
uniform vec2 u_resolution;
const float PI = 3.1415926;

float atan2(float y, float x){
  if (x == 0.0){
    return sign(y) * PI / 2.0;
  } else {
    return atan(y, x);
  }
  // or use '?:' as follows:
  // return x == 0.0 ? sign(y) * PI / 2.0 : atan(y, x);
}

vec2 xy2pol(vec2 xy){
  return vec2(atan2(xy.y, xy.x), length(xy));
}

vec2 pol2xy(vec2 pol){
  return pol.y * vec2(cos(pol.x), sin(pol.x));
}

vec3 tex(vec2 st){
  vec3[3] col3 = vec3[](
    vec3(0.0, 0.0, 1.0),
    vec3(1.0, 0.0, 0.0),
    vec3(1.0)
  );
  st.s = st.s / PI + 1.0;
  int ind = int(st.s) ;
  vec3 col = mix(col3[ind % 2], col3[(ind + 1) % 2], fract(st.s));
  return mix(col3[2], col, st.t);
}

void main(){
  vec2 pos = gl_FragCoord.xy / u_resolution.xy;
  pos = 2.0 * pos.xy - vec2(1.0);
  pos = xy2pol(pos);    
  fragColor = vec4(tex(pos), 1.0);
}