"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "src/test/in/mf" between
pari-2.13.0.tar.gz and pari-2.13.1.tar.gz

About: PARI/GP is a computer algebra system designed for fast computations in number theory (factorizations, algebraic number theory, elliptic curves...), but also contains a large number of other mathematical functions.

mf  (pari-2.13.0):mf  (pari-2.13.1)
skipping to change at line 356 skipping to change at line 356
mfperiodpol(mf,f1) mfperiodpol(mf,f1)
f1=mfsymbol(mf,f1); f2=mfsymbol(mf,f2); f1=mfsymbol(mf,f1); f2=mfsymbol(mf,f2);
mfperiodpol(mf,f1) mfperiodpol(mf,f1)
mfperiodpol(mf,f2) mfperiodpol(mf,f2)
mfsymboleval(f1,[0,oo]) mfsymboleval(f1,[0,oo])
mfsymboleval(f1,[1/2 + I/10000,oo]) mfsymboleval(f1,[1/2 + I/10000,oo])
mfsymboleval(f1,[1/2 + I/20,oo]) mfsymboleval(f1,[1/2 + I/20,oo])
mfsymboleval(f1,[1/2 + I/(20+1e-10),oo]) mfsymboleval(f1,[1/2 + I/(20+1e-10),oo])
mfsymboleval(f1,[1/3,1/2]) mfsymboleval(f1,[1/3,1/2])
mfsymboleval(f2,[1/3,1/2]) mfsymboleval(f2,[1/3,1/2])
mfsymboleval(f2,[1/2,1/2]) \\ #2260
mfpetersson(f1) mfpetersson(f1)
m=mfpetersson(f2); m=mfpetersson(f2);
if (abs(m[2,1]) < 1e-38, m[2,1]=0); if (abs(m[2,1]) < 1e-38, m[2,1]=0);
if (abs(m[1,2]) < 1e-38, m[1,2]=0); m if (abs(m[1,2]) < 1e-38, m[1,2]=0); m
normlp(mfpetersson(f1,f2)) < 1e-38 normlp(mfpetersson(f1,f2)) < 1e-38
normlp(mfpetersson(f2,f1)) < 1e-38 normlp(mfpetersson(f2,f1)) < 1e-38
L=mfmanin(f2)[1]; L=mfmanin(f2)[1];
liftpol(L[1]) liftpol(L[1])
L[2][3] L[2][3]
skipping to change at line 703 skipping to change at line 704
mfdescribe(E,&g); mfdescribe(E,&g);
apply(mfdescribe,g[1]) apply(mfdescribe,g[1])
f1=mffromqf(matdiagonal([1,6,36]*2))[2]; f1=mffromqf(matdiagonal([1,6,36]*2))[2];
f2=mffromqf(matdiagonal([4,6,9]*2))[2]; f2=mffromqf(matdiagonal([4,6,9]*2))[2];
F=mflinear([f1,f2],[1,-1]/2); F=mflinear([f1,f2],[1,-1]/2);
mf=mfinit(F); mf=mfinit(F);
[mf2,g]=mfshimura(mf,F); [mf2,g]=mfshimura(mf,F);
mfcuspval(mf2,g,0) mfcuspval(mf2,g,0)
T3=mfpow(T,3);mf=mfinit(T3);
[mf,TSHI,res]=mfshimura(mf,T3);
mfcoefs(TSHI,10)
T5=mfpow(T,5); T5=mfpow(T,5);
[mf,TSHI,res]=mfshimura(mfinit(T5),T5); [mf,TSHI,res]=mfshimura(mfinit(T5),T5);
mfcoefs(TSHI,10) mfcoefs(TSHI,10)
mftobasis(mfinit(TSHI,4),TSHI) mftobasis(mfinit(TSHI,4),TSHI)
F4=mfmul(mfbd(T,4),mffrometaquo([8,1;16,1])); F4=mfmul(mfbd(T,4),mffrometaquo([8,1;16,1]));
F4S=mfshimura(mfinit(F4),F4)[2];mfcoefs(F4S,20) F4S=mfshimura(mfinit(F4),F4)[2];mfcoefs(F4S,20)
EH=mfEH(13/2); EH=mfEH(13/2);
mfdescribe(EH); mfdescribe(EH);
mfcoef(EH,1001) mfcoef(EH,1001)
mfcoef(EH,13*5^2) mfcoef(EH,13*5^2)
skipping to change at line 759 skipping to change at line 763
mfsymboleval(ES,[1,I]) mfsymboleval(ES,[1,I])
mfcuspval(mf,E,1/2) mfcuspval(mf,E,1/2)
mffrometaquo([1,-24]) mffrometaquo([1,-24])
mfcoefs(mffrometaquo([1,-24],1),6) mfcoefs(mffrometaquo([1,-24],1),6)
mf=mfinit([53,2]); mf=mfinit([53,2]);
F=mfeigenbasis(mf)[1]; F=mfeigenbasis(mf)[1];
ms=mfsymbol(mf,F);mfpetersson(ms) ms=mfsymbol(mf,F);mfpetersson(ms)
f=mfeisenstein(4,Mod(1,2),Mod(1,2)); vec(f)
getcache()[,1..4] getcache()[,1..4]
\\ ERRORS, leave at end of bench \\ ERRORS, leave at end of bench
mftobasis(mf0,L[1]) mftobasis(mf0,L[1])
mfdim([4,1/2],0) mfdim([4,1/2],0)
mfdim([4,1/2],2) mfdim([4,1/2],2)
mfdim([4,1/2],5) mfdim([4,1/2],5)
mfeisenstein(2,1.0) mfeisenstein(2,1.0)
mfeisenstein(2,[0,0]) mfeisenstein(2,[0,0])
 End of changes. 3 change blocks. 
0 lines changed or deleted 6 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)