Fortran Bench Mark Tests machine= vpp.riken.go.jp compile with [ frtpx -W,-md -o ] Date = Thu Jul 2 22:31:50 JST 1998 ------------------------------------------------------------------------------ (1) program = matvec.f 13.310000u 0.160000s 15.770000 (2) program = matvecz.f 16.060000u 0.160000s 18.350000 (3) program = jacobi11.f 487.750000u 0.280000s 491.770000 (4) program = jacobi1h.f 50.330000u 0.160000s 52.890000 (5) program = leqs4h.f 18.900000u 0.150000s 21.200000 (6) program = leqs1k.f 14.920000u 0.150000s 17.330000 (7) program = intosc.f 476.950000u 0.260000s 480.710000 (8) program = osc.f 120.040000u 0.170000s 122.590000 (9) program = intpi3.f 569.370000u 0.280000s 573.440000 (10) program = pi3.f 490.680000u 0.270000s 494.510000 (11) program = runge.f 236.090000u 0.210000s 239.210000 (12) program = intgl4.f 29.080000u 0.160000s 31.540000 (13) program = mathfnc1.f 12.900000u 0.150000s 15.230000 (14) program = mathfnc2.f 14.460000u 0.150000s 16.770000 (15) program = permute1.f 65.850000u 0.160000s 68.340000 (16) program = permute2.f 112.500000u 0.180000s 115.250000 (17) program = permute3.f 131.860000u 0.180000s 134.590000 ----------------------------------------------------------------------------- #!/usr/bin/perl open(FL,"< vpp.980703.log"); $n = 0; while (){ if (/^timex -H (\w+)\.exe$/){ $p = $1;} if (/^real\s+(\d+:|)(\d+\.\d+)$/){ $r = $1*60+$2;} if (/^user\s+(\d+:|)(\d+\.\d+)$/){ $u = $1*60+$2;} if (/^sys\s+(\d+:|)(\d+\.\d+)$/){ $s = $1*60+$2;} if (/^vuw\-sys\s+/){ printf "(%d) program = %s.f\n",++$n,$p; printf "%fu %fu %f\n",$u,$s,$r; $s = $1; $r = ""; $u =""; $s = ""; } } close (FL); ----------------------------------------------------------------------------- frtpx -W,-md -o matvec.exe matvec.f >> compile.log frtpx -W,-md -o matvecz.exe matvecz.f >> compile.log frtpx -W,-md -o jacobi11.exe jacobi11.f >> compile.log frtpx -W,-md -o jacobi1h.exe jacobi1h.f >> compile.log frtpx -W,-md -o leqs4h.exe leqs4h.f >> compile.log frtpx -W,-md -o leqs1k.exe leqs1k.f >> compile.log frtpx -W,-md -o intosc.exe intosc.f >> compile.log frtpx -W,-md -o osc.exe osc.f >> compile.log frtpx -W,-md -o intpi3.exe intpi3.f >> compile.log frtpx -W,-md -o pi3.exe pi3.f >> compile.log frtpx -W,-md -o runge.exe runge.f >> compile.log frtpx -W,-md -o intgl4.exe intgl4.f >> compile.log frtpx -W,-md -o mathfnc1.exe mathfnc1.f >> compile.log frtpx -W,-md -o mathfnc2.exe mathfnc2.f >> compile.log frtpx -W,-md -o permute1.exe permute1.f >> compile.log frtpx -W,-md -o permute2.exe permute2.f >> compile.log frtpx -W,-md -o permute3.exe permute3.f >> compile.log Thu Jul 2 22:31:50 JST 1998 timex -H matvec.exe MULTIPLY 1023*1023 REAL MATRIX TO VECTOR 3* 2000 TIMES. LARGEST EIGENVALUES= 1023.93053 1022.12165 1021.00563 timex -H matvecz.exe MULTIPLY 723* 723 COMPLEX MATRIX TO VECTOR 3* 1000 TIMES LARGEST EIGENVALUES= 723.98791 722.12717 720.97077 timex -H jacobi11.exe DIMENSION= 11 #JACOBI ROT CYC= 5* 200000 EMIN= -0.663815 EMAX= 10.309197 timex -H jacobi1h.exe DIMENSION=101 #JACOBI ROT CYC= 5* 200 EMIN= -3.859769 EMAX= 104.276991 timex -H leqs4h.exe DIM= 401 #INV= 78 RESULTS: 0.9989295956 0.9989933805 0.9982736386 timex -H leqs1k.exe DIM= 1001 #INV= 5 RESULTS: 0.9983222082 0.9999235137 1.0001292085 timex -H intosc.exe I( 1000000000)= -2267 I( 1000000001)= -1233 timex -H osc.exe I( 1000000000)= 9861.8410 I( 1000000001)= 9426.5602 timex -H intpi3.exe PI= 50893811591411064*120/(8*N**5+15*N**3), N= 3000 timex -H pi3.exe N= 1500 PI= 3.141594622 timex -H runge.exe 4TH-ORDER RUNGE-KUTTA FOR POTENTIAL=LOG(R). INITIAL R= 1.0 0.0 V= 0.0 1.5 TIME= 200000000* 0.00050 R= 1.95711 -1.69674 V= 0.29953 0.50675 timex -H intgl4.exe #PTS= 200**4 A= 0.1000 S= 3.244281965 timex -H mathfnc1.exe INTEGRAL[ 0.1 0.9: 100000000 STEPS](SIN(X)+SQRT(COS(X)))DX= 1.111225554 timex -H mathfnc2.exe INTEGRAL[ 0.1 0.9: 100000000 STEPS]ATAN2(EXP(X),LOG(X+1))DX= 1.081785145 timex -H permute1.exe INT*4 ARRAY_SIZE= 1024 #PERMUTATIONS/ARRAY_SIZE= 262144 A= 149 293 506 728 569 228 413 551 883 676 timex -H permute2.exe INT*4 ARRAY_SIZE= 32768 #PERMUTATIONS/ARRAY_SIZE= 8192 A= 149 293 16365 22125 2429 5407 28746 12182 14590 11825 timex -H permute3.exe INT*4 ARRAY_SIZE= 1048576 #PERMUTATIONS/ARRAY_SIZE= 256 A= 149 293 524435 178798 836951 263828 662616 351174 26552 147396 timex -H matvec.exe real 15.77 user 13.31 sys 0.16 vu-user 12.57 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H matvecz.exe real 18.35 user 16.06 sys 0.16 vu-user 15.92 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H jacobi11.exe real 8:11.77 user 8:07.75 sys 0.28 vu-user 4:04.44 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H jacobi1h.exe real 52.89 user 50.33 sys 0.16 vu-user 30.19 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H leqs4h.exe real 21.20 user 18.90 sys 0.15 vu-user 13.93 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H leqs1k.exe real 17.33 user 14.92 sys 0.15 vu-user 12.95 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H intosc.exe real 8:00.71 user 7:56.95 sys 0.26 vu-user 0.00 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H osc.exe real 2:02.59 user 2:00.04 sys 0.17 vu-user 0.00 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H intpi3.exe real 9:33.44 user 9:29.37 sys 0.28 vu-user 0.00 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H pi3.exe real 8:14.51 user 8:10.68 sys 0.27 vu-user 0.02 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H runge.exe real 3:59.21 user 3:56.09 sys 0.21 vu-user 0.00 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H intgl4.exe real 31.54 user 29.08 sys 0.16 vu-user 29.04 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H mathfnc1.exe real 15.23 user 12.90 sys 0.15 vu-user 12.88 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H mathfnc2.exe real 16.77 user 14.46 sys 0.15 vu-user 14.43 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H permute1.exe real 1:08.34 user 1:05.85 sys 0.16 vu-user 0.01 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H permute2.exe real 1:55.25 user 1:52.50 sys 0.18 vu-user 0.00 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00 timex -H permute3.exe real 2:14.59 user 2:11.86 sys 0.18 vu-user 0.00 vu-sys 0.00 vuw-user 0.00 vuw-sys 0.00