local S, T; S := [[ 1/24, 1/24, 1/12, 1/8, 1/8, 1/4, 1/4, 1/4, 1/4, 1/3, 1/3, 1/3, 1/8, 1/8, 1/8, 1/8, 1/4, 1/4, 1/4, 1/4, 1/4 ], [ 1/24, 1/24, 1/12, 1/8, 1/8, -1/4, -1/4, -1/4, -1/4, 1/3, 1/3, 1/3, 1/8, 1/8, 1/8, 1/8, 1/4, -1/4, -1/4, -1/4, -1/4 ], [ 1/12, 1/12, 1/6, 1/4, 1/4, 0, 0, 0, 0, -1/3, -1/3, -1/3, 1/4, 1/4, 1/4, 1/4, 1/2, 0, 0, 0, 0 ], [ 1/8, 1/8, 1/4, 3/8, 3/8, -1/4, -1/4, -1/4, -1/4, 0, 0, 0, -1/8, -1/8, -1/8, -1/8, -1/4, 1/4, 1/4, 1/4, 1/4 ], [ 1/8, 1/8, 1/4, 3/8, 3/8, 1/4, 1/4, 1/4, 1/4, 0, 0, 0, -1/8, -1/8, -1/8, -1/8, -1/4, -1/4, -1/4, -1/4, -1/4 ], [ 1/4, -1/4, 0, -1/4, 1/4, 1/4-1/4*E(4), 1/4+1/4*E(4), -1/4-1/4*E(4), -1/4+1/4*E(4), 0, 0, 0, 1/4*E(4), -1/4*E(4), 1/4*E(4), -1/4*E(4), 0, 0, 0, 0, 0 ], [ 1/4, -1/4, 0, -1/4, 1/4, 1/4+1/4*E(4), 1/4-1/4*E(4), -1/4+1/4*E(4), -1/4-1/4*E(4), 0, 0, 0, -1/4*E(4), 1/4*E(4), -1/4*E(4), 1/4*E(4), 0, 0, 0, 0, 0 ], [ 1/4, -1/4, 0, -1/4, 1/4, -1/4-1/4*E(4), -1/4+1/4*E(4), 1/4-1/4*E(4), 1/4+1/4*E(4), 0, 0, 0, -1/4*E(4), 1/4*E(4), -1/4*E(4), 1/4*E(4), 0, 0, 0, 0, 0 ], [ 1/4, -1/4, 0, -1/4, 1/4, -1/4+1/4*E(4), -1/4-1/4*E(4), 1/4+1/4*E(4), 1/4-1/4*E(4), 0, 0, 0, 1/4*E(4), -1/4*E(4), 1/4*E(4), -1/4*E(4), 0, 0, 0, 0, 0 ], [ 1/3, 1/3, -1/3, 0, 0, 0, 0, 0, 0, 2/3, -1/3, -1/3, 0, 0, 0, 0, 0, 0, 0, 0, 0 ], [ 1/3, 1/3, -1/3, 0, 0, 0, 0, 0, 0, -1/3, -1/3, 2/3, 0, 0, 0, 0, 0, 0, 0, 0, 0 ], [ 1/3, 1/3, -1/3, 0, 0, 0, 0, 0, 0, -1/3, 2/3, -1/3, 0, 0, 0, 0, 0, 0, 0, 0, 0 ], [ 1/8, 1/8, 1/4, -1/8, -1/8, 1/4*E(4), -1/4*E(4), -1/4*E(4), 1/4*E(4), 0, 0, 0, -1/8+1/4*E(4), -1/8+1/4*E(4), -1/8-1/4*E(4), -1/8-1/4*E(4), 1/4, 1/4, -1/4, -1/4, 1/4 ], [ 1/8, 1/8, 1/4, -1/8, -1/8, -1/4*E(4), 1/4*E(4), 1/4*E(4), -1/4*E(4), 0, 0, 0, -1/8+1/4*E(4), -1/8+1/4*E(4), -1/8-1/4*E(4), -1/8-1/4*E(4), 1/4, -1/4, 1/4, 1/4, -1/4 ], [ 1/8, 1/8, 1/4, -1/8, -1/8, 1/4*E(4), -1/4*E(4), -1/4*E(4), 1/4*E(4), 0, 0, 0, -1/8-1/4*E(4), -1/8-1/4*E(4), -1/8+1/4*E(4), -1/8+1/4*E(4), 1/4, -1/4, 1/4, 1/4, -1/4 ], [ 1/8, 1/8, 1/4, -1/8, -1/8, -1/4*E(4), 1/4*E(4), 1/4*E(4), -1/4*E(4), 0, 0, 0, -1/8-1/4*E(4), -1/8-1/4*E(4), -1/8+1/4*E(4), -1/8+1/4*E(4), 1/4, 1/4, -1/4, -1/4, 1/4 ], [ 1/4, 1/4, 1/2, -1/4, -1/4, 0, 0, 0, 0, 0, 0, 0, 1/4, 1/4, 1/4, 1/4, -1/2, 0, 0, 0, 0 ], [ 1/4, -1/4, 0, 1/4, -1/4, 0, 0, 0, 0, 0, 0, 0, 1/4, -1/4, -1/4, 1/4, 0, 1/4*E(8)-1/4*E(8)^3, -1/4*E(8)+1/4*E(8)^3, 1/4*E(8)-1/4*E(8)^3, -1/4*E(8)+1/4*E(8)^3 ], [ 1/4, -1/4, 0, 1/4, -1/4, 0, 0, 0, 0, 0, 0, 0, -1/4, 1/4, 1/4, -1/4, 0, -1/4*E(8)+1/4*E(8)^3, -1/4*E(8)+1/4*E(8)^3, 1/4*E(8)-1/4*E(8)^3, 1/4*E(8)-1/4*E(8)^3 ], [ 1/4, -1/4, 0, 1/4, -1/4, 0, 0, 0, 0, 0, 0, 0, -1/4, 1/4, 1/4, -1/4, 0, 1/4*E(8)-1/4*E(8)^3, 1/4*E(8)-1/4*E(8)^3, -1/4*E(8)+1/4*E(8)^3, -1/4*E(8)+1/4*E(8)^3 ], [ 1/4, -1/4, 0, 1/4, -1/4, 0, 0, 0, 0, 0, 0, 0, 1/4, -1/4, -1/4, 1/4, 0, -1/4*E(8)+1/4*E(8)^3, 1/4*E(8)-1/4*E(8)^3, -1/4*E(8)+1/4*E(8)^3, 1/4*E(8)-1/4*E(8)^3 ]]; T := [ 1, 1, 1, 1, 1, -1, -1, 1, 1, 1, E(3), E(3)^2, E(4), E(4), E(4), E(4), -E(4), E(16)^7, E(16)^3, -E(16)^3, -E(16)^7 ]; return rec(S := S, T := T);;