X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD_DFA%2Fparmread.F;h=4ab807d9f53da96d88d3918644edf9805e82880e;hb=4335cbc4e2b44a2aaadabe552a25b31ef6580150;hp=62a0ddfe79b8bff3c62ab19bdfcc027f06bd5089;hpb=c630afb61b479574ea5f3c520a0851d084b7f1a1;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