awips2/nativeLib/rary.ohd.ofs/inc/pppcommon/ppunts
root 133dc97f67 Initial revision of AWIPS2 11.9.0-7p5
Former-commit-id: 06a8b51d6d [formerly 9f19e3f712 [formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]]
Former-commit-id: 9f19e3f712
Former-commit-id: a02aeb236c
2012-01-06 08:55:05 -06:00

7 lines
307 B
Text

C *--> FROM PPPCOMMON.PPUNTS
C PARAMETRIC DATA BASE FILE UNIT NUMBERS COMMON BLOCK
COMMON /PPUNTS/ KPPIDX,KPPRM1,KPPRM2,KPPRM3,KPPRM4,KPPRM5,KPPRM6,
* KPPRM7,KPPRM8,KPPRM9,MXPPPF,NMPPPF
DIMENSION KPPRMU(9)
EQUIVALENCE (KPPRM1,KPPRMU(1))
C