9 lines
332 B
Text
9 lines
332 B
Text
C *--> FROM URCOMMON.URHSHC
|
|
C REORDER PROGRAM PREPROCESSOR DATA BASE POINTERS TO SIF RECORDS
|
|
C STATION IDENTIFIERS
|
|
C MAT for DR18608 Increase array size by 2
|
|
C COMMON /URHSHC/ IURHSC(10000),MURHSC
|
|
COMMON /URHSHC/ IURHSC(20000),MURHSC
|
|
INTEGER*2 IURHSC
|
|
C MAT for DR18608
|
|
C
|