5 lines
182 B
Text
5 lines
182 B
Text
|
C *--> FROM COMMON.EMOD
|
||
|
COMMON/EMOD/ICRIT,IOVAR,KODSEG,VALSEG,JBLENP,PWT1,PWT2,
|
||
|
1 IPWTLN,IPBLEN,JBLENT,TWT1,TWT2,ITWTLN,ITBLEN
|
||
|
C
|