Re: elltors

["Prof. J. E. Cremona" <John.Cremona@maths.nott.ac.uk>]

Thanks for the patch, Igor, which fixed the compilation.  Now I get
three problems with "make bench".  This is on a DEC alpha with EV6
processor running DEC unix (OSF1 V4.0).  (NB this is a different
machine from the alpha listed in the MACHINES file with my initials!).

* Testing objets        for gp-sta..TIME=16     for gp-dyn..TIME=16
* Testing analyz        for gp-sta..TIME=376    for gp-dyn..TIME=393
* Testing number        for gp-sta..TIME=442    for gp-dyn..TIME=456
* Testing polyser       for gp-sta..TIME=67     for gp-dyn..TIME=74
* Testing linear        for gp-sta..TIME=76     for gp-dyn..TIME=86
* Testing elliptic      for gp-sta..BUG [262]   for gp-dyn..BUG [290]
* Testing sumiter       for gp-sta..TIME=452    for gp-dyn..TIME=508
* Testing graph         for gp-sta..BUG [91]    for gp-dyn..BUG [106]
* Testing program       for gp-sta..BUG [127]   for gp-dyn..BUG [144]
* Testing trans         for gp-sta..TIME=545    for gp-dyn..TIME=581
* Testing nfields       for gp-sta..TIME=3764   for gp-dyn..TIME=4216
+++ [BUG] Total bench for gp-sta is 3206
+++ [BUG] Total bench for gp-dyn is 3497

PROBLEMS WERE NOTED. The following files list them in diff format: 
Directory: /usr/home/jec/pari-2.0.15.beta/o.osf1-alpha
        elliptic-sta.dif
        graph-sta.dif
        program-sta.dif
        elliptic-dyn.dif
        graph-dyn.dif
        program-dyn.dif

Since I hope there is someone out there who might be able to fix these
things, here are the *-sta.dif files (the *-dyn.dif files are the same
except for the timings).

======================================================================
        elliptic-sta.dif
======================================================================

*** ../src/test/64/elliptic	Fri May 21 10:36:26 1999
--- gp.out	Thu Jun  3 18:04:08 1999
***************
*** 117,123 ****
  ? ellorder(tcurve,[1,2])
  6
  ? elltors(tcurve)
! [12, [6, 2], [[1, 2], [7/4, -11/8]]]
  ? mcurve=ellinit([0,0,0,-17,0])
  [0, 0, 0, -17, 0, 0, -34, 0, -289, 816, 0, 314432, 1728, [4.1231056256176605
  498214098559740770251, 0.E-38, -4.1231056256176605498214098559740770251]~, 1
--- 117,123 ----
  ? ellorder(tcurve,[1,2])
  6
  ? elltors(tcurve)
!   ***   bad argument for an elliptic curve related function
  ? mcurve=ellinit([0,0,0,-17,0])
  [0, 0, 0, -17, 0, 0, -34, 0, -289, 816, 0, 314432, 1728, [4.1231056256176605
  498214098559740770251, 0.E-38, -4.1231056256176605498214098559740770251]~, 1
***************
*** 159,165 ****
  ? precision(cmcurve)
  38
  ? getheap
! [56, 4256]
  ? print("Total time spent: ",gettime);
! Total time spent: 464
  ? \q
--- 159,165 ----
  ? precision(cmcurve)
  38
  ? getheap
! [55, 4203]
  ? print("Total time spent: ",gettime);
! Total time spent: 262
  ? \q

======================================================================
        graph-sta.dif
======================================================================

*** ../src/test/64/graph	Fri May 21 19:00:51 1999
--- gp.out	Thu Jun  3 18:04:10 1999
***************
*** 5,10 ****
--- 5,11 ----
  ? plotmove(0,0,0);plotbox(0,500,500)
  ? plotmove(0,200,150)
  ? plotcursor(0)
+ [200, 150]
  ? psdraw([0,0,0])
  ? plotinit(1,700,700)
  ? plotkill(1)
***************
*** 11,16 ****
--- 12,18 ----
  ? plotmove(0,0,900);plotlines(0,900,0)
  ? plotlines(0,vector(5,k,50*k),vector(5,k,10*k*k))
  ? plotmove(0,243,583);plotcursor(0)
+ [243, 583]
  ? plot(x=-5,5,sin(x))
  
  0.9995545 x""x_''''''''''''''''''''''''''''''''''_x""x'''''''''''''''''''|
***************
*** 54,60 ****
--- 56,64 ----
  ? plotmove(0,50,50);plotrbox(0,50,50)
  ? plotrline(0,200,150)
  ? plotcursor(0)
+ [250, 200]
  ? plotrmove(0,5,5);plotcursor(0)
+ [255, 205]
  ? plotrpoint(0,20,20)
  ? plotinit(3,600,600);plotscale(3,-7,7,-2,2);plotcursor(3)
  [-7, 2]
***************
*** 64,68 ****
  ? getheap
  [11, 197]
  ? print("Total time spent: ",gettime);
! Total time spent: 182
  ? \q
--- 68,72 ----
  ? getheap
  [11, 197]
  ? print("Total time spent: ",gettime);
! Total time spent: 91
  ? \q

======================================================================
        program-sta.dif
======================================================================

*** ../src/test/64/program	Fri May 21 10:36:53 1999
--- gp.out	Thu Jun  3 18:04:10 1999
***************
*** 111,117 ****
  3
  ? kill(addii)
  ? getheap
! [21, 1568]
  ? print("Total time spent: ",gettime);
! Total time spent: 253
  ? \q
--- 111,117 ----
  3
  ? kill(addii)
  ? getheap
! [21, 1569]
  ? print("Total time spent: ",gettime);
! Total time spent: 127
  ? \q