Lines Matching defs:KN
330 INTEGER I, J, KI, KN, KSIZE, LENX, LENY, MX, MY
523 DO 40 KN = 1, 4
524 N = NS(KN)
525 KSIZE = MIN(2,KN)
526 LENX = LENS(KN,MX)
527 LENY = LENS(KN,MY)
536 CALL CTEST(1,CDOT,CT6(KN,KI),CSIZE1(KN),SFAC)
540 CALL CTEST(1,CDOT,CT7(KN,KI),CSIZE1(KN),SFAC)
544 CALL CTEST(LENY,CY,CT8(1,KN,KI),CSIZE2(1,KSIZE),SFAC)
548 CALL CTEST(LENY,CY,CT10Y(1,KN,KI),CSIZE3,1.0E0)
552 CALL CTEST(LENX,CX,CT10X(1,KN,KI),CSIZE3,1.0E0)
553 CALL CTEST(LENY,CY,CT10Y(1,KN,KI),CSIZE3,1.0E0)