===================================================================
RCS file: /home/cvs/OpenXM_contrib/pari-2.2/src/test/in/Attic/compat,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -p -r1.1 -r1.2
--- OpenXM_contrib/pari-2.2/src/test/in/Attic/compat	2001/10/02 11:17:13	1.1
+++ OpenXM_contrib/pari-2.2/src/test/in/Attic/compat	2002/09/11 07:27:13	1.2
@@ -76,9 +76,9 @@ setrand(1);buchgenfu(x^2-x-100000)
 setrand(1);buchgenforcefu(x^2-x-100000)
 setrand(1);buchgenfu(x^4+24*x^2+585*x+1791,0.1,0.1)
 buchnarrow(bnf)
-buchray(bnf,[[5,3;0,1],[1,0]])
-bnr=buchrayinitgen(bnf,[[5,3;0,1],[1,0]])
-bnr2=buchrayinitgen(bnf,[[25,13;0,1],[1,1]])
+buchray(bnf,[[5,4;0,1],[1,0]])
+bnr=buchrayinitgen(bnf,[[5,4;0,1],[1,0]])
+bnr2=buchrayinitgen(bnf,[[25,14;0,1],[1,1]])
 bytesize(%)
 \\ C
 ceil(-2.5)
@@ -105,7 +105,7 @@ compositum(x^4-4*x+2,x^3-x-1)
 compositum2(x^4-4*x+2,x^3-x-1)
 comprealraw(qfr(5,3,-1,0.),qfr(7,1,-1,0.))
 concat([1,2],[3,4])
-conductor(bnf,[[25,13;0,1],[1,1]])
+conductor(bnf,[[25,14;0,1],[1,1]])
 conductorofchar(bnr,[2])
 conj(1+i)
 conjvec(mod(x^2+x+1,x^3-x-1))
@@ -278,15 +278,15 @@ intnum(x=-0.5,0.5,1/sqrt(1-x^2))
 inverseimage([1,1;2,3;5,7],[2,2,6]~)
 isdiagonal([1,0,0;0,5,0;0,0,0])
 isfund(12345)
-isideal(bnf[7],[5,1;0,1])
+isideal(bnf[7],[5,2;0,1])
 isincl(x^2+1,x^4+1)
 isinclfast(initalg(x^2+1),initalg(x^4+1))
 isirreducible(x^5+3*x^3+5*x^2+15)
 isisom(x^3+x^2-2*x-1,x^3+x^2-2*x-1)
 isisomfast(initalg(x^3-2),initalg(x^3-6*x^2-6*x-30))
 isprime(12345678901234567)
-isprincipal(bnf,[5,1;0,1])
-isprincipalgen(bnf,[5,1;0,1])
+isprincipal(bnf,[5,2;0,1])
+isprincipalgen(bnf,[5,2;0,1])
 isprincipalraygen(bnr,primedec(bnf,7)[1])
 ispsp(73!+1)
 isqrt(10!^2+1)
@@ -484,7 +484,7 @@ quadgen(-11)
 quadpoly(-11)
 \\ R
 rank(matrix(5,5,x,y,x+y))
-rayclassno(bnf,[[5,3;0,1],[1,0]])
+rayclassno(bnf,[[5,4;0,1],[1,0]])
 rayclassnolist(bnf,lu)
 move(0,50,50);rbox(0,50,50)
 print1("give a value for s? ");s=read();print(1/s)