"Source: Text/Module/Multilinear.text";
"Line: 290";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Module/Multilinear.text, line: 290
// Example: H63E4 ()
print "Example: H63E4";
ei := GetEchoInput();
SetEchoInput(true);
K := RealField(5);
V := VectorSpace(K, 3);
CP := function(x)
  return V![x[1][2]*x[2][3] - x[1][3]*x[2][2], 
    x[1][3]*x[2][1] - x[1][1]*x[2][3], 
    x[1][1]*x[2][2] - x[1][2]*x[2][1] ];
end function;
t := Tensor([V, V, V], CP);
t;
// test that i x j = k
<[1,0,0], [0,1,0]> @ t eq V.3;
SetEchoInput(ei);
