X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD_DFA%2Fparmread.F;h=4ab807d9f53da96d88d3918644edf9805e82880e;hb=b027415aa4473b954abef46bec87d13b85b3192b;hp=62a0ddfe79b8bff3c62ab19bdfcc027f06bd5089;hpb=3f1c0e71c24209786630b5559f21a41c5036f9bd;p=unres.git diff --git a/source/unres/src_MD_DFA/parmread.F b/source/unres/src_MD_DFA/parmread.F index 62a0ddf..4ab807d 100644 --- a/source/unres/src_MD_DFA/parmread.F +++ b/source/unres/src_MD_DFA/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=1113,err=1113) nterm_sccor(i,j),nlor_sccor(i,j) + read (isccor,*,end=1113,err=1113) nterm_sccor(i,j), + & nlor_sccor(i,j) v0ijsccor=0.0d0 si=-1.0d0