Lines Matching defs:OK
112 LOGICAL LERR, OK
115 COMMON /INFOC/INFOT, NOUTC, OK, LERR
301 OK = .TRUE.
451 LOGICAL LERR, OK
453 COMMON /INFOC/INFOT, NOUTC, OK, LERR
607 IF( .NOT.OK )THEN
795 LOGICAL LERR, OK
797 COMMON /INFOC/INFOT, NOUTC, OK, LERR
943 IF( .NOT.OK )THEN
1141 LOGICAL LERR, OK
1143 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1305 IF( .NOT.OK )THEN
1503 LOGICAL LERR, OK
1505 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1611 IF( .NOT.OK )THEN
1781 LOGICAL LERR, OK
1783 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1880 IF( .NOT.OK )THEN
2066 LOGICAL LERR, OK
2068 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2185 IF( .NOT.OK )THEN
2352 LOGICAL LERR, OK
2363 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2365 * OK is set to .FALSE. by the special version of XERBLA or by CHKXER
2367 OK = .TRUE.
2376 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2379 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2382 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2385 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2388 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2391 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2395 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2398 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2401 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2404 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2407 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2410 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2413 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2416 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2420 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2423 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2426 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2429 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2432 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2436 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2439 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2442 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2445 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2448 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2451 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2455 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2458 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2461 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2464 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2468 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2471 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2474 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2477 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2480 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2483 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2487 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2490 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2493 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2496 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2499 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2502 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2505 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2509 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2512 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2515 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2518 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2521 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2525 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2528 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2531 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2534 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2537 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2540 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2544 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2547 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2550 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2553 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2556 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2559 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2562 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2566 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2569 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2572 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2575 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2578 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2582 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2585 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2588 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2591 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2594 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2598 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2601 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2604 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2607 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2610 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2614 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2617 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2620 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2623 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2627 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2630 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2633 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2637 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2640 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2643 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2646 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2649 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2653 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2656 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2659 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2662 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2664 180 IF( OK )THEN
3160 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3172 LOGICAL LERR, OK
3177 OK = .FALSE.
3210 LOGICAL LERR, OK
3213 COMMON /INFOC/INFOT, NOUT, OK, LERR
3223 OK = .FALSE.
3227 OK = .FALSE.