/external/cblas/testing/ |
D | c_dblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 172 READ( NIN, FMT = * )NINC 173 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 177 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 178 DO 30 I = 1, NINC 204 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 318 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 324 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 332 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 338 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, [all …]
|
D | c_sblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 172 READ( NIN, FMT = * )NINC 173 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 177 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 178 DO 30 I = 1, NINC 204 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 318 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 324 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 332 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 338 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, [all …]
|
D | c_cblat2.f | 82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 176 READ( NIN, FMT = * )NINC 177 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 181 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 182 DO 30 I = 1, NINC 208 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 322 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 328 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 336 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 342 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, [all …]
|
D | c_zblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 177 READ( NIN, FMT = * )NINC 178 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 182 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 183 DO 30 I = 1, NINC 209 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 322 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 328 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 336 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 342 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, [all …]
|
/external/eigen/blas/testing/ |
D | dblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 220 READ( NIN, FMT = * )NINC 221 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 225 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 226 DO 30 I = 1, NINC 252 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 343 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 355 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, 360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, [all …]
|
D | sblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 220 READ( NIN, FMT = * )NINC 221 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 225 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 226 DO 30 I = 1, NINC 252 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 343 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 355 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, 360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, [all …]
|
D | cblat2.f | 129 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 225 READ( NIN, FMT = * )NINC 226 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 230 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 231 DO 30 I = 1, NINC 257 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 348 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 354 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 360 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, 365 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, [all …]
|
D | zblat2.f | 130 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 226 READ( NIN, FMT = * )NINC 227 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 231 READ( NIN, FMT = * )( INC( I ), I = 1, NINC ) 232 DO 30 I = 1, NINC 258 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC ) 349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 355 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, 361 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, 366 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, [all …]
|