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