6 lines
218 B
Text
6 lines
218 B
Text
|
C *--> FROM CMS(UFIELX)
|
||
|
C FREE FORMAT FIELD INPUT COMMON BLOCK
|
||
|
COMMON /UFIELX/ ISTRT,LENGTH,ITYPE,NREP,INTEGR,REAL,
|
||
|
* LLPAR,LRPAR,LASK,LATSGN,LAMPS,LEQUAL
|
||
|
C
|