Annotation of OpenXM_contrib/pari-2.2/src/test/64/sumiter, Revision 1.1
1.1 ! noro 1: realprecision = 19 significant digits
! 2: echo = 1 (on)
! 3: ? intnum(x=0,Pi,sin(x),1)
! 4: 2.000000000000000017
! 5: ? sqr(2*intnum(x=0,4,exp(-x^2),1))
! 6: 3.141592556720305685
! 7: ? 4*intnum(x=1,10^20,1/(1+x^2),2)
! 8: 3.141592653589793208
! 9: ? intnum(x=-0.5,0.5,1/sqrt(1-x^2))
! 10: 1.047197551196597747
! 11: ? 2*intnum(x=0,100,sin(x)/x,3)
! 12: 3.124450933778112629
! 13: ? \p38
! 14: realprecision = 38 significant digits
! 15: ? prod(k=1,10,1+1/k!)
! 16: 3335784368058308553334783/905932868585678438400000
! 17: ? prod(k=1,10,1+1./k!)
! 18: 3.6821540356142043935732308433185262946
! 19: ? Pi^2/6*prodeuler(p=2,10000,1-p^-2)
! 20: 1.0000098157493066238697591433298145174
! 21: ? prodinf(n=0,(1+2^-n)/(1+2^(-n+1)))
! 22: 0.33333333333333333333333333333333333320
! 23: ? prodinf(n=0,-2^-n/(1+2^(-n+1)),1)
! 24: 0.33333333333333333333333333333333333320
! 25: ? solve(x=1,4,sin(x))
! 26: 3.1415926535897932384626433832795028841
! 27: ? sum(k=1,10,2^-k)
! 28: 1023/1024
! 29: ? sum(k=1,10,2.^-k)
! 30: 0.99902343750000000000000000000000000000
! 31: ? 4*sumalt(n=0,(-1)^n/(2*n+1))
! 32: 3.1415926535897932384626433832795028841
! 33: ? 4*sumalt(n=0,(-1)^n/(2*n+1),1)
! 34: 3.1415926535897932384626433832795028842
! 35: ? sumdiv(8!,x,x)
! 36: 159120
! 37: ? suminf(n=1,2.^-n)
! 38: 0.99999999999999999999999999999999999999
! 39: ? 6/Pi^2*sumpos(n=1,n^-2)
! 40: 0.99999999999999999999999999999999999999
! 41: ? getheap
! 42: [19, 161]
! 43: ? print("Total time spent: ",gettime);
! 44: Total time spent: 847
! 45: ? \q
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>