"Source: Text/System/Par.text";
"Line: 429";
"Date: Thu Jul 13 10:19:10 2023";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/System/Par.text, line: 429
// Example: H5E2 ()
print "Example: H5E2";
ei := GetEchoInput();
SetEchoInput(true);
// no-test
SetGPU(false);
X := Random(MatrixRing(GF(5), 10000));
time P := X*X; // no GPU
time E,T := EchelonForm(X);
SetGPU(true);
time P2 := X*X; // 1 GPU
time E,T := EchelonForm(X);
assert P2 eq P;
SetEchoInput(ei);
