Lines Matching refs:INFOT

107       INTEGER            INFOT, NOUTC  variable
111 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
295 INFOT = 0
440 INTEGER INFOT, NOUTC local
443 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
780 INTEGER INFOT, NOUTC local
783 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
1120 INTEGER INFOT, NOUTC local
1123 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
1477 INTEGER INFOT, NOUTC local
1480 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
1739 INTEGER INFOT, NOUTC local
1742 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
2018 INTEGER INFOT, NOUTC local
2021 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
2302 INTEGER INFOT, NOUTC local
2313 COMMON /INFOC/INFOT, NOUTC, OK, LERR local
2324 10 INFOT = 1
2326 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2327 INFOT = 2
2329 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2330 INFOT = 3
2332 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2333 INFOT = 6
2335 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2336 INFOT = 8
2338 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2339 INFOT = 11
2341 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2343 20 INFOT = 1
2345 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2346 INFOT = 2
2348 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2349 INFOT = 3
2351 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2352 INFOT = 4
2354 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2355 INFOT = 5
2357 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2358 INFOT = 8
2360 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2361 INFOT = 10
2363 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2364 INFOT = 13
2366 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2368 30 INFOT = 1
2370 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2371 INFOT = 2
2373 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2374 INFOT = 5
2376 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2377 INFOT = 7
2379 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2380 INFOT = 10
2382 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2384 40 INFOT = 1
2386 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2387 INFOT = 2
2389 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2390 INFOT = 3
2392 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2393 INFOT = 6
2395 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2396 INFOT = 8
2398 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2399 INFOT = 11
2401 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2403 50 INFOT = 1
2405 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2406 INFOT = 2
2408 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2409 INFOT = 6
2411 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2412 INFOT = 9
2414 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2416 60 INFOT = 1
2418 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2419 INFOT = 2
2421 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2422 INFOT = 3
2424 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2425 INFOT = 4
2427 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2428 INFOT = 6
2430 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2431 INFOT = 8
2433 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2435 70 INFOT = 1
2437 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2438 INFOT = 2
2440 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2441 INFOT = 3
2443 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2444 INFOT = 4
2446 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2447 INFOT = 5
2449 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2450 INFOT = 7
2452 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2453 INFOT = 9
2455 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2457 80 INFOT = 1
2459 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2460 INFOT = 2
2462 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2463 INFOT = 3
2465 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2466 INFOT = 4
2468 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2469 INFOT = 7
2471 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2473 90 INFOT = 1
2475 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2476 INFOT = 2
2478 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2479 INFOT = 3
2481 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2482 INFOT = 4
2484 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2485 INFOT = 6
2487 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2488 INFOT = 8
2490 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2492 100 INFOT = 1
2494 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2495 INFOT = 2
2497 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2498 INFOT = 3
2500 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2501 INFOT = 4
2503 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2504 INFOT = 5
2506 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2507 INFOT = 7
2509 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2510 INFOT = 9
2512 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2514 110 INFOT = 1
2516 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2517 INFOT = 2
2519 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2520 INFOT = 3
2522 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2523 INFOT = 4
2525 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2526 INFOT = 7
2528 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2530 120 INFOT = 1
2532 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2533 INFOT = 2
2535 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2536 INFOT = 5
2538 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2539 INFOT = 7
2541 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2542 INFOT = 9
2544 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2546 130 INFOT = 1
2548 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2549 INFOT = 2
2551 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2552 INFOT = 5
2554 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2555 INFOT = 7
2557 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2559 140 INFOT = 1
2561 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2562 INFOT = 2
2564 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2565 INFOT = 5
2567 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2569 150 INFOT = 1
2571 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2572 INFOT = 2
2574 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2575 INFOT = 5
2577 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2578 INFOT = 7
2580 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2581 INFOT = 9
2583 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2585 160 INFOT = 1
2587 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2588 INFOT = 2
2590 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2591 INFOT = 5
2593 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2594 INFOT = 7
2596 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3057 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK ) argument
3068 INTEGER INFOT, NOUT local
3073 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3106 INTEGER INFOT, NOUT local
3110 COMMON /INFOC/INFOT, NOUT, OK, LERR local
3114 IF( INFO.NE.INFOT )THEN
3115 IF( INFOT.NE.0 )THEN
3116 WRITE( NOUT, FMT = 9999 )INFO, INFOT