9 lines
328 B
Text
9 lines
328 B
Text
C *--> FROM URCOMMON.URHSHI
|
|
C REORDER PROGRAM PREPROCESSOR DATA BASE POINTERS TO SIF RECORDS
|
|
C STATION NUMBERS
|
|
C MAT for DR18608 Increase array size by 2
|
|
C COMMON /URHSHI/ IURHSI(10000),MURHSI
|
|
COMMON /URHSHI/ IURHSI(20000),MURHSI
|
|
INTEGER*2 IURHSI
|
|
C MAT for DR18608
|
|
C
|