===================================================================
RCS file: /home/cvs/OpenXM_contrib/pari-2.2/src/test/32/Attic/linear,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -p -r1.1 -r1.2
--- OpenXM_contrib/pari-2.2/src/test/32/Attic/linear	2001/10/02 11:17:13	1.1
+++ OpenXM_contrib/pari-2.2/src/test/32/Attic/linear	2002/09/11 07:27:09	1.2
@@ -12,10 +12,10 @@ z^3 + 7*z^2 + 16*z - 19
 z^2 - 5*z - 2
 ? charpoly(Mod(1,8191)*[1,2;3,4],z,2)
 z^2 + Mod(8186, 8191)*z + Mod(8189, 8191)
-? lindep(Mod(1,7)*[2,-1;1,3],-1)
+? lindep(Mod(1,7)*[2,-1;1,3],-2)
 [Mod(6, 7), Mod(5, 7)]~
 ? lindep([(1-3*sqrt(2))/(3-2*sqrt(3)),1,sqrt(2),sqrt(3),sqrt(6)])
-[-3, -3, 9, -2, 6]
+[3, 3, -9, 2, -6]~
 ? lindep([(1-3*sqrt(2))/(3-2*sqrt(3)),1,sqrt(2),sqrt(3),sqrt(6)],14)
 [-3, -3, 9, -2, 6]
 ? matadjoint([1,2;3,4])
@@ -289,19 +289,19 @@ z^2 + Mod(8186, 8191)*z + Mod(8189, 8191)
 
 [0 1 -1]
 
-? matkerint(matrix(4,6,x,y,2520/(x+y)),2)
+? matkerint(matrix(4,6,x,y,2520/(x+y)))
 
-[3 1]
+[-3 -1]
 
-[-30 -15]
+[30 15]
 
-[70 70]
+[-70 -70]
 
-[0 -140]
+[0 140]
 
-[-126 126]
+[126 -126]
 
-[84 -42]
+[-84 42]
 
 ? matmuldiagonal(amat,[1,2,3,4,5,6,7])
 
@@ -515,21 +515,7 @@ z^2 + Mod(8186, 8191)*z + Mod(8189, 8191)
 [-60 -105 280 252 -486 471 1290]
 
 ? qflll(m,7)
-
-[-420 -420 840 630 -1092 757 2982]
-
-[-210 -280 630 504 -876 700 2415]
-
-[-140 -210 504 420 -749 641 2050]
-
-[-105 -168 420 360 -658 589 1785]
-
-[-84 -140 360 315 -588 544 1582]
-
-[-70 -120 315 280 -532 505 1421]
-
-[-60 -105 280 252 -486 471 1290]
-
+  ***   invalid flag in qflll.
 ? qflllgram(m)
 
 [1 1 27 -27 69 0 141]
@@ -547,21 +533,7 @@ z^2 + Mod(8186, 8191)*z + Mod(8189, 8191)
 [0 1 3 -17 3 -7 3]
 
 ? qflllgram(m,7)
-
-[1 1 27 -27 69 0 141]
-
-[0 1 4 -22 34 -24 49]
-
-[0 1 3 -21 18 -24 23]
-
-[0 1 3 -20 10 -19 13]
-
-[0 1 3 -19 6 -14 8]
-
-[0 1 3 -18 4 -10 5]
-
-[0 1 3 -17 3 -7 3]
-
+  ***   invalid flag in qflllgram.
 ? qflllgram(m,1)
 
 [1 1 27 -27 69 0 141]
@@ -632,22 +604,6 @@ z^2 + Mod(8186, 8191)*z + Mod(8189, 8191)
 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0
 ; 1, 0, 0, 0, 0, 0, 0; 0, 1, 0, 0, 0, 0, 0; 0, 0, 1, 0, 0, 0, 0; 0, 0, 0, 1,
  0, 0, 0; 0, 0, 0, 0, 1, 0, 0; 0, 0, 0, 0, 0, 1, 0; 0, 0, 0, 0, 0, 0, 1]]
-? qflll(m,3)
-
-[-420 -420 840 630 -1092 -83 2982]
-
-[-210 -280 630 504 -876 70 2415]
-
-[-140 -210 504 420 -749 137 2050]
-
-[-105 -168 420 360 -658 169 1785]
-
-[-84 -140 360 315 -588 184 1582]
-
-[-70 -120 315 280 -532 190 1421]
-
-[-60 -105 280 252 -486 191 1290]
-
 ? qfminim([2,1;1,2],4,6)
 [6, 2, [0, -1, 1; 1, 1, 0]]
 ? qfperfection([2,0,1;0,2,1;1,1,2])
@@ -776,7 +732,7 @@ z^2 + Mod(8186, 8191)*z + Mod(8189, 8191)
 [[4, 13, 3, 17, 14]~ [14, 16, 11, 5, 4]~ [9, 11, 13, 7, 15]~]
 
 ? getheap
-[111, 12331]
+[109, 11701]
 ? print("Total time spent: ",gettime);
-Total time spent: 180
+Total time spent: 40
 ? \q