Fortran Bench Mark Tests machine= m-unix.cc.u-tokyo.ac.jp : HITAC MP5800 compile with [ f77 ] Date = Mon Jul 06 21:15:29 JST 1998 ------------------------------------------------------------------------------ (1) program = matvec.f f77: compile start : matvec.f *FORT77/HAP V03-5A 開始 *プログラム名 = MATVEC *プログラム名 = MATVC1 *プログラム数 = 0002 MULTIPLY 1023*1023 REAL MATRIX TO VECTOR 3* 2000 TIMES. LARGEST EIGENVALUES= 1023.93053 1022.12165 1021.00563 200.11u 0.06s 3:23 98% 2+83k 0+2io 34pf+0w ------------------------------------------------------------------------------ (2) program = matvecz.f f77: compile start : matvecz.f *FORT77/HAP V03-5A 開始 *プログラム名 = MTVCZ *プログラム名 = MTVCZ1 *プログラム数 = 0002 MULTIPLY 723* 723 COMPLEX MATRIX TO VECTOR 3* 1000 TIMES LARGEST EIGENVALUES= 723.98791 722.12717 720.97077 133.51u 0.06s 2:15 98% 2+83k 0+2io 36pf+0w ------------------------------------------------------------------------------ (3) program = jacobi11.f f77: compile start : jacobi11.f *FORT77/HAP V03-5A 開始 *プログラム名 = JACOB1 *プログラム名 = JACOB2 KCHF238C 00 W 変数、または配列要素の語境界を正しい語境界に割り付けました。 *プログラム名 = JACOBI *プログラム数 = 0003, エラー総数 = 0001, 最大エラーレベル = 00 DIMENSION= 11 #JACOBI ROT CYC= 5* 200000 EMIN= -0.663815 EMAX= 10.309197 148.58u 0.01s 2:30 98% 1+1k 0+2io 36pf+0w ------------------------------------------------------------------------------ (4) program = jacobi1h.f f77: compile start : jacobi1h.f *FORT77/HAP V03-5A 開始 *プログラム名 = JACOB1 *プログラム名 = JACOB2 KCHF238C 00 W 変数、または配列要素の語境界を正しい語境界に割り付けました。 *プログラム名 = JACOBI *プログラム数 = 0003, エラー総数 = 0001, 最大エラーレベル = 00 DIMENSION=101 #JACOBI ROT CYC= 5* 200 EMIN= -3.859769 EMAX= 104.276991 76.99u 0.01s 1:18 98% 1+3k 1+2io 36pf+0w ------------------------------------------------------------------------------ (5) program = leqs4h.f f77: compile start : leqs4h.f *FORT77/HAP V03-5A 開始 *プログラム名 = LEQS1 *プログラム名 = LEQS2 *プログラム名 = SLEQS *プログラム数 = 0003 DIM= 401 #INV= 78 RESULTS: 0.9989295956 0.9989933805 0.9982736386 91.81u 0.02s 1:32 98% 1+13k 1+2io 34pf+0w ------------------------------------------------------------------------------ (6) program = leqs1k.f f77: compile start : leqs1k.f *FORT77/HAP V03-5A 開始 *プログラム名 = LEQS1 *プログラム名 = LEQS2 *プログラム名 = SLEQS *プログラム数 = 0003 DIM= 1001 #INV= 5 RESULTS: 0.9983222082 0.9999235137 1.0001292085 312.81u 0.06s 5:15 99% 1+79k 0+2io 34pf+0w ------------------------------------------------------------------------------ (7) program = intosc.f f77: compile start : intosc.f *FORT77/HAP V03-5A 開始 *プログラム名 = INTOSC *プログラム名 = INTOS1 *プログラム数 = 0002 I( 1000000000)= -2267 I( 1000000001)= -1233 102.77u 0.01s 1:44 98% 1+1k 0+2io 34pf+0w ------------------------------------------------------------------------------ (8) program = osc.f f77: compile start : osc.f *FORT77/HAP V03-5A 開始 *プログラム名 = OSC *プログラム名 = OSC1 *プログラム数 = 0002 I( 1000000000)= 9861.8352 I( 1000000001)= 9426.5531 27.21u 0.01s 0:27 98% 1+1k 0+2io 35pf+0w ------------------------------------------------------------------------------ (9) program = intpi3.f f77: compile start : intpi3.f *FORT77/HAP V03-5A 開始 *プログラム名 = INTPI3 *プログラム名 = INTPI *プログラム数 = 0002 PI= 50893811591411064*120/(8*N**5+15*N**3), N= 3000 150.32u 0.01s 2:32 98% 1+1k 0+2io 31pf+0w ------------------------------------------------------------------------------ (10) program = pi3.f f77: compile start : pi3.f *FORT77/HAP V03-5A 開始 *プログラム名 = PI3 *プログラム名 = PI3A *プログラム数 = 0002 N= 1500 PI= 3.141594622 106.66u 0.01s 1:48 98% 1+1k 0+2io 35pf+0w ------------------------------------------------------------------------------ (11) program = runge.f f77: compile start : runge.f *FORT77/HAP V03-5A 開始 *プログラム名 = RUNGE *プログラム名 = RUNGE1 *プログラム数 = 0002 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.95834 -1.69468 V= 0.29836 0.50776 138.84u 0.01s 2:21 98% 2+1k 0+2io 38pf+0w ------------------------------------------------------------------------------ (12) program = intgl4.f f77: compile start : intgl4.f *FORT77/HAP V03-5A 開始 *プログラム名 = INTGL4 *プログラム名 = INTG4A *プログラム数 = 0002 #PTS= 200**4 A= 0.1000 S= 3.244281965 147.31u 0.01s 2:29 98% 1+1k 0+3io 33pf+0w ------------------------------------------------------------------------------ (13) program = mathfnc1.f f77: compile start : mathfnc1.f *FORT77/HAP V03-5A 開始 *プログラム名 = MATHF1 *プログラム名 = MTHF1B *プログラム数 = 0002 INTEGRAL[ 0.1 0.9: 100000000 STEPS](SIN(X)+SQRT(COS(X)))DX= 1.111225551 53.59u 0.01s 0:54 98% 1+1k 0+3io 35pf+0w ------------------------------------------------------------------------------ (14) program = mathfnc2.f f77: compile start : mathfnc2.f *FORT77/HAP V03-5A 開始 *プログラム名 = MATHF2 *プログラム名 = MTHF2B *プログラム数 = 0002 INTEGRAL[ 0.1 0.9: 100000000 STEPS]ATAN2(EXP(X),LOG(X+1))DX= 1.081785144 91.85u 0.01s 1:32 98% 1+1k 0+2io 35pf+0w ------------------------------------------------------------------------------ (15) program = permute1.f f77: compile start : permute1.f *FORT77/HAP V03-5A 開始 *プログラム名 = PERMUT *プログラム名 = PERM *プログラム数 = 0002 INT*4 ARRAY_SIZE= 1024 #PERMUTATIONS/ARRAY_SIZE= 262144 A= 149 293 506 728 569 228 413 551 883 676 32.56u 0.01s 0:33 98% 2+1k 0+4io 34pf+0w ------------------------------------------------------------------------------ (16) program = permute2.f f77: compile start : permute2.f *FORT77/HAP V03-5A 開始 *プログラム名 = PERMUT *プログラム名 = PERM *プログラム数 = 0002 INT*4 ARRAY_SIZE= 32768 #PERMUTATIONS/ARRAY_SIZE= 8192 A= 149 293 16365 22125 2429 5407 28746 12182 14590 11825 36.17u 0.01s 0:36 98% 2+2k 0+2io 34pf+0w ------------------------------------------------------------------------------ (17) program = permute3.f f77: compile start : permute3.f *FORT77/HAP V03-5A 開始 *プログラム名 = PERMUT *プログラム名 = PERM *プログラム数 = 0002 INT*4 ARRAY_SIZE= 1048576 #PERMUTATIONS/ARRAY_SIZE= 256 A= 149 293 524435 178798 836951 263828 662616 351174 26552 147396 87.70u 0.03s 1:28 98% 2+42k 0+2io 34pf+0w