X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Fparmread.F;h=13f4882d07d41b915ed3a54c92fc186b33233157;hb=39bffec2e960cdaa362c075425c0aa94bbd673c9;hp=bdc38097663556996f8641505937fcf70d777230;hpb=393f080eded99a2b4fcc4d2dbf3b0f79fe3a3a26;p=unres.git diff --git a/source/unres/src_MD/parmread.F b/source/unres/src_MD/parmread.F index bdc3809..13f4882 100644 --- a/source/unres/src_MD/parmread.F +++ b/source/unres/src_MD/parmread.F @@ -565,7 +565,8 @@ cc maxinter is maximum interaction sites do l=1,maxinter do i=1,nsccortyp do j=1,nsccortyp - read (isccor,*,end=119,err=119) nterm_sccor(i,j),nlor_sccor(i,j) + read (isccor,*,end=119,err=119) + & nterm_sccor(i,j),nlor_sccor(i,j) v0ijsccor=0.0d0 si=-1.0d0 @@ -965,6 +966,9 @@ c v3ss=0.0d0 goto 999 113 write (iout,*) "Error reading torsional energy parameters." goto 999 + 1113 write (iout,*) + & "Error reading side-chain torsional energy parameters." + goto 999 114 write (iout,*) "Error reading double torsional energy parameters." goto 999 115 write (iout,*)