local S, T; S := [[ 1/20, 1/20, 1/20, 1/20, 1/5, 1/4, 1/4, 1/4, 1/4, 1/4, 1/4, 1/4, 1/4, 1/5, 1/5, 1/5, 1/5, 1/5, 1/4, 1/4, 1/4, 1/4 ], [ 1/20, 1/20, 1/20, 1/20, 1/5, -1/4, -1/4, -1/4, -1/4, 1/4, 1/4, 1/4, 1/4, 1/5, 1/5, 1/5, 1/5, 1/5, -1/4, -1/4, -1/4, -1/4 ], [ 1/20, 1/20, 1/20, 1/20, 1/5, 1/4*E(4), 1/4*E(4), 1/4*E(4), 1/4*E(4), -1/4, -1/4, -1/4, -1/4, 1/5, 1/5, 1/5, 1/5, 1/5, -1/4*E(4), -1/4*E(4), -1/4*E(4), -1/4*E(4) ], [ 1/20, 1/20, 1/20, 1/20, 1/5, -1/4*E(4), -1/4*E(4), -1/4*E(4), -1/4*E(4), -1/4, -1/4, -1/4, -1/4, 1/5, 1/5, 1/5, 1/5, 1/5, 1/4*E(4), 1/4*E(4), 1/4*E(4), 1/4*E(4) ], [ 1/5, 1/5, 1/5, 1/5, 4/5, 0, 0, 0, 0, 0, 0, 0, 0, -1/5, -1/5, -1/5, -1/5, -1/5, 0, 0, 0, 0 ], [ 1/4, -1/4, 1/4*E(4), -1/4*E(4), 0, 1/4*E(4), -1/4, 1/4, -1/4*E(4), 1/4*E(4), -1/4*E(4), 1/4, -1/4, 0, 0, 0, 0, 0, -1/4, -1/4*E(4), 1/4*E(4), 1/4 ], [ 1/4, -1/4, 1/4*E(4), -1/4*E(4), 0, -1/4, -1/4*E(4), 1/4*E(4), 1/4, -1/4*E(4), 1/4*E(4), -1/4, 1/4, 0, 0, 0, 0, 0, 1/4*E(4), -1/4, 1/4, -1/4*E(4) ], [ 1/4, -1/4, 1/4*E(4), -1/4*E(4), 0, 1/4, 1/4*E(4), -1/4*E(4), -1/4, -1/4*E(4), 1/4*E(4), -1/4, 1/4, 0, 0, 0, 0, 0, -1/4*E(4), 1/4, -1/4, 1/4*E(4) ], [ 1/4, -1/4, 1/4*E(4), -1/4*E(4), 0, -1/4*E(4), 1/4, -1/4, 1/4*E(4), 1/4*E(4), -1/4*E(4), 1/4, -1/4, 0, 0, 0, 0, 0, 1/4, 1/4*E(4), -1/4*E(4), -1/4 ], [ 1/4, 1/4, -1/4, -1/4, 0, 1/4*E(4), -1/4*E(4), -1/4*E(4), 1/4*E(4), 1/4, 1/4, -1/4, -1/4, 0, 0, 0, 0, 0, 1/4*E(4), -1/4*E(4), -1/4*E(4), 1/4*E(4) ], [ 1/4, 1/4, -1/4, -1/4, 0, -1/4*E(4), 1/4*E(4), 1/4*E(4), -1/4*E(4), 1/4, 1/4, -1/4, -1/4, 0, 0, 0, 0, 0, -1/4*E(4), 1/4*E(4), 1/4*E(4), -1/4*E(4) ], [ 1/4, 1/4, -1/4, -1/4, 0, 1/4, -1/4, -1/4, 1/4, -1/4, -1/4, 1/4, 1/4, 0, 0, 0, 0, 0, -1/4, 1/4, 1/4, -1/4 ], [ 1/4, 1/4, -1/4, -1/4, 0, -1/4, 1/4, 1/4, -1/4, -1/4, -1/4, 1/4, 1/4, 0, 0, 0, 0, 0, 1/4, -1/4, -1/4, 1/4 ], [ 1/5, 1/5, 1/5, 1/5, -1/5, 0, 0, 0, 0, 0, 0, 0, 0, 4/5, -1/5, -1/5, -1/5, -1/5, 0, 0, 0, 0 ], [ 1/5, 1/5, 1/5, 1/5, -1/5, 0, 0, 0, 0, 0, 0, 0, 0, -1/5, -1/5*E(5)-2/5*E(5)^2-2/5*E(5)^3-1/5*E(5)^4, 2/5*E(5)+2/5*E(5)^4, 2/5*E(5)^2+2/5*E(5)^3, -2/5*E(5)-1/5*E(5)^2-1/5*E(5)^3-2/5*E(5)^4, 0, 0, 0, 0 ], [ 1/5, 1/5, 1/5, 1/5, -1/5, 0, 0, 0, 0, 0, 0, 0, 0, -1/5, 2/5*E(5)+2/5*E(5)^4, -2/5*E(5)-1/5*E(5)^2-1/5*E(5)^3-2/5*E(5)^4, -1/5*E(5)-2/5*E(5)^2-2/5*E(5)^3-1/5*E(5)^4, 2/5*E(5)^2+2/5*E(5)^3, 0, 0, 0, 0 ], [ 1/5, 1/5, 1/5, 1/5, -1/5, 0, 0, 0, 0, 0, 0, 0, 0, -1/5, 2/5*E(5)^2+2/5*E(5)^3, -1/5*E(5)-2/5*E(5)^2-2/5*E(5)^3-1/5*E(5)^4, -2/5*E(5)-1/5*E(5)^2-1/5*E(5)^3-2/5*E(5)^4, 2/5*E(5)+2/5*E(5)^4, 0, 0, 0, 0 ], [ 1/5, 1/5, 1/5, 1/5, -1/5, 0, 0, 0, 0, 0, 0, 0, 0, -1/5, -2/5*E(5)-1/5*E(5)^2-1/5*E(5)^3-2/5*E(5)^4, 2/5*E(5)^2+2/5*E(5)^3, 2/5*E(5)+2/5*E(5)^4, -1/5*E(5)-2/5*E(5)^2-2/5*E(5)^3-1/5*E(5)^4, 0, 0, 0, 0 ], [ 1/4, -1/4, -1/4*E(4), 1/4*E(4), 0, -1/4, 1/4*E(4), -1/4*E(4), 1/4, 1/4*E(4), -1/4*E(4), -1/4, 1/4, 0, 0, 0, 0, 0, -1/4*E(4), -1/4, 1/4, 1/4*E(4) ], [ 1/4, -1/4, -1/4*E(4), 1/4*E(4), 0, -1/4*E(4), -1/4, 1/4, 1/4*E(4), -1/4*E(4), 1/4*E(4), 1/4, -1/4, 0, 0, 0, 0, 0, -1/4, 1/4*E(4), -1/4*E(4), 1/4 ], [ 1/4, -1/4, -1/4*E(4), 1/4*E(4), 0, 1/4*E(4), 1/4, -1/4, -1/4*E(4), -1/4*E(4), 1/4*E(4), 1/4, -1/4, 0, 0, 0, 0, 0, 1/4, -1/4*E(4), 1/4*E(4), -1/4 ], [ 1/4, -1/4, -1/4*E(4), 1/4*E(4), 0, 1/4, -1/4*E(4), 1/4*E(4), -1/4, 1/4*E(4), -1/4*E(4), -1/4, 1/4, 0, 0, 0, 0, 0, 1/4*E(4), 1/4, -1/4, -1/4*E(4) ]]; T := [ 1, 1, 1, 1, 1, -E(8)^3, -E(8), E(8), E(8)^3, 1, 1, -1, -1, 1, E(5)^3, E(5), E(5)^4, E(5)^2, -E(8), -E(8)^3, E(8)^3, E(8) ]; return rec(S := S, T := T);;