/external/cblas/testing/ |
H A D | c_cblat2.f | 462 SUBROUTINE CCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 485 CHARACTER*12 SNAME local in subroutine:CCHK1 522 FULL = SNAME( 9: 9 ).EQ.'e' 523 BANDED = SNAME( 9: 9 ).EQ.'b' 575 CALL CMAKE( SNAME( 8: 9 ), ' ', ' ', M, N, A, NMAX, AA, 657 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 667 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 778 WRITE( NOUT, FMT = 9999 )SNAME, NC 780 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 785 WRITE( NOUT, FMT = 9996 )SNAME 840 CHARACTER*12 SNAME local in subroutine:CCHK2 1196 CHARACTER*12 SNAME local in subroutine:CCHK3 1578 CHARACTER*12 SNAME local in subroutine:CCHK4 1855 CHARACTER*12 SNAME local in subroutine:CCHK5 2148 CHARACTER*12 SNAME local in subroutine:CCHK6 [all...] |
H A D | c_cblat3.f | 425 SUBROUTINE CCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 449 CHARACTER*12 SNAME local in subroutine:CCHK1 597 $ CALL CPRCN1(NTRA, NC, SNAME, IORDER, 681 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC 682 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC 684 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX 685 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX 690 WRITE( NOUT, FMT = 9996 )SNAME 691 CALL CPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB, 720 SUBROUTINE CPRCN1(NOUT, NC, SNAME, IORDE 725 CHARACTER*12 SNAME local in subroutine:CPRCN1 779 CHARACTER*12 SNAME local in subroutine:CCHK2 1051 CHARACTER*12 SNAME local in subroutine:CPRCN2 1100 CHARACTER*12 SNAME local in subroutine:CCHK3 1402 CHARACTER*12 SNAME local in subroutine:CPRCN3 1464 CHARACTER*12 SNAME local in subroutine:CCHK4 1788 CHARACTER*12 SNAME local in subroutine:CPRCN4 1822 CHARACTER*12 SNAME local in subroutine:CPRCN6 1874 CHARACTER*12 SNAME local in subroutine:CCHK5 2241 CHARACTER*12 SNAME local in subroutine:CPRCN5 2276 CHARACTER*12 SNAME local in subroutine:CPRCN7 [all...] |
H A D | c_dblat2.f | 456 SUBROUTINE DCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 477 CHARACTER*12 SNAME local in subroutine:DCHK1 513 FULL = SNAME( 9: 9 ).EQ.'e' 514 BANDED = SNAME( 9: 9 ).EQ.'b' 566 CALL DMAKE( SNAME( 8: 9 ), ' ', ' ', M, N, A, NMAX, AA, 648 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 658 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 767 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC 768 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC 770 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, N 837 CHARACTER*12 SNAME local in subroutine:DCHK2 1196 CHARACTER*12 SNAME local in subroutine:DCHK3 1584 CHARACTER*12 SNAME local in subroutine:DCHK4 1856 CHARACTER*12 SNAME local in subroutine:DCHK5 2152 CHARACTER*12 SNAME local in subroutine:DCHK6 [all...] |
H A D | c_dblat3.f | 417 SUBROUTINE DCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 438 CHARACTER*12 SNAME local in subroutine:DCHK1 584 $ CALL DPRCN1(NTRA, NC, SNAME, IORDER, 668 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC 669 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC 671 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX 672 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX 677 WRITE( NOUT, FMT = 9996 )SNAME 678 CALL DPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB, 706 SUBROUTINE DPRCN1(NOUT, NC, SNAME, IORDE 711 CHARACTER*12 SNAME local in subroutine:DPRCN1 762 CHARACTER*12 SNAME local in subroutine:DCHK2 1025 CHARACTER*12 SNAME local in subroutine:DPRCN2 1072 CHARACTER*12 SNAME local in subroutine:DCHK3 1371 CHARACTER*12 SNAME local in subroutine:DPRCN3 1430 CHARACTER*12 SNAME local in subroutine:DCHK4 1697 CHARACTER*12 SNAME local in subroutine:DPRCN4 1747 CHARACTER*12 SNAME local in subroutine:DCHK5 2054 CHARACTER*12 SNAME local in subroutine:DPRCN5 [all...] |
H A D | c_sblat2.f | 456 SUBROUTINE SCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 477 CHARACTER*12 SNAME local in subroutine:SCHK1 513 FULL = SNAME( 9: 9 ).EQ.'e' 514 BANDED = SNAME( 9: 9 ).EQ.'b' 566 CALL SMAKE( SNAME( 8: 9 ), ' ', ' ', M, N, A, NMAX, AA, 648 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 658 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 767 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC 768 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC 770 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, N 837 CHARACTER*12 SNAME local in subroutine:SCHK2 1196 CHARACTER*12 SNAME local in subroutine:SCHK3 1584 CHARACTER*12 SNAME local in subroutine:SCHK4 1856 CHARACTER*12 SNAME local in subroutine:SCHK5 2152 CHARACTER*12 SNAME local in subroutine:SCHK6 [all...] |
H A D | c_sblat3.f | 416 SUBROUTINE SCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 438 CHARACTER*12 SNAME local in subroutine:SCHK1 584 $ CALL SPRCN1(NTRA, NC, SNAME, IORDER, 668 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC 669 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC 671 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX 672 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX 677 WRITE( NOUT, FMT = 9996 )SNAME 678 CALL SPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB, 709 SUBROUTINE SPRCN1(NOUT, NC, SNAME, IORDE 714 CHARACTER*12 SNAME local in subroutine:SPRCN1 766 CHARACTER*12 SNAME local in subroutine:SCHK2 1029 CHARACTER*12 SNAME local in subroutine:SPRCN2 1076 CHARACTER*12 SNAME local in subroutine:SCHK3 1375 CHARACTER*12 SNAME local in subroutine:SPRCN3 1435 CHARACTER*12 SNAME local in subroutine:SCHK4 1702 CHARACTER*12 SNAME local in subroutine:SPRCN4 1752 CHARACTER*12 SNAME local in subroutine:SCHK5 2058 CHARACTER*12 SNAME local in subroutine:SPRCN5 [all...] |
H A D | c_zblat2.f | 462 SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 486 CHARACTER*12 SNAME local in subroutine:ZCHK1 523 FULL = SNAME( 9: 9 ).EQ.'e' 524 BANDED = SNAME( 9: 9 ).EQ.'b' 576 CALL ZMAKE( SNAME( 8: 9 ), ' ', ' ', M, N, A, NMAX, AA, 658 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 668 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 779 WRITE( NOUT, FMT = 9999 )SNAME, NC 781 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 786 WRITE( NOUT, FMT = 9996 )SNAME 842 CHARACTER*12 SNAME local in subroutine:ZCHK2 1199 CHARACTER*12 SNAME local in subroutine:ZCHK3 1582 CHARACTER*12 SNAME local in subroutine:ZCHK4 1860 CHARACTER*12 SNAME local in subroutine:ZCHK5 2154 CHARACTER*12 SNAME local in subroutine:ZCHK6 [all...] |
H A D | c_zblat3.f | 426 SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 450 CHARACTER*12 SNAME local in subroutine:ZCHK1 598 $ CALL ZPRCN1(NTRA, NC, SNAME, IORDER, 682 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC 683 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC 685 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX 686 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX 691 WRITE( NOUT, FMT = 9996 )SNAME 692 CALL ZPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB, 721 SUBROUTINE ZPRCN1(NOUT, NC, SNAME, IORDE 726 CHARACTER*12 SNAME local in subroutine:ZPRCN1 780 CHARACTER*12 SNAME local in subroutine:ZCHK2 1052 CHARACTER*12 SNAME local in subroutine:ZPRCN2 1101 CHARACTER*12 SNAME local in subroutine:ZCHK3 1403 CHARACTER*12 SNAME local in subroutine:ZPRCN3 1465 CHARACTER*12 SNAME local in subroutine:ZCHK4 1789 CHARACTER*12 SNAME local in subroutine:ZPRCN4 1823 CHARACTER*12 SNAME local in subroutine:ZPRCN6 1875 CHARACTER*12 SNAME local in subroutine:ZCHK5 2242 CHARACTER*12 SNAME local in subroutine:ZPRCN5 2277 CHARACTER*12 SNAME local in subroutine:ZPRCN7 [all...] |
/external/eigen/blas/testing/ |
H A D | cblat2.f | 437 SUBROUTINE CCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 460 CHARACTER*6 SNAME local in subroutine:CCHK1 496 FULL = SNAME( 3: 3 ).EQ.'E' 497 BANDED = SNAME( 3: 3 ).EQ.'B' 549 CALL CMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX, AA, 624 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 634 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 743 WRITE( NOUT, FMT = 9999 )SNAME, NC 745 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 750 WRITE( NOUT, FMT = 9996 )SNAME 805 CHARACTER*6 SNAME local in subroutine:CCHK2 1152 CHARACTER*6 SNAME local in subroutine:CCHK3 1514 CHARACTER*6 SNAME local in subroutine:CCHK4 1791 CHARACTER*6 SNAME local in subroutine:CCHK5 2075 CHARACTER*6 SNAME local in subroutine:CCHK6 [all...] |
H A D | cblat3.f | 405 SUBROUTINE CCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 428 CHARACTER*6 SNAME local in subroutine:CCHK1 576 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 659 WRITE( NOUT, FMT = 9999 )SNAME, NC 661 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 666 WRITE( NOUT, FMT = 9996 )SNAME 667 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K, 690 SUBROUTINE CCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 713 CHARACTER*6 SNAME local in subroutine:CCHK2 748 CONJ = SNAME( 992 CHARACTER*6 SNAME local in subroutine:CCHK3 1302 CHARACTER*6 SNAME local in subroutine:CCHK4 1634 CHARACTER*6 SNAME local in subroutine:CCHK5 [all...] |
H A D | dblat2.f | 430 SUBROUTINE DCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 451 CHARACTER*6 SNAME local in subroutine:DCHK1 486 FULL = SNAME( 3: 3 ).EQ.'E' 487 BANDED = SNAME( 3: 3 ).EQ.'B' 539 CALL DMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX, AA, 614 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 624 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 733 WRITE( NOUT, FMT = 9999 )SNAME, NC 735 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 740 WRITE( NOUT, FMT = 9996 )SNAME 792 CHARACTER*6 SNAME local in subroutine:DCHK2 1133 CHARACTER*6 SNAME local in subroutine:DCHK3 1491 CHARACTER*6 SNAME local in subroutine:DCHK4 1752 CHARACTER*6 SNAME local in subroutine:DCHK5 2030 CHARACTER*6 SNAME local in subroutine:DCHK6 [all...] |
H A D | dblat3.f | 395 SUBROUTINE DCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 416 CHARACTER*6 SNAME local in subroutine:DCHK1 562 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 645 WRITE( NOUT, FMT = 9999 )SNAME, NC 647 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 652 WRITE( NOUT, FMT = 9996 )SNAME 653 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K, 676 SUBROUTINE DCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 697 CHARACTER*6 SNAME local in subroutine:DCHK2 829 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SID 967 CHARACTER*6 SNAME local in subroutine:DCHK3 1272 CHARACTER*6 SNAME local in subroutine:DCHK4 1547 CHARACTER*6 SNAME local in subroutine:DCHK5 [all...] |
H A D | sblat2.f | 430 SUBROUTINE SCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 451 CHARACTER*6 SNAME local in subroutine:SCHK1 486 FULL = SNAME( 3: 3 ).EQ.'E' 487 BANDED = SNAME( 3: 3 ).EQ.'B' 539 CALL SMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX, AA, 614 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 624 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 733 WRITE( NOUT, FMT = 9999 )SNAME, NC 735 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 740 WRITE( NOUT, FMT = 9996 )SNAME 792 CHARACTER*6 SNAME local in subroutine:SCHK2 1133 CHARACTER*6 SNAME local in subroutine:SCHK3 1491 CHARACTER*6 SNAME local in subroutine:SCHK4 1752 CHARACTER*6 SNAME local in subroutine:SCHK5 2030 CHARACTER*6 SNAME local in subroutine:SCHK6 [all...] |
H A D | sblat3.f | 395 SUBROUTINE SCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 416 CHARACTER*6 SNAME local in subroutine:SCHK1 562 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 645 WRITE( NOUT, FMT = 9999 )SNAME, NC 647 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 652 WRITE( NOUT, FMT = 9996 )SNAME 653 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K, 676 SUBROUTINE SCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 697 CHARACTER*6 SNAME local in subroutine:SCHK2 829 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SID 967 CHARACTER*6 SNAME local in subroutine:SCHK3 1272 CHARACTER*6 SNAME local in subroutine:SCHK4 1547 CHARACTER*6 SNAME local in subroutine:SCHK5 [all...] |
H A D | zblat2.f | 438 SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 462 CHARACTER*6 SNAME local in subroutine:ZCHK1 498 FULL = SNAME( 3: 3 ).EQ.'E' 499 BANDED = SNAME( 3: 3 ).EQ.'B' 551 CALL ZMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX, AA, 626 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, 636 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 745 WRITE( NOUT, FMT = 9999 )SNAME, NC 747 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 752 WRITE( NOUT, FMT = 9996 )SNAME 808 CHARACTER*6 SNAME local in subroutine:ZCHK2 1156 CHARACTER*6 SNAME local in subroutine:ZCHK3 1519 CHARACTER*6 SNAME local in subroutine:ZCHK4 1797 CHARACTER*6 SNAME local in subroutine:ZCHK5 2082 CHARACTER*6 SNAME local in subroutine:ZCHK6 [all...] |
H A D | zblat3.f | 407 SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 430 CHARACTER*6 SNAME local in subroutine:ZCHK1 578 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, 661 WRITE( NOUT, FMT = 9999 )SNAME, NC 663 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX 668 WRITE( NOUT, FMT = 9996 )SNAME 669 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K, 692 SUBROUTINE ZCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, 715 CHARACTER*6 SNAME local in subroutine:ZCHK2 750 CONJ = SNAME( 995 CHARACTER*6 SNAME local in subroutine:ZCHK3 1305 CHARACTER*6 SNAME local in subroutine:ZCHK4 1638 CHARACTER*6 SNAME local in subroutine:ZCHK5 [all...] |