/external/cblas/testing/ |
H A D | c_cblat2.f | 82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:CBLAT2 163 READ( NIN, FMT = * )NKB 164 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 168 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 169 DO 20 I = 1, NKB 207 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 327 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 335 $ REWI, FATAL, NIDIM, IDIM, NKB, K 482 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:CCHK1 837 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:CCHK2 1193 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:CCHK3 [all...] |
H A D | c_dblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:DBLAT2 159 READ( NIN, FMT = * )NKB 160 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 164 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 165 DO 20 I = 1, NKB 203 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 317 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 323 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 331 $ REWI, FATAL, NIDIM, IDIM, NKB, K 474 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:DCHK1 834 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:DCHK2 1193 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:DCHK3 [all...] |
H A D | c_sblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:SBLAT2 159 READ( NIN, FMT = * )NKB 160 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 164 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 165 DO 20 I = 1, NKB 203 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 317 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 323 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 331 $ REWI, FATAL, NIDIM, IDIM, NKB, K 474 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:SCHK1 834 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:SCHK2 1193 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:SCHK3 [all...] |
H A D | c_zblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:ZBLAT2 164 READ( NIN, FMT = * )NKB 165 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 169 READ( NIN, FMT = * )( KB( I ), I = 1, NKB ) 170 DO 20 I = 1, NKB 208 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB ) 321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 327 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, 335 $ REWI, FATAL, NIDIM, IDIM, NKB, K 483 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:ZCHK1 839 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB local in subroutine:ZCHK2 1196 INTEGER INCMAX, NIDIM, NINC, NKB local in subroutine:ZCHK3 [all...] |
/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...] |