/external/cblas/testing/ |
D | c_sblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 295 DO 210 ISNUM = 1, NSUBS 297 IF( .NOT.LTEST( ISNUM ) )THEN 299 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 301 SRNAMT = SNAMES( ISNUM ) 304 CALL CS2CHKE( SNAMES( ISNUM ) ) 313 $ 190, 190 )ISNUM 316 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 322 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 330 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | c_dblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 295 DO 210 ISNUM = 1, NSUBS 297 IF( .NOT.LTEST( ISNUM ) )THEN 299 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 301 SRNAMT = SNAMES( ISNUM ) 304 CALL CD2CHKE( SNAMES( ISNUM ) ) 313 $ 190, 190 )ISNUM 316 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 322 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 330 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | c_dblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable 276 DO 200 ISNUM = 1, NSUBS 278 IF( .NOT.LTEST( ISNUM ) )THEN 280 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 282 SRNAMT = SNAMES( ISNUM ) 285 CALL CD3CHKE( SNAMES( ISNUM ) ) 292 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM 295 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 301 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 309 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | c_sblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable 275 DO 200 ISNUM = 1, NSUBS 277 IF( .NOT.LTEST( ISNUM ) )THEN 279 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 281 SRNAMT = SNAMES( ISNUM ) 284 CALL CS3CHKE( SNAMES( ISNUM ) ) 291 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM 294 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 300 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 308 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | c_cblat2.f | 82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 299 DO 210 ISNUM = 1, NSUBS 301 IF( .NOT.LTEST( ISNUM ) )THEN 303 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 305 SRNAMT = SNAMES( ISNUM ) 308 CALL CC2CHKE( SNAMES( ISNUM ) ) 317 $ 180, 190, 190 )ISNUM 320 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 326 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 334 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | c_zblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 299 DO 210 ISNUM = 1, NSUBS 301 IF( .NOT.LTEST( ISNUM ) )THEN 303 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 305 SRNAMT = SNAMES( ISNUM ) 308 CALL CZ2CHKE( SNAMES( ISNUM ) ) 317 $ 180, 190, 190 )ISNUM 320 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 326 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 334 CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | c_cblat3.f | 63 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable 281 DO 200 ISNUM = 1, NSUBS 283 IF( .NOT.LTEST( ISNUM ) )THEN 285 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 287 SRNAMT = SNAMES( ISNUM ) 290 CALL CC3CHKE( SNAMES( ISNUM ) ) 298 $ 180, 180 )ISNUM 301 CALL CCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 307 CALL CCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 315 CALL CCHK2(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | c_zblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable 282 DO 200 ISNUM = 1, NSUBS 284 IF( .NOT.LTEST( ISNUM ) )THEN 286 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 288 SRNAMT = SNAMES( ISNUM ) 291 CALL CZ3CHKE( SNAMES( ISNUM ) ) 299 $ 180, 180 )ISNUM 302 CALL ZCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 308 CALL ZCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 316 CALL ZCHK2(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
/external/eigen/blas/testing/ |
D | dblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 282 DO 210 ISNUM = 1, NSUBS 284 IF( .NOT.LTEST( ISNUM ) )THEN 286 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 288 SRNAMT = SNAMES( ISNUM ) 291 CALL DCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 300 $ 190, 190 )ISNUM 302 140 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 308 150 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 315 160 CALL DCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | zblat2.f | 84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 288 DO 210 ISNUM = 1, NSUBS 290 IF( .NOT.LTEST( ISNUM ) )THEN 292 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 294 SRNAMT = SNAMES( ISNUM ) 297 CALL ZCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 306 $ 180, 190, 190 )ISNUM 308 140 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 314 150 CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 321 160 CALL ZCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | cblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 287 DO 210 ISNUM = 1, NSUBS 289 IF( .NOT.LTEST( ISNUM ) )THEN 291 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 293 SRNAMT = SNAMES( ISNUM ) 296 CALL CCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 305 $ 180, 190, 190 )ISNUM 307 140 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 313 150 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 320 160 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | sblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable 282 DO 210 ISNUM = 1, NSUBS 284 IF( .NOT.LTEST( ISNUM ) )THEN 286 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM ) 288 SRNAMT = SNAMES( ISNUM ) 291 CALL SCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 300 $ 190, 190 )ISNUM 302 140 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 308 150 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 315 160 CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | sblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable 260 DO 200 ISNUM = 1, NSUBS 262 IF( .NOT.LTEST( ISNUM ) )THEN 264 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 266 SRNAMT = SNAMES( ISNUM ) 269 CALL SCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 276 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM 278 140 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 284 150 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 290 160 CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | dblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable 260 DO 200 ISNUM = 1, NSUBS 262 IF( .NOT.LTEST( ISNUM ) )THEN 264 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 266 SRNAMT = SNAMES( ISNUM ) 269 CALL DCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 276 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM 278 140 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 284 150 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 290 160 CALL DCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | cblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable 267 DO 200 ISNUM = 1, NSUBS 269 IF( .NOT.LTEST( ISNUM ) )THEN 271 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 273 SRNAMT = SNAMES( ISNUM ) 276 CALL CCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 284 $ 180, 180 )ISNUM 286 140 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 292 150 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 298 160 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|
D | zblat3.f | 65 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable 268 DO 200 ISNUM = 1, NSUBS 270 IF( .NOT.LTEST( ISNUM ) )THEN 272 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM ) 274 SRNAMT = SNAMES( ISNUM ) 277 CALL ZCHKE( ISNUM, SNAMES( ISNUM ), NOUT ) 285 $ 180, 180 )ISNUM 287 140 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 293 150 CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, 299 160 CALL ZCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE, [all …]
|