X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fparmread.F;fp=source%2Funres%2Fsrc_MD-M%2Fparmread.F;h=0620acb942cafa214869ae3c96565ccee032dabd;hb=0bc26432861b8aa8fb7cb98becda4da4f0ae8b48;hp=5d45e140545f5c2ea27f93d9026f53f939cda332;hpb=a80d9d228016ea14a30be2c7ef9a952e3ef86869;p=unres.git diff --git a/source/unres/src_MD-M/parmread.F b/source/unres/src_MD-M/parmread.F index 5d45e14..0620acb 100644 --- a/source/unres/src_MD-M/parmread.F +++ b/source/unres/src_MD-M/parmread.F @@ -1160,6 +1160,7 @@ C Calculate the "working" parameters of SC interactions. do i=2,ntyp do j=1,i-1 eps(i,j)=eps(j,i) + epslip(i,j)=epslip(j,i) enddo enddo do i=1,ntyp