Lines Matching refs:STRUE
157 + SA(10), STEMP(1), STRUE(8), SX(8)
224 STRUE(I) = DTRUE5(I,NP1,INCX)
226 CALL STEST(LEN,SX,STRUE,STRUE,SFAC)
639 SUBROUTINE STEST(LEN,SCOMP,STRUE,SSIZE,SFAC)
642 * THIS SUBR COMPARES ARRAYS SCOMP() AND STRUE() OF LENGTH LEN TO
655 REAL SCOMP(LEN), SSIZE(LEN), STRUE(LEN)
672 SD = SCOMP(I) - STRUE(I)
676 * HERE SCOMP(I) IS NOT CLOSE TO STRUE(I).
684 + STRUE(I), SD, SSIZE(I)
708 REAL SCOMP(1), STRUE(1)
714 STRUE(1) = STRUE1
715 CALL STEST(1,SCOMP,STRUE,SSIZE,SFAC)