Lines Matching defs:OK
113 LOGICAL LERR, OK
116 COMMON /INFOC/INFOT, NOUTC, OK, LERR
302 OK = .TRUE.
453 LOGICAL LERR, OK
455 COMMON /INFOC/INFOT, NOUTC, OK, LERR
609 IF( .NOT.OK )THEN
798 LOGICAL LERR, OK
800 COMMON /INFOC/INFOT, NOUTC, OK, LERR
946 IF( .NOT.OK )THEN
1145 LOGICAL LERR, OK
1147 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1309 IF( .NOT.OK )THEN
1508 LOGICAL LERR, OK
1510 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1616 IF( .NOT.OK )THEN
1787 LOGICAL LERR, OK
1789 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1886 IF( .NOT.OK )THEN
2073 LOGICAL LERR, OK
2075 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2192 IF( .NOT.OK )THEN
2359 LOGICAL LERR, OK
2370 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2372 * OK is set to .FALSE. by the special version of XERBLA or by CHKXER
2374 OK = .TRUE.
2383 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2386 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2389 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2392 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2395 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2398 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2402 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2405 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2408 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2411 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2414 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2417 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2420 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2423 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2427 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2430 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2433 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2436 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2439 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 )
2458 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 )
2506 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2509 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2512 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 )
2525 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2528 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 )
2547 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 )
2563 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2566 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2569 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 )
2582 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2585 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 )
2634 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2637 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2640 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2644 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2647 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2650 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2653 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2656 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2660 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2663 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2666 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2669 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2671 180 IF( OK )THEN
3168 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3180 LOGICAL LERR, OK
3185 OK = .FALSE.
3218 LOGICAL LERR, OK
3221 COMMON /INFOC/INFOT, NOUT, OK, LERR
3231 OK = .FALSE.
3235 OK = .FALSE.