G := [Matrix([[1,0],[0,1]]),
Matrix([[1,1],[0,1]]),
Matrix([[1,0],[1,1]]),
Matrix([[0,1],[1,0]]),
Matrix([[0,1],[1,1]]),
Matrix([[1,1],[1,0]])];T := Matrix(6,6):
for i to 6 do for j to 6 do T[i,j] := G[i].G[j] mod 2 od od:interface(imaginaryunit=_i);R := [[[1,0],[0,1]]=I,
[[1,1],[0,1]]=A,
[[1,0],[1,1]]=B,
[[0,1],[1,0]]=S,
[[0,1],[1,1]]=C,
[[1,1],[1,0]]=D];CT := subs(R,map(convert,T,listlist));CT[[1,5,6],[1,5,6]];CT[[1,5,6,2,3,4],[1,5,6,2,3,4]];TTdSMApJNVJUQUJMRV9TQVZFLzEyNDkwMDQwWCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjJSIjIiMiIiIiIiFGKEYnRiY=TTdSMApJNFJUQUJMRV9TQVZFLzk5MjkyMTZYLCUpYW55dGhpbmdHNiI2IltnbCEiJSEhISMlIiMiIyIiIiIiIUYnRidGJg==TTdSMApJNFJUQUJMRV9TQVZFLzY4NzE0MDhYLCUpYW55dGhpbmdHNiI2IltnbCEiJSEhISMlIiMiIyIiIkYnIiIhRidGJg==TTdSMApJNFJUQUJMRV9TQVZFLzY4NzI3OTJYLCUpYW55dGhpbmdHNiI2IltnbCEiJSEhISMlIiMiIyIiISIiIkYoRidGJg==TTdSMApJNVJUQUJMRV9TQVZFLzEyNDcwOTY4WCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjJSIjIiMiIiEiIiJGKEYoRiY=TTdSMApJNFJUQUJMRV9TQVZFLzY0OTY4ODhYLCUpYW55dGhpbmdHNiI2IltnbCEiJSEhISMlIiMiIyIiIkYnRiciIiFGJg==TTdSMApJNVJUQUJMRV9TQVZFLzEyODMyMTg0WCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjRSInIiclIklHJSJBRyUiQkclIlNHJSJDRyUiREdGKEYnRixGK0YqRilGKUYrRidGLEYoRipGKkYsRitGJ0YpRihGK0YpRipGKEYsRidGLEYqRihGKUYnRitGJg==TTdSMApJNVJUQUJMRV9TQVZFLzE0NDIwMzg0WCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjKiIkIiQlIklHJSJDRyUiREdGKEYpRidGKUYnRihGJg==TTdSMApJNFJUQUJMRV9TQVZFLzkzMzg5OTJYLCUpYW55dGhpbmdHNiI2IltnbCEiJSEhISNFIiciJyUiSUclIkNHJSJERyUiQUclIkJHJSJTR0YoRilGJ0YrRixGKkYpRidGKEYsRipGK0YqRixGK0YnRilGKEYrRipGLEYoRidGKUYsRitGKkYpRihGJ0Ym