| /external/eigen/blas/testing/ |
| H A D | cblat1.f | 521 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC)
524 * THIS SUBR COMPARES ARRAYS SCOMP() AND STRUE() OF LENGTH LEN TO
537 REAL SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local in subroutine:STEST
554 SD = SCOMP(I) - STRUE(I)
558 * HERE SCOMP(I) IS NOT CLOSE TO STRUE(I).
566 + STRUE(I), SD, SSIZE(I)
590 REAL SCOMP(1), STRUE(1) local in subroutine:STEST1
596 STRUE(1) = STRUE1
597 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
624 REAL SCOMP(20), SSIZE(20), STRUE(2 local in subroutine:CTEST
[all...] |
| H A D | zblat1.f | 521 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC)
524 * THIS SUBR COMPARES ARRAYS SCOMP() AND STRUE() OF LENGTH LEN TO
537 DOUBLE PRECISION SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local in subroutine:STEST
554 SD = SCOMP(I) - STRUE(I)
558 * HERE SCOMP(I) IS NOT CLOSE TO STRUE(I).
566 + STRUE(I), SD, SSIZE(I)
590 DOUBLE PRECISION SCOMP(1), STRUE(1) local in subroutine:STEST1
596 STRUE(1) = STRUE1
597 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)
624 DOUBLE PRECISION SCOMP(20), SSIZE(20), STRUE(2 local in subroutine:CTEST
[all...] |
| H A D | dblat1.f | 255 + SA(10), STEMP(1), STRUE(8), SX(8) local in subroutine:CHECK1
322 STRUE(I) = DTRUE5(I,NP1,INCX)
324 CALL STEST(LEN,SX,STRUE,STRUE,SFAC)
886 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC)
889 * THIS SUBR COMPARES ARRAYS SCOMP() AND STRUE() OF LENGTH LEN TO
903 DOUBLE PRECISION SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local in subroutine:STEST
920 SD = SCOMP(I) - STRUE(I)
924 * HERE SCOMP(I) IS NOT CLOSE TO STRUE(I).
932 + STRUE(
956 REAL SFAC, SCOMP, SSIZE, STRUE local in subroutine:TESTDSDOT
1004 DOUBLE PRECISION SCOMP(1), STRUE local in subroutine:STEST1
[all...] |
| H A D | sblat1.f | 255 + SA(10), STEMP(1), STRUE(8), SX(8) local in subroutine:CHECK1
322 STRUE(I) = DTRUE5(I,NP1,INCX)
324 CALL STEST(LEN,SX,STRUE,STRUE,SFAC)
890 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC)
893 * THIS SUBR COMPARES ARRAYS SCOMP() AND STRUE() OF LENGTH LEN TO
907 REAL SCOMP(LEN), SSIZE(LEN), STRUE(LEN) local in subroutine:STEST
924 SD = SCOMP(I) - STRUE(I)
928 * HERE SCOMP(I) IS NOT CLOSE TO STRUE(I).
936 + STRUE(
960 REAL SCOMP(1), STRUE local in subroutine:STEST1
[all...] |