6 lines
281 B
Text
6 lines
281 B
Text
C *--> FROM SCOMMON.SUGNLX
|
|
C UGNL PARAMETERS COMMON BLOCK
|
|
COMMON /SUGNLX/ IUGFIL,UGNLID(2),ISEASN(2),MDRSUB(4),ULLMTS(4),
|
|
* ELLMTS(2),NBLEND(2),ICUGNL(2),DPOWER(3),DPCNMN,STMNWT,SORTBY,
|
|
* NHPSUB(4),UNUSED(10),IVUGNL
|
|
C
|