6 lines
280 B
Text
6 lines
280 B
Text
C *--> FROM PDBCOMMON.PDHSHI
|
|
C PREPROCESSOR DATA BASE POINTERS TO SIF RECORDS FOR STATION NUMBERS
|
|
C MAT COMMON /PDHSHI/ IPDHSI(10000),MXHSHI per xfan, double size
|
|
COMMON /PDHSHI/ IPDHSI(20000),MXHSHI
|
|
INTEGER*2 IPDHSI
|
|
C
|