10 lines
343 B
Text
10 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
|