9 lines
343 B
Text
9 lines
343 B
Text
C *--> FROM CMS(UDUNTX)
|
|
C DATA UNITS AND CONVERSION FACTORS COMMON BLOCK
|
|
COMMON /UDUNTX/ IDUFIL,MDDIMN,MDUNIT,
|
|
* DUDIMN(13),DUUNIT(13,12),
|
|
* DUCFAC(13,12),DUTFAC(13),NDUNDC(13,12),
|
|
* NNUCNV,MNUCNV,UCNVAL(5)
|
|
CHARACTER*4 DUDIMN,DUUNIT
|
|
REAL*8 DUCFAC,DUTFAC
|
|
C
|