Size: 374
Comment:
|
Size: 395
Comment:
|
Deletions are marked like this. | Additions are marked like this. |
Line 15: | Line 15: |
with(LinearAlgebra): |
Fast Hermite Normal Form over ZZ
Mathematica code:
sage: mathematica.eval('a = Table[RandomInteger[{0,9}], {i,200}, {j,200}];') sage: mathematica.eval('Timing[HermiteDecomposition[a];]') {98.9791, Null}
Maple code:
with(LinearAlgebra): n := 200: k := 9: A := RandomMatrix(n,n,generator=rand(-k..k)): time( HermiteForm(A,output=['H', 'U']) );