multigrading.lib
LIB "multigrading.lib"; intmat S1[2][2] = 1,0, 0,1; intmat L1[2][1] = 2, 0; intmat S2[2][1] = 1, 0; intmat L2[2][1] = 2, 0; list G = createGroup(S1,L1); list H = createGroup(S2,L2); list N = factorgroup(G,H); print(N); ==> [1]: ==> 1,0, ==> 0,1 ==> [2]: ==> 2,1, ==> 0,0 kill G,H,N,S1,L1,S2,L2;