Lines Matching defs:CHECK2
277 SUBROUTINE CHECK2(SFAC) subroutine
279 INTEGER NOUT
282 REAL SFAC
284 INTEGER ICASE, INCX, INCY, MODE, N local
285 LOGICAL PASS
287 COMPLEX CA,CTEMP
288 INTEGER I, J, KI, KN, KSIZE, LENX, LENY, MX, MY
290 COMPLEX CDOT(1), CSIZE1(4), CSIZE2(7,2), CSIZE3(14),
291 + CT10X(7,4,4), CT10Y(7,4,4), CT6(4,4), CT7(4,4),
292 + CT8(7,4,4), CX(7), CX1(7), CY(7), CY1(7)
293 INTEGER INCXS(4), INCYS(4), LENS(4,2), NS(4)
301 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
489 20 CONTINUE
518 40 CONTINUE
519 60 CONTINUE