Planet Centauri

uniform sampler2D tex;
uniform int index = 0;
void main(void) { vec4 c = texture2D(tex, gl_TexCoord[0].st);
mat3 m[9] =
{
    mat3(1.0  , 0.0  , 0.0  ,  0.0  , 1.0  , 0.0  ,  0.0  , 0.0  , 1.0  ), // normal
    mat3(0.567, 0.433, 0.0  ,  0.558, 0.442, 0.0  ,  0.0  , 0.242, 0.758), // protanopia
    mat3(0.817, 0.183, 0.0  ,  0.333, 0.667, 0.0  ,  0.0  , 0.125 ,0.875), // protanomaly
    mat3(0.625, 0.375, 0.0  ,  0.7  , 0.3  , 0.0  ,  0.0  , 0.3   ,0.7  ), // deuteranopia
    mat3(0.8  , 0.2  , 0.0  ,  0.258, 0.742, 0.0  ,  0.0  , 0.142 ,0.858), // deuteranomaly
    mat3(0.95 , 0.05 , 0.0  ,  0.0  , 0.433, 0.567,  0.0  , 0.475 ,0.525), // tritanopia
    mat3(0.967, 0.033, 0.0  ,  0.0  , 0.733, 0.267,  0.0  , 0.183 ,0.817), // tritanomaly
    mat3(0.299, 0.587, 0.114,  0.299, 0.587, 0.114,  0.299, 0.587 ,0.114), // achromatopsia
    mat3(0.618, 0.320, 0.062,  0.163, 0.775, 0.062,  0.163, 0.320 ,0.516)  // achromatomaly
};
vec3 c2 = {c.r, c.g, c.b};
c2 *= m[index];
gl_FragColor = vec4( c2.x , c2.y, c2.z, 1.0 );
}