Lines Matching defs:OK
158 LOGICAL LERR, OK
161 COMMON /INFOC/INFOT, NOUTC, OK, LERR
340 OK = .TRUE.
490 LOGICAL LERR, OK
492 COMMON /INFOC/INFOT, NOUTC, OK, LERR
646 IF( .NOT.OK )THEN
834 LOGICAL LERR, OK
836 COMMON /INFOC/INFOT, NOUTC, OK, LERR
982 IF( .NOT.OK )THEN
1180 LOGICAL LERR, OK
1182 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1344 IF( .NOT.OK )THEN
1542 LOGICAL LERR, OK
1544 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1650 IF( .NOT.OK )THEN
1820 LOGICAL LERR, OK
1822 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1919 IF( .NOT.OK )THEN
2105 LOGICAL LERR, OK
2107 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2224 IF( .NOT.OK )THEN
2391 LOGICAL LERR, OK
2402 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2404 * OK is set to .FALSE. by the special version of XERBLA or by CHKXER
2406 OK = .TRUE.
2415 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2418 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2421 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2424 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2427 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2430 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2434 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2437 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2440 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2443 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2446 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2449 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2452 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2455 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2459 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2462 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2465 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2468 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2471 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2475 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2478 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2481 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2484 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2487 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2490 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2494 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2497 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2500 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2503 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2507 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2510 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2513 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2516 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2519 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2522 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2526 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2529 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2532 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2535 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2538 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2541 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2544 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2548 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2551 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2554 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2557 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2560 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2564 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2567 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2570 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2573 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2576 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2579 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2583 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2586 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2589 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2592 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2595 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2598 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2601 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2605 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2608 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2611 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2614 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2617 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2621 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2624 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 )
2666 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2669 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2672 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2676 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2679 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2682 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2685 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2688 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2692 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2695 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2698 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2701 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2703 180 IF( OK )THEN
3198 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3210 OK
3215 OK = .FALSE.
3248 LOGICAL LERR, OK
3251 COMMON /INFOC/INFOT, NOUT, OK, LERR
3261 OK = .FALSE.
3265 OK = .FALSE.
