source: PSPA/transportPSPA/trunk/include/ICOPY.CIN @ 445

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

transport pspa initial

File size: 603 bytes
Line 
1C                     INDICES RELATED TO EDITING OF DATA
2C
3C ICOPY                  BEGINNING OF RANGE FOR REVISED REFERENCES
4C                        TO PREVIOUSLY DEFINED PARAMETER
5C IANEW                  REVISED REFERENCE FOR PARAMETER ON INSERTED
6C                        ELEMENT
7C IB100                  LOWER END OF SEARCH RANGE FOR PARAMETER FOR
8C                        WHICH REFERENCE EXISTS
9C I100                   PARAMETER INDEX FOR WHICH REFERENCE IS BEING
10C                        REVISED
11C
12      COMMON /ICOPY/  ICOPY, IANEW, IB100, I100
13      INTEGER         ICOPY, IANEW, IB100, I100
Note: See TracBrowser for help on using the repository browser.