[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference wrksys::alphastation

Title:Alpha Workstation Conference
Notice:See note 1.* for conference notices
Moderator:WRKSYS::HOUSE
Created:Wed Sep 07 1994
Last Modified:Fri Jun 06 1997
Last Successful Update:Fri Jun 06 1997
Number of topics:1996
Total number of notes:9122

1657.0. "Need 1 min on 500/500" by TAV02::ZOHAR (Zohar Fuchs @ISO , 882-3065) Tue Oct 15 1996 09:40

T.RTitleUserPersonal
Name
DateLines
1657.1resultsWRKSYS::ROLLAWed Oct 16 1996 12:5413
1657.2expectationWRKSYS::ROLLAWed Oct 16 1996 12:5619
1657.3Pls run this on your AS500/500!TAV02::GLASSYossi Glass, 882-3254Mon May 05 1997 13:21265
We are trying to sell workstation(s) to an IBM customer. Last week, we ran
his benchmark on an AlphaStation 500/500, and it gave excellent results.

Now we got a second benchmark. However, all our workstations are gone to the 
local DECUS event. Can anybody compile the attached code, run it on
an AlphaStation 500/500, and send me the results (to [email protected]) 
or post them here?

Compile & test should take less than a minute or two.

The source file is attached.

Here is what I used to compile:
--------------
f77 -O5 -fast -inline speed -non_shared -om -o test.fast test.f -tune ev5
kf77 -O5 -inline speed -non_shared -om -o test.kap test.f -tune ev5
--------------

And to run the code:
----------------------------
time ./test.fast > output.fast
time ./test.kap > output.kap
--------------

(Don't bother about KAP if it is not installed. Just run the non-kapped 
binary).

If you run it, please post the 'time' outputs, and one of the output files
(output.fast or output.kap).

Thanks a lot,
Yossi.

		---------- source code ---------
      PROGRAM THREED
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
C
C      RED-BLACK RELAXATION
C
CVD$F NODEPCHK 
      COMMON/IQ/IQ
      EXTERNAL G,F
      IQ=1        
      ETA=.60
      DELTA=.125
      NX0=2 
      NY0=2
      NZ0=2
      H0=1.D0/2.D0
      M=7
C     TOL=8.D-5
      TOL=1.D-11
      WU=180.    
      CALL MULTIG(NX0,NY0,NZ0,H0,M,TOL,WU,G,F,ETA,DELTA)
         print *,iq
      STOP
      END 
      FUNCTION F(X,Y,Z)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      F=1.
      RETURN
      END 
      FUNCTION G(X,Y,Z)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      G=0.
      RETURN
      END 
      SUBROUTINE MULTIG(NX0,NY0,NZ0,H0,M,TOL,WMAX,G,F,ETA,DELTA)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      EXTERNAL G,F
      DIMENSION EPS(8)
      DO 1 K=1,M
      K2=2**(K-1)
      CALL GRDFN(K,NX0*K2+1,NY0*K2+1,NZ0*K2+1,H0/K2)
    1 CALL GRDFN(K+M,NX0*K2+1,NY0*K2+1,NZ0*K2+1,H0/K2)
      EPS(M)=TOL
      K=M 
      WU=0.
      CALL PUTF(M,G,0)
      CALL PUTF(M+M,F,2)
    5 ERR=1E+25
    3 ERRP=ERR
      CALL RELAX(K,K+M,ERR)
      WU=WU+8.**(K-M)
      PRINT 4,K,ERR,WU
    4 FORMAT('  LEVEL',I2,'  RESIDUAL NORM',E10.3,'  WORK',F7.3)
      IF(ERR.LT.EPS(K))GO TO 2
      IF(WU.GE.WMAX)RETURN
      IF(K.EQ.1.OR.ERR/ERRP.LT.ETA)GO TO 3
      IF(K.EQ.M)PRINT '(1X,50(1H.))'
      CALL RESCAL(K,K+M,K+M-1)
      EPS(K-1)=DELTA*ERR
      K=K-1
      CALL PUTZ(K)
      GO TO 5
    2 IF(K.EQ.M)RETURN
      CALL INTADD(K,K+1)
      K=K+1
      GO TO 5
      END 
      SUBROUTINE RELAX(N,NRHS,ERR)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      COMMON Q(5000000),IST(300),JST(300),IRHS(300),JRHS(300)
      CALL KEY(N,IST,JST,II,JJ,KK,H)
      CALL KEY(NRHS,IRHS,JRHS,II,JJ,KK,H)
      ERR=0.
      DO 1 KFL=0,1
      JFL=KFL
      DO 1 I=2,II-1 
      I0=IST(I)
      IM=IST(I-1)
      IP=IST(I+1)
      IR=IRHS(I)
      DO 1 J=2,JJ-1 
      J0=JST(J)
      JM=JST(J-1)
      JP=JST(J+1)
      JR=JRHS(J)
      if(jfl.eq.0)then
      jfl=1
      else
      jfl=0
      endif
      DO 1 K=2+JFL,KK-1,2
      A=Q(I0+J0+K+1)+Q(I0+J0+K-1)+Q(I0+JM+K)+Q(I0+JP+K)+
     +Q(IM+J0+K)+Q(IP+J0+K)-6.*Q(I0+J0+K)-Q(IR+JR+K)
      IF(KFL.EQ.1) ERR=ERR+A**2
    1 Q(I0+J0+K)=A*0.16666666666667D0+Q(I0+J0+K)
      ERR=SQRT(2.*ERR/H)
      RETURN
      END 
      SUBROUTINE RESCAL(NF,NRF,NRC)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      COMMON Q(5000000),IUF(300),JUF(300),IRF(300),JRF(300),IRC(150)
     ,,JRC(150)
      CALL KEY(NF,IUF,JUF,IIF,JJF,KKF,HF)
      CALL KEY(NRF,IRF,JRF,IIF,JJF,KKF,HF)
      CALL KEY(NRC,IRC,JRC,IIC,JJC,KKC,HC)
      IC=2
      DO 1 IF=3,IIF-2,2
      IU=IUF(IF)
      IP=IUF(IF+1)
      IM=IUF(IF-1)
      IR=IRF(IF)
      ICRHS=IRC(IC) 
      JC=2
      DO 2 JF=3,JJF-2,2
      JU=JUF(JF)
      JP=JUF(JF+1)
      JM=JUF(JF-1)
      JR=JRF(JF)
      JCRHS=JRC(JC) 
      KC=2
      DO 3 KF=3,KKF-2,2
      Q(ICRHS+JCRHS+KC)=2.*(Q(IR+JR+KF)-Q(IU+JU+KF+1)-Q(IU+JU+KF-1)-
     -Q(IU+JP+KF)-Q(IU+JM+KF)-Q(IP+JU+KF)-Q(IM+JU+KF)+6.*Q(IU+JU+KF)) 
    3 KC=KC+1
    2 JC=JC+1
    1 IC=IC+1
      RETURN
      END 
      SUBROUTINE INTADD(NC,NF)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      COMMON Q(5000000),IUF(300),JUF(300),IUC(150),JUC(150)
      CALL KEY(NF,IUF,JUF,IIF,JJF,KKF,H)
      CALL KEY(NC,IUC,JUC,IIC,JJC,KKC,HC)
      IC=2
      DO 1 IF=3,IIF,2
      IU=IUF(IF)
      IM=IUF(IF-1)
      IM2=IUF(IF-2) 
      ICU=IUC(IC)
      ICM=IUC(IC-1) 
      JC=2
      DO 2 JF=3,JJF,2
      JU=JUF(JF)
      JM=JUF(JF-1)
      JM2=JUF(JF-2) 
      JCU=JUC(JC)
      JCM=JUC(JC-1) 
      KC=2
      DO 3 KF=3,KKF,2
      Q(IU+JU+KF)=Q(IU+JU+KF)+Q(ICU+JCU+KC)
      A1=.5*(Q(ICU+JCU+KC-1)+Q(ICU+JCU+KC))
      A2=.5*(Q(ICU+JCM+KC)+Q(ICU+JCU+KC))
      A3=.5*(Q(ICM+JCU+KC)+Q(ICU+JCU+KC))
      Q(IU+JU+KF-1)=Q(IU+JU+KF-1)+A1
      Q(IU+JM+KF)=Q(IU+JM+KF)+A2
      Q(IM+JU+KF)=Q(IM+JU+KF)+A3
      B=Q(ICM+JCU+KC-1)+Q(ICM+JCU+KC)
      A12=.25*(2.*A1+Q(ICU+JCM+KC-1)+Q(ICU+JCM+KC))
      A13=.25*(2.*A1+B)
      A23=.25*(2.*A2+Q(ICM+JCM+KC)+Q(ICM+JCU+KC)) 
      Q(IU+JM+KF-1)=Q(IU+JM+KF-1)+A12
      Q(IM+JU+KF-1)=Q(IM+JU+KF-1)+A13
      Q(IM+JM+KF)=Q(IM+JM+KF)+A23
      A123=.125*(4.*A12+B+Q(ICM+JCM+KC-1)+Q(ICM+JCM+KC))
      Q(IM+JM+KF-1)=Q(IM+JM+KF-1)+A123
    3 KC=KC+1
    2 JC=JC+1
    1 IC=IC+1
      RETURN
      END 
      SUBROUTINE GRDFN(N,IMAX,JMAX,KMAX,HH)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      COMMON/GRD/NST(20),IMX(20),JMX(20),KMX(20),H(20)
      COMMON/IQ/IQ
      NST(N)=IQ
      IMX(N)=IMAX
      JMX(N)=JMAX
      KMX(N)=KMAX
      H(N)=HH
      IQ=IQ+IMAX*JMAX*KMAX
      RETURN
      END 
      SUBROUTINE KEY(N,IST,JST,IMAX,JMAX,KMAX,HH) 
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      COMMON/GRD/NST(20),IMX(20),JMX(20),KMX(20),H(20)
      DIMENSION IST(300),JST(300)
      IMAX=IMX(N)
      JMAX=JMX(N)
      KMAX=KMX(N)
      JK=JMAX*KMAX
      IS=NST(N)-JK-1
      DO 1 I=1,IMAX 
      IS=IS+JK
    1 IST(I)=IS
      JS=-KMAX
      DO 2 J=1,JMAX 
      JS=JS+KMAX
    2 JST(J)=JS
      HH=H(N)
      RETURN
      END 
      SUBROUTINE PUTF(N,F,NH) 
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      COMMON Q(5000000),IST(300),JST(300)
      CALL KEY(N,IST,JST,II,JJ,KK,H)
      H2=H**NH
      X=-H
      DO 1 I=1,II
      X=X+H
      Y=-H
      DO 1 J=1,JJ
      Y=Y+H
      Z=-H
      DO 1 K=1,KK
      Z=Z+H
    1 Q(IST(I)+JST(J)+K)=H2*F(X,Y,Z)
      RETURN
      END 
      SUBROUTINE PUTZ(N)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
      COMMON Q(5000000),IST(300),JST(300)
      CALL KEY(N,IST,JST,II,JJ,KK,H)
      DO 1 I=1,II
      DO 1 J=1,JJ
      DO 1 K=1,KK
    1 Q(IST(I)+JST(J)+K)=0.
      RETURN
      END 


		---------- end of source code ---------
1657.4consider also the PWS-au 500WRKSYS::SCHUMANNTue May 06 1997 18:167
Yossi,

Why not quote the new PWS-au. The 500 MHz PWS-au is almost as fast as
the 500/500, even with only 2 Mbyte cache.  SPECfp = 19.3 vs 20.4.
It's much cheaper.

--RS
1657.5Your computer time, please...TAV02::GLASSYossi Glass, 882-3254Fri May 09 1997 03:0414
>                       -< consider also the PWS-au 500 >-
>
>
>Why not quote the new PWS-au. The 500 MHz PWS-au is almost as fast as
>the 500/500, even with only 2 Mbyte cache.  SPECfp = 19.3 vs 20.4.
>It's much cheaper.
>
>--RS

Of course we will. If you can just test it for me on a 500MHz or a 600MHz
system with 2 MB cache...

Thx,
Yossi.
1657.6Hope this helps!JULIET::MAYNOR_DOFri May 09 1997 16:54279
    re: .3
    I ran the program on a PWS-au 500 MHz 256MB Memory 2MB cache.
    
    times:
    real	25.7
    user	25.4
    sys		 0.2
    
    fast.out
    
      LEVEL 7  RESIDUAL NORM 0.197E+01  WORK  1.000
      LEVEL 7  RESIDUAL NORM 0.195E+01  WORK  2.000
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.193E+01  WORK  2.125
      LEVEL 6  RESIDUAL NORM 0.189E+01  WORK  2.250
      LEVEL 5  RESIDUAL NORM 0.185E+01  WORK  2.266
      LEVEL 5  RESIDUAL NORM 0.177E+01  WORK  2.281
      LEVEL 4  RESIDUAL NORM 0.169E+01  WORK  2.283
      LEVEL 4  RESIDUAL NORM 0.155E+01  WORK  2.285
      LEVEL 3  RESIDUAL NORM 0.140E+01  WORK  2.285
      LEVEL 3  RESIDUAL NORM 0.113E+01  WORK  2.286
      LEVEL 2  RESIDUAL NORM 0.871E+00  WORK  2.286
      LEVEL 2  RESIDUAL NORM 0.431E+00  WORK  2.286
      LEVEL 2  RESIDUAL NORM 0.215E+00  WORK  2.286
      LEVEL 2  RESIDUAL NORM 0.108E+00  WORK  2.286
      LEVEL 3  RESIDUAL NORM 0.375E+00  WORK  2.286
      LEVEL 3  RESIDUAL NORM 0.987E-01  WORK  2.286
      LEVEL 4  RESIDUAL NORM 0.612E+00  WORK  2.288
      LEVEL 4  RESIDUAL NORM 0.119E+00  WORK  2.290
      LEVEL 5  RESIDUAL NORM 0.770E+00  WORK  2.306
      LEVEL 5  RESIDUAL NORM 0.132E+00  WORK  2.321
      LEVEL 6  RESIDUAL NORM 0.864E+00  WORK  2.446
      LEVEL 6  RESIDUAL NORM 0.137E+00  WORK  2.571
      LEVEL 7  RESIDUAL NORM 0.917E+00  WORK  3.571
      LEVEL 7  RESIDUAL NORM 0.140E+00  WORK  4.571
      LEVEL 7  RESIDUAL NORM 0.916E-01  WORK  5.571
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.862E-01  WORK  5.696
      LEVEL 6  RESIDUAL NORM 0.858E-01  WORK  5.821
      LEVEL 5  RESIDUAL NORM 0.852E-01  WORK  5.837
      LEVEL 5  RESIDUAL NORM 0.843E-01  WORK  5.853
      LEVEL 4  RESIDUAL NORM 0.829E-01  WORK  5.855
      LEVEL 4  RESIDUAL NORM 0.797E-01  WORK  5.857
      LEVEL 3  RESIDUAL NORM 0.751E-01  WORK  5.857
      LEVEL 3  RESIDUAL NORM 0.641E-01  WORK  5.857
      LEVEL 2  RESIDUAL NORM 0.505E-01  WORK  5.857
      LEVEL 2  RESIDUAL NORM 0.253E-01  WORK  5.857
      LEVEL 2  RESIDUAL NORM 0.126E-01  WORK  5.857
      LEVEL 2  RESIDUAL NORM 0.632E-02  WORK  5.857
      LEVEL 3  RESIDUAL NORM 0.207E-01  WORK  5.857
      LEVEL 3  RESIDUAL NORM 0.543E-02  WORK  5.858
      LEVEL 4  RESIDUAL NORM 0.284E-01  WORK  5.860
      LEVEL 4  RESIDUAL NORM 0.593E-02  WORK  5.862
      LEVEL 5  RESIDUAL NORM 0.308E-01  WORK  5.877
      LEVEL 5  RESIDUAL NORM 0.618E-02  WORK  5.893
      LEVEL 6  RESIDUAL NORM 0.316E-01  WORK  6.018
      LEVEL 6  RESIDUAL NORM 0.641E-02  WORK  6.143
      LEVEL 7  RESIDUAL NORM 0.343E-01  WORK  7.143
      LEVEL 7  RESIDUAL NORM 0.109E-01  WORK  8.143
      LEVEL 7  RESIDUAL NORM 0.100E-01  WORK  9.143
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.970E-02  WORK  9.268
      LEVEL 6  RESIDUAL NORM 0.958E-02  WORK  9.393
      LEVEL 5  RESIDUAL NORM 0.949E-02  WORK  9.408
      LEVEL 5  RESIDUAL NORM 0.929E-02  WORK  9.424
      LEVEL 4  RESIDUAL NORM 0.906E-02  WORK  9.426
      LEVEL 4  RESIDUAL NORM 0.858E-02  WORK  9.428
      LEVEL 3  RESIDUAL NORM 0.799E-02  WORK  9.428
      LEVEL 3  RESIDUAL NORM 0.673E-02  WORK  9.428
      LEVEL 2  RESIDUAL NORM 0.527E-02  WORK  9.428
      LEVEL 2  RESIDUAL NORM 0.263E-02  WORK  9.429
      LEVEL 2  RESIDUAL NORM 0.131E-02  WORK  9.429
      LEVEL 2  RESIDUAL NORM 0.657E-03  WORK  9.429
      LEVEL 3  RESIDUAL NORM 0.219E-02  WORK  9.429
      LEVEL 3  RESIDUAL NORM 0.578E-03  WORK  9.429
      LEVEL 4  RESIDUAL NORM 0.315E-02  WORK  9.431
      LEVEL 4  RESIDUAL NORM 0.648E-03  WORK  9.433
      LEVEL 5  RESIDUAL NORM 0.361E-02  WORK  9.449
      LEVEL 5  RESIDUAL NORM 0.685E-03  WORK  9.464
      LEVEL 6  RESIDUAL NORM 0.386E-02  WORK  9.589
      LEVEL 6  RESIDUAL NORM 0.698E-03  WORK  9.714
      LEVEL 7  RESIDUAL NORM 0.416E-02  WORK 10.714
      LEVEL 7  RESIDUAL NORM 0.947E-03  WORK 11.714
      LEVEL 7  RESIDUAL NORM 0.775E-03  WORK 12.714
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.738E-03  WORK 12.839
      LEVEL 6  RESIDUAL NORM 0.728E-03  WORK 12.964
      LEVEL 5  RESIDUAL NORM 0.722E-03  WORK 12.980
      LEVEL 5  RESIDUAL NORM 0.714E-03  WORK 12.995
      LEVEL 4  RESIDUAL NORM 0.703E-03  WORK 12.997
      LEVEL 4  RESIDUAL NORM 0.676E-03  WORK 12.999
      LEVEL 3  RESIDUAL NORM 0.637E-03  WORK 13.000
      LEVEL 3  RESIDUAL NORM 0.544E-03  WORK 13.000
      LEVEL 2  RESIDUAL NORM 0.429E-03  WORK 13.000
      LEVEL 2  RESIDUAL NORM 0.214E-03  WORK 13.000
      LEVEL 2  RESIDUAL NORM 0.107E-03  WORK 13.000
      LEVEL 2  RESIDUAL NORM 0.536E-04  WORK 13.000
      LEVEL 3  RESIDUAL NORM 0.176E-03  WORK 13.000
      LEVEL 3  RESIDUAL NORM 0.461E-04  WORK 13.000
      LEVEL 4  RESIDUAL NORM 0.241E-03  WORK 13.002
      LEVEL 4  RESIDUAL NORM 0.504E-04  WORK 13.004
      LEVEL 5  RESIDUAL NORM 0.261E-03  WORK 13.020
      LEVEL 5  RESIDUAL NORM 0.527E-04  WORK 13.036
      LEVEL 6  RESIDUAL NORM 0.268E-03  WORK 13.161
      LEVEL 6  RESIDUAL NORM 0.562E-04  WORK 13.286
      LEVEL 7  RESIDUAL NORM 0.299E-03  WORK 14.286
      LEVEL 7  RESIDUAL NORM 0.881E-04  WORK 15.286
      LEVEL 7  RESIDUAL NORM 0.744E-04  WORK 16.286
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.711E-04  WORK 16.411
      LEVEL 6  RESIDUAL NORM 0.698E-04  WORK 16.536
      LEVEL 5  RESIDUAL NORM 0.696E-04  WORK 16.551
      LEVEL 5  RESIDUAL NORM 0.687E-04  WORK 16.567
      LEVEL 4  RESIDUAL NORM 0.675E-04  WORK 16.569
      LEVEL 4  RESIDUAL NORM 0.646E-04  WORK 16.571
      LEVEL 3  RESIDUAL NORM 0.607E-04  WORK 16.571
      LEVEL 3  RESIDUAL NORM 0.516E-04  WORK 16.571
      LEVEL 2  RESIDUAL NORM 0.406E-04  WORK 16.571
      LEVEL 2  RESIDUAL NORM 0.203E-04  WORK 16.571
      LEVEL 2  RESIDUAL NORM 0.102E-04  WORK 16.571
      LEVEL 2  RESIDUAL NORM 0.508E-05  WORK 16.571
      LEVEL 3  RESIDUAL NORM 0.168E-04  WORK 16.572
      LEVEL 3  RESIDUAL NORM 0.441E-05  WORK 16.572
      LEVEL 4  RESIDUAL NORM 0.232E-04  WORK 16.574
      LEVEL 4  RESIDUAL NORM 0.484E-05  WORK 16.576
      LEVEL 5  RESIDUAL NORM 0.256E-04  WORK 16.591
      LEVEL 5  RESIDUAL NORM 0.502E-05  WORK 16.607
      LEVEL 6  RESIDUAL NORM 0.266E-04  WORK 16.732
      LEVEL 6  RESIDUAL NORM 0.502E-05  WORK 16.857
      LEVEL 7  RESIDUAL NORM 0.306E-04  WORK 17.857
      LEVEL 7  RESIDUAL NORM 0.852E-05  WORK 18.857
      LEVEL 7  RESIDUAL NORM 0.638E-05  WORK 19.857
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.587E-05  WORK 19.982
      LEVEL 6  RESIDUAL NORM 0.559E-05  WORK 20.107
      LEVEL 5  RESIDUAL NORM 0.551E-05  WORK 20.123
      LEVEL 5  RESIDUAL NORM 0.544E-05  WORK 20.138
      LEVEL 4  RESIDUAL NORM 0.535E-05  WORK 20.140
      LEVEL 4  RESIDUAL NORM 0.514E-05  WORK 20.142
      LEVEL 3  RESIDUAL NORM 0.484E-05  WORK 20.142
      LEVEL 3  RESIDUAL NORM 0.413E-05  WORK 20.143
      LEVEL 2  RESIDUAL NORM 0.326E-05  WORK 20.143
      LEVEL 2  RESIDUAL NORM 0.163E-05  WORK 20.143
      LEVEL 2  RESIDUAL NORM 0.814E-06  WORK 20.143
      LEVEL 2  RESIDUAL NORM 0.407E-06  WORK 20.143
      LEVEL 3  RESIDUAL NORM 0.134E-05  WORK 20.143
      LEVEL 3  RESIDUAL NORM 0.350E-06  WORK 20.143
      LEVEL 4  RESIDUAL NORM 0.184E-05  WORK 20.145
      LEVEL 4  RESIDUAL NORM 0.384E-06  WORK 20.147
      LEVEL 5  RESIDUAL NORM 0.200E-05  WORK 20.163
      LEVEL 5  RESIDUAL NORM 0.406E-06  WORK 20.178
      LEVEL 6  RESIDUAL NORM 0.208E-05  WORK 20.303
      LEVEL 6  RESIDUAL NORM 0.469E-06  WORK 20.428
      LEVEL 7  RESIDUAL NORM 0.280E-05  WORK 21.428
      LEVEL 7  RESIDUAL NORM 0.935E-06  WORK 22.428
      LEVEL 7  RESIDUAL NORM 0.661E-06  WORK 23.428
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.602E-06  WORK 23.553
      LEVEL 6  RESIDUAL NORM 0.562E-06  WORK 23.678
      LEVEL 5  RESIDUAL NORM 0.564E-06  WORK 23.694
      LEVEL 5  RESIDUAL NORM 0.555E-06  WORK 23.710
      LEVEL 4  RESIDUAL NORM 0.547E-06  WORK 23.712
      LEVEL 4  RESIDUAL NORM 0.523E-06  WORK 23.714
      LEVEL 3  RESIDUAL NORM 0.492E-06  WORK 23.714
      LEVEL 3  RESIDUAL NORM 0.418E-06  WORK 23.714
      LEVEL 2  RESIDUAL NORM 0.329E-06  WORK 23.714
      LEVEL 2  RESIDUAL NORM 0.164E-06  WORK 23.714
      LEVEL 2  RESIDUAL NORM 0.822E-07  WORK 23.714
      LEVEL 2  RESIDUAL NORM 0.411E-07  WORK 23.714
      LEVEL 3  RESIDUAL NORM 0.136E-06  WORK 23.714
      LEVEL 3  RESIDUAL NORM 0.358E-07  WORK 23.715
      LEVEL 4  RESIDUAL NORM 0.188E-06  WORK 23.717
      LEVEL 4  RESIDUAL NORM 0.392E-07  WORK 23.719
      LEVEL 5  RESIDUAL NORM 0.207E-06  WORK 23.734
      LEVEL 5  RESIDUAL NORM 0.403E-07  WORK 23.750
      LEVEL 6  RESIDUAL NORM 0.217E-06  WORK 23.875
      LEVEL 6  RESIDUAL NORM 0.415E-07  WORK 24.000
      LEVEL 7  RESIDUAL NORM 0.316E-06  WORK 25.000
      LEVEL 7  RESIDUAL NORM 0.105E-06  WORK 26.000
      LEVEL 7  RESIDUAL NORM 0.623E-07  WORK 27.000
      LEVEL 7  RESIDUAL NORM 0.498E-07  WORK 28.000
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.463E-07  WORK 28.125
      LEVEL 6  RESIDUAL NORM 0.433E-07  WORK 28.250
      LEVEL 5  RESIDUAL NORM 0.425E-07  WORK 28.266
      LEVEL 5  RESIDUAL NORM 0.417E-07  WORK 28.281
      LEVEL 4  RESIDUAL NORM 0.409E-07  WORK 28.283
      LEVEL 4  RESIDUAL NORM 0.391E-07  WORK 28.285
      LEVEL 3  RESIDUAL NORM 0.367E-07  WORK 28.285
      LEVEL 3  RESIDUAL NORM 0.311E-07  WORK 28.286
      LEVEL 2  RESIDUAL NORM 0.245E-07  WORK 28.286
      LEVEL 2  RESIDUAL NORM 0.122E-07  WORK 28.286
      LEVEL 2  RESIDUAL NORM 0.612E-08  WORK 28.286
      LEVEL 2  RESIDUAL NORM 0.306E-08  WORK 28.286
      LEVEL 3  RESIDUAL NORM 0.101E-07  WORK 28.286
      LEVEL 3  RESIDUAL NORM 0.263E-08  WORK 28.286
      LEVEL 4  RESIDUAL NORM 0.141E-07  WORK 28.288
      LEVEL 4  RESIDUAL NORM 0.294E-08  WORK 28.290
      LEVEL 5  RESIDUAL NORM 0.157E-07  WORK 28.306
      LEVEL 5  RESIDUAL NORM 0.316E-08  WORK 28.321
      LEVEL 6  RESIDUAL NORM 0.169E-07  WORK 28.446
      LEVEL 6  RESIDUAL NORM 0.387E-08  WORK 28.571
      LEVEL 7  RESIDUAL NORM 0.237E-07  WORK 29.571
      LEVEL 7  RESIDUAL NORM 0.688E-08  WORK 30.571
      LEVEL 7  RESIDUAL NORM 0.414E-08  WORK 31.571
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.357E-08  WORK 31.696
      LEVEL 6  RESIDUAL NORM 0.311E-08  WORK 31.821
      LEVEL 5  RESIDUAL NORM 0.311E-08  WORK 31.837
      LEVEL 5  RESIDUAL NORM 0.305E-08  WORK 31.853
      LEVEL 4  RESIDUAL NORM 0.300E-08  WORK 31.854
      LEVEL 4  RESIDUAL NORM 0.287E-08  WORK 31.856
      LEVEL 3  RESIDUAL NORM 0.269E-08  WORK 31.857
      LEVEL 3  RESIDUAL NORM 0.229E-08  WORK 31.857
      LEVEL 2  RESIDUAL NORM 0.180E-08  WORK 31.857
      LEVEL 2  RESIDUAL NORM 0.899E-09  WORK 31.857
      LEVEL 2  RESIDUAL NORM 0.449E-09  WORK 31.857
      LEVEL 2  RESIDUAL NORM 0.225E-09  WORK 31.857
      LEVEL 3  RESIDUAL NORM 0.742E-09  WORK 31.857
      LEVEL 3  RESIDUAL NORM 0.196E-09  WORK 31.858
      LEVEL 4  RESIDUAL NORM 0.103E-08  WORK 31.859
      LEVEL 4  RESIDUAL NORM 0.215E-09  WORK 31.861
      LEVEL 5  RESIDUAL NORM 0.115E-08  WORK 31.877
      LEVEL 5  RESIDUAL NORM 0.220E-09  WORK 31.893
      LEVEL 6  RESIDUAL NORM 0.124E-08  WORK 32.018
      LEVEL 6  RESIDUAL NORM 0.261E-09  WORK 32.143
      LEVEL 7  RESIDUAL NORM 0.223E-08  WORK 33.143
      LEVEL 7  RESIDUAL NORM 0.810E-09  WORK 34.143
      LEVEL 7  RESIDUAL NORM 0.462E-09  WORK 35.143
      LEVEL 7  RESIDUAL NORM 0.347E-09  WORK 36.143
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.307E-09  WORK 36.268
      LEVEL 6  RESIDUAL NORM 0.268E-09  WORK 36.393
      LEVEL 5  RESIDUAL NORM 0.260E-09  WORK 36.408
      LEVEL 5  RESIDUAL NORM 0.251E-09  WORK 36.424
      LEVEL 4  RESIDUAL NORM 0.244E-09  WORK 36.426
      LEVEL 4  RESIDUAL NORM 0.231E-09  WORK 36.428
      LEVEL 3  RESIDUAL NORM 0.214E-09  WORK 36.428
      LEVEL 3  RESIDUAL NORM 0.180E-09  WORK 36.428
      LEVEL 2  RESIDUAL NORM 0.141E-09  WORK 36.428
      LEVEL 2  RESIDUAL NORM 0.705E-10  WORK 36.428
      LEVEL 2  RESIDUAL NORM 0.353E-10  WORK 36.428
      LEVEL 2  RESIDUAL NORM 0.176E-10  WORK 36.428
      LEVEL 3  RESIDUAL NORM 0.587E-10  WORK 36.429
      LEVEL 3  RESIDUAL NORM 0.152E-10  WORK 36.429
      LEVEL 4  RESIDUAL NORM 0.853E-10  WORK 36.431
      LEVEL 4  RESIDUAL NORM 0.176E-10  WORK 36.433
      LEVEL 5  RESIDUAL NORM 0.992E-10  WORK 36.448
      LEVEL 5  RESIDUAL NORM 0.196E-10  WORK 36.464
      LEVEL 6  RESIDUAL NORM 0.115E-09  WORK 36.589
      LEVEL 6  RESIDUAL NORM 0.284E-10  WORK 36.714
      LEVEL 7  RESIDUAL NORM 0.191E-09  WORK 37.714
      LEVEL 7  RESIDUAL NORM 0.549E-10  WORK 38.714
      LEVEL 7  RESIDUAL NORM 0.304E-10  WORK 39.714
      LEVEL 7  RESIDUAL NORM 0.242E-10  WORK 40.714
     ..................................................
      LEVEL 6  RESIDUAL NORM 0.222E-10  WORK 40.839
      LEVEL 6  RESIDUAL NORM 0.200E-10  WORK 40.964
      LEVEL 5  RESIDUAL NORM 0.197E-10  WORK 40.980
      LEVEL 5  RESIDUAL NORM 0.192E-10  WORK 40.995
      LEVEL 4  RESIDUAL NORM 0.189E-10  WORK 40.997
      LEVEL 4  RESIDUAL NORM 0.180E-10  WORK 40.999
      LEVEL 3  RESIDUAL NORM 0.168E-10  WORK 41.000
      LEVEL 3  RESIDUAL NORM 0.143E-10  WORK 41.000
      LEVEL 2  RESIDUAL NORM 0.112E-10  WORK 41.000
      LEVEL 2  RESIDUAL NORM 0.560E-11  WORK 41.000
      LEVEL 2  RESIDUAL NORM 0.280E-11  WORK 41.000
      LEVEL 2  RESIDUAL NORM 0.140E-11  WORK 41.000
      LEVEL 3  RESIDUAL NORM 0.464E-11  WORK 41.000
      LEVEL 3  RESIDUAL NORM 0.123E-11  WORK 41.000
      LEVEL 4  RESIDUAL NORM 0.650E-11  WORK 41.002
      LEVEL 4  RESIDUAL NORM 0.135E-11  WORK 41.004
      LEVEL 5  RESIDUAL NORM 0.735E-11  WORK 41.020
      LEVEL 5  RESIDUAL NORM 0.139E-11  WORK 41.036
      LEVEL 6  RESIDUAL NORM 0.835E-11  WORK 41.161
      LEVEL 6  RESIDUAL NORM 0.185E-11  WORK 41.286
      LEVEL 7  RESIDUAL NORM 0.127E-10  WORK 42.286
      LEVEL 7  RESIDUAL NORM 0.346E-11  WORK 43.286
         4926091
1657.7TLE::REAGANAll of this chaos makes perfect senseFri May 09 1997 17:056
    BTW, while doesn't matter to the code in .0, the 500/500 has an
    EV56 chip in it.  You probably want to use "-arch ev56 -tune ev56"
    instead of "-tune ev5" for other benchmarks to take advantage of
    any byte/word operations.
    
    				-John