| /external/cblas/testing/ |
| D | c_zblat1.f | 522 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
538 DOUBLE PRECISION SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
555 SD = SCOMP(I) - STRUE(I)
567 + STRUE(I), SD, SSIZE(I)
591 DOUBLE PRECISION SCOMP(1), STRUE(1) local
597 STRUE(1) = STRUE1
598 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
625 DOUBLE PRECISION SCOMP(20), SSIZE(20), STRUE(20) local
634 STRUE(2*I-1) = DBLE(CTRUE(I))
635 STRUE(2*I) = DIMAG(CTRUE(I))
[all …]
|
| D | c_dblat1.f | 156 + SA(10), STEMP(1), STRUE(8), SX(8) local
223 STRUE(I) = DTRUE5(I,NP1,INCX)
225 CALL STEST(LEN,SX,STRUE,STRUE,SFAC)
598 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
614 DOUBLE PRECISION SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
631 SD = SCOMP(I) - STRUE(I)
643 + STRUE(I), SD, SSIZE(I)
667 DOUBLE PRECISION SCOMP(1), STRUE(1) local
673 STRUE(1) = STRUE1
674 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
|
| D | c_sblat1.f | 156 + SA(10), STEMP(1), STRUE(8), SX(8) local
223 STRUE(I) = DTRUE5(I,NP1,INCX)
225 CALL STEST(LEN,SX,STRUE,STRUE,SFAC)
598 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
614 REAL SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
631 SD = SCOMP(I) - STRUE(I)
643 + STRUE(I), SD, SSIZE(I)
667 REAL SCOMP(1), STRUE(1) local
673 STRUE(1) = STRUE1
674 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
|
| D | c_cblat1.f | 522 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
538 REAL SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
555 SD = SCOMP(I) - STRUE(I)
567 + STRUE(I), SD, SSIZE(I)
591 REAL SCOMP(1), STRUE(1) local
597 STRUE(1) = STRUE1
598 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
625 REAL SCOMP(20), SSIZE(20), STRUE(20) local
634 STRUE(2*I-1) = REAL(CTRUE(I))
635 STRUE(2*I) = AIMAG(CTRUE(I))
[all …]
|
| /external/eigen/blas/testing/ |
| D | zblat1.f | 563 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
580 DOUBLE PRECISION SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
597 SD = SCOMP(I) - STRUE(I)
609 + STRUE(I), SD, SSIZE(I)
633 DOUBLE PRECISION SCOMP(1), STRUE(1) local
639 STRUE(1) = STRUE1
640 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
667 DOUBLE PRECISION SCOMP(20), SSIZE(20), STRUE(20) local
676 STRUE(2*I-1) = DBLE(CTRUE(I))
677 STRUE(2*I) = DIMAG(CTRUE(I))
[all …]
|
| D | dblat1.f | 255 + SA(10), STEMP(1), STRUE(8), SX(8) local
322 STRUE(I) = DTRUE5(I,NP1,INCX)
324 CALL STEST(LEN,SX,STRUE,STRUE,SFAC)
886 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
903 DOUBLE PRECISION SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
920 SD = SCOMP(I) - STRUE(I)
932 + STRUE(I), SD, SSIZE(I)
942 SUBROUTINE TESTDSDOT(SCOMP,STRUE,SSIZE,SFAC) argument
956 REAL SFAC, SCOMP, SSIZE, STRUE local
968 SD = SCOMP - STRUE
[all …]
|
| D | cblat1.f | 563 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
580 REAL SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
597 SD = SCOMP(I) - STRUE(I)
609 + STRUE(I), SD, SSIZE(I)
633 REAL SCOMP(1), STRUE(1) local
639 STRUE(1) = STRUE1
640 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
667 REAL SCOMP(20), SSIZE(20), STRUE(20) local
676 STRUE(2*I-1) = REAL(CTRUE(I))
677 STRUE(2*I) = AIMAG(CTRUE(I))
[all …]
|
| D | sblat1.f | 255 + SA(10), STEMP(1), STRUE(8), SX(8) local
322 STRUE(I) = DTRUE5(I,NP1,INCX)
324 CALL STEST(LEN,SX,STRUE,STRUE,SFAC)
890 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC) argument
907 REAL SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local
924 SD = SCOMP(I) - STRUE(I)
936 + STRUE(I), SD, SSIZE(I)
960 REAL SCOMP(1), STRUE(1) local
966 STRUE(1) = STRUE1
967 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
|