"Source: Text/Module/Multilinear.text";
"Line: 3350";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Module/Multilinear.text, line: 3350
// Example: H63E44 ()
print "Example: H63E44";
ei := GetEchoInput();
SetEchoInput(true);
t := Tensor(Rationals(), [3, 3, 2], &cat[[1,-1,0] : i in [1..6]]);
t := AlternatingTensor(t);
t;
SystemOfForms(t);
L := HeisenbergLieAlgebra(t);
L;
SystemOfForms(Tensor(L))[7..8];
NilCat := TensorCategory([1, 1, 1], {{2,1},{0}});
NilCat;
ChangeTensorCategory(~t, NilCat);
L := HeisenbergLieAlgebra(t);
L;
SystemOfForms(Tensor(L))[4..5];
SetEchoInput(ei);
