/external/eigen/blas/testing/ |
H A D | cblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:CBLAT2 166 READ( NIN, FMT = * )NKB 167 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 171 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 172 DO 20 I = 1, NKB 210 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 308 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 314 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 321 $ REWI, FATAL, NIDIM, IDIM, NKB, K 418 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:CCHK1 763 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:CCHK2 1111 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:CCHK3 [all...] |
H A D | dblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:DBLAT2 161 READ( NIN, FMT = * )NKB 162 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 166 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 167 DO 20 I = 1, NKB 205 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 303 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 316 $ REWI, FATAL, NIDIM, IDIM, NKB, K 409 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:DCHK1 750 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:DCHK2 1092 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:DCHK3 [all...] |
H A D | sblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:SBLAT2 161 READ( NIN, FMT = * )NKB 162 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 166 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 167 DO 20 I = 1, NKB 205 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 303 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 316 $ REWI, FATAL, NIDIM, IDIM, NKB, K 409 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:SCHK1 750 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:SCHK2 1092 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:SCHK3 [all...] |
H A D | zblat2.f | 84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:ZBLAT2 167 READ( NIN, FMT = * )NKB 168 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 172 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 173 DO 20 I = 1, NKB 211 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 315 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 322 $ REWI, FATAL, NIDIM, IDIM, NKB, K 420 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:ZCHK1 766 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:ZCHK2 1115 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:ZCHK3 [all...] |