Lines Matching refs:NP1
88 INTEGER I, J, LEN, NP1 local
201 DO 40 NP1 = 1, 5
202 N = NP1 - 1
206 CX(I) = CV(I,NP1,INCX)
210 CALL STEST1(SCNRM2TEST(N,CX,INCX),STRUE2(NP1),
211 + STRUE2(NP1), SFAC)
214 CALL STEST1(SCASUMTEST(N,CX,INCX),STRUE4(NP1),
215 + STRUE4(NP1),SFAC)
219 CALL CTEST(LEN,CX,CTRUE5(1,NP1,INCX),CTRUE5(1,NP1,INCX),
224 CALL CTEST(LEN,CX,CTRUE6(1,NP1,INCX),CTRUE6(1,NP1,INCX),
228 CALL ITEST1(ICAMAXTEST(N,CX,INCX),ITRUE3(NP1))