source: PSPA/transportPSPA/trunk/include/ELM24B.CIN @ 463

Last change on this file since 463 was 15, checked in by lemeur, 12 years ago

transport pspa initial

File size: 537 bytes
Line 
1C ELM24B              REFERENCE MARKERS FOR DEFINED SECTION
2C
3C NDC(10)     CALLING LOCATION FOR DEFINED SECTION
4C NDS(10)     SIGN OF DIRECTION OF MOTION FOR DEFINED SECTION
5C NUC(10)     CALLING POSITION FOR DUMMY ARGUMENT
6C NUS(10)     DIRECTION OF MOTION FOR REAL ARGUMENT
7C NDLEV       LEVEL OF PRESENT NESTING FOR BEAM SUBLINES
8C NULEV       LEVEL INDICATOR FOR DUMMY ARGUMENTS
9C
10      INTEGER         NDC(10), NDS(10), NUC(10), NUS(10), NDLEV,
11     1                NULEV
12C
13      COMMON /ELM24B/ NDC, NDS, NUC, NUS, NDLEV, NULEV
Note: See TracBrowser for help on using the repository browser.