1030,1031c1030
<      1 STATUS='OLD')
---
1527,1528c1526
< C      READ(CINTERN,'(4F10.4,1X,A4)') DFRA(IGR),DFRE(IGR),DG0(IGR),
<       READ(CINTERN,'(2F10.4,2F9.3,A5)') DFRA(IGR),DFRE(IGR),DG0(IGR),
---
>       READ(CINTERN,'(4F10.4,1X,A4)') DFRA(IGR),DFRE(IGR),DG0(IGR),
3346c3344
<       CHARACTER CMODEL(7)*20,CFFILE(7)*64,CUFILE(7)*64
---
>       CHARACTER CMODEL(7)*20,CFFILE(7)*30,CUFILE(7)*30
