Lines Matching defs:CCHKE

2374       SUBROUTINE CCHKE( ISNUM, SRNAMT, NOUT )  subroutine
2387       INTEGER            ISNUM, NOUT
2388       CHARACTER*6        SRNAMT
2390       INTEGER            INFOT, NOUTC
2391       LOGICAL            LERR, OK
2393       COMPLEX            ALPHA, BETA
2394       REAL               RALPHA
2396       COMPLEX            A( 1, 1 ), X( 1 ), Y( 1 )
2402       COMMON             /INFOC/INFOT, NOUTC, OK, LERR
2413    10 INFOT = 1
2432    20 INFOT = 1
2457    30 INFOT = 1
2473    40 INFOT = 1
2492    50 INFOT = 1
2505    60 INFOT = 1
2524    70 INFOT = 1
2546    80 INFOT = 1
2562    90 INFOT = 1
2581   100 INFOT = 1
2603   110 INFOT = 1
2619   120 INFOT = 1
2635   130 INFOT = 1
2651   140 INFOT = 1
2664   150 INFOT = 1
2674   160 INFOT = 1
2690   170 INFOT = 1
2714 *     End of CCHKE.  argument