e2ecdcfe33
Former-commit-id:a02aeb236c[formerly9f19e3f712] [formerlya02aeb236c[formerly9f19e3f712] [formerly06a8b51d6d[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]]] Former-commit-id:06a8b51d6dFormer-commit-id:8e80217e59[formerly3360eb6c5f] Former-commit-id:377dcd10b9
10 lines
419 B
Text
10 lines
419 B
Text
C *--> FROM SCOMMON.DIMRRS
|
|
C ARRAYS FOR STATION RRS PARAMETERS
|
|
PARAMETER (MRRSTP=30)
|
|
CHARACTER*4 RRSTYP,URMISS
|
|
DIMENSION RRSTYP(MRRSTP),URMISS(MRRSTP)
|
|
DIMENSION IRTIME(MRRSTP),NVLPOB(MRRSTP)
|
|
DIMENSION MNODAY(MRRSTP),NUMOBS(MRRSTP),ITSREC(MRRSTP)
|
|
DIMENSION INTERP(MRRSTP),EXTRAP(MRRSTP)
|
|
DIMENSION FLOMIN(MRRSTP),FRACT(24,MRRSTP)
|
|
C
|