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