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