Lines Matching defs:OK

108       LOGICAL            LERR, OK
111 COMMON /INFOC/INFOT, NOUTC, OK, LERR
296 OK = .TRUE.
441 LOGICAL LERR, OK
443 COMMON /INFOC/INFOT, NOUTC, OK, LERR
597 IF( .NOT.OK )THEN
781 LOGICAL LERR, OK
783 COMMON /INFOC/INFOT, NOUTC, OK, LERR
929 IF( .NOT.OK )THEN
1121 LOGICAL LERR, OK
1123 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1285 IF( .NOT.OK )THEN
1478 LOGICAL LERR, OK
1480 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1578 IF( .NOT.OK )THEN
1740 LOGICAL LERR, OK
1742 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1838 IF( .NOT.OK )THEN
2019 LOGICAL LERR, OK
2021 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2138 IF( .NOT.OK )THEN
2303 LOGICAL LERR, OK
2313 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2315 * OK is set to .FALSE. by the special version of XERBLA or by CHKXER
2317 OK = .TRUE.
2326 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2329 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2332 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2335 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2338 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2341 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2345 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2348 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2351 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2354 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2357 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2360 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2363 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2366 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2370 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2373 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2376 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2379 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2382 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 )
2401 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 )
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 )
2433 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 )
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 )
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 )
2561 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2564 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2567 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2571 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2574 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2577 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2580 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2583 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2587 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2590 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2593 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2596 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2598 170 IF( OK )THEN
3057 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3069 LOGICAL LERR, OK
3074 OK = .FALSE.
3107 LOGICAL LERR, OK
3110 COMMON /INFOC/INFOT, NOUT, OK, LERR
3120 OK = .FALSE.
3124 OK = .FALSE.