| /external/eigen/blas/testing/ |
| D | zblat1.f | 685 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
693 INTEGER NOUT
696 INTEGER ICOMP, ITRUE
698 INTEGER ICASE, INCX, INCY, MODE, N local
699 LOGICAL PASS
701 INTEGER ID
703 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
714 20 ID = ICOMP - ITRUE
716 40 CONTINUE
719 99999 FORMAT (' FAIL')
[all …]
|
| D | cblat1.f | 685 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
693 INTEGER NOUT
696 INTEGER ICOMP, ITRUE
698 INTEGER ICASE, INCX, INCY, MODE, N local
699 LOGICAL PASS
701 INTEGER ID
703 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
714 20 ID = ICOMP - ITRUE
716 40 CONTINUE
719 99999 FORMAT (' FAIL')
[all …]
|
| D | sblat1.f | 981 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
989 INTEGER NOUT
992 INTEGER ICOMP, ITRUE
994 INTEGER ICASE, INCX, INCY, N local
995 LOGICAL PASS
997 INTEGER ID
999 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS
1011 20 ID = ICOMP - ITRUE
1013 40 CONTINUE
1016 99999 FORMAT (' FAIL')
[all …]
|
| D | dblat1.f | 1025 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
1033 INTEGER NOUT
1036 INTEGER ICOMP, ITRUE
1038 INTEGER ICASE, INCX, INCY, N local
1039 LOGICAL PASS
1041 INTEGER ID
1043 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS
1055 20 ID = ICOMP - ITRUE
1057 40 CONTINUE
1060 99999 FORMAT (' FAIL')
[all …]
|
| /external/cblas/testing/ |
| D | c_cblat1.f | 643 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
651 INTEGER NOUT
654 INTEGER ICOMP, ITRUE
656 INTEGER ICASE, INCX, INCY, MODE, N local
657 LOGICAL PASS
659 INTEGER ID
661 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
672 20 ID = ICOMP - ITRUE
674 40 CONTINUE
677 99999 FORMAT (' FAIL')
[all …]
|
| D | c_zblat1.f | 643 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
651 INTEGER NOUT
654 INTEGER ICOMP, ITRUE
656 INTEGER ICASE, INCX, INCY, MODE, N local
657 LOGICAL PASS
659 INTEGER ID
661 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
672 20 ID = ICOMP - ITRUE
674 40 CONTINUE
677 99999 FORMAT (' FAIL')
[all …]
|
| D | c_dblat1.f | 688 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
696 INTEGER NOUT
699 INTEGER ICOMP, ITRUE
701 INTEGER ICASE, INCX, INCY, MODE, N local
702 LOGICAL PASS
704 INTEGER ID
706 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
718 20 ID = ICOMP - ITRUE
720 40 CONTINUE
723 99999 FORMAT (' FAIL')
[all …]
|
| D | c_sblat1.f | 688 SUBROUTINE ITEST1(ICOMP,ITRUE) subroutine
696 INTEGER NOUT
699 INTEGER ICOMP, ITRUE
701 INTEGER ICASE, INCX, INCY, MODE, N local
702 LOGICAL PASS
704 INTEGER ID
706 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
718 20 ID = ICOMP - ITRUE
720 40 CONTINUE
723 99999 FORMAT (' FAIL')
[all …]
|