source:
PSPA/transportPSPA/trunk/include/ELM24A.CIN
@
485
Last change on this file since 485 was 15, checked in by , 12 years ago | |
---|---|
File size: 325 bytes |
Line | |
---|---|
1 | C ELM24A TYPE 24 -- DEFINE SECTION AND REPEATS |
2 | C |
3 | C JDEF BEGINNING, END, OR CALLING OF DEFINED SECTION |
4 | C NADDEF(2) BEGINNING AND END OF DEFINED SECTION |
5 | C |
6 | INTEGER JDEF, NADDEF(2), NBEG, NEND |
7 | EQUIVALENCE (NBEG,NADDEF(1)), (NEND, NADDEF(2)) |
8 | C |
9 | COMMON /ELM24A/ JDEF, NADDEF |
Note: See TracBrowser
for help on using the repository browser.