X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fparmread.F;h=0fc1ffabd0fb23e59d8cca301511d4018f73f0ba;hp=bd2165b23f642ff16ffa79e95ece16159a53bb37;hb=0c5fb524ca994d617a32adfb678302e2f3dcef1e;hpb=ffd0e6dcc64b1ef30773e02b4ef72c1b2455fea5 diff --git a/source/unres/src_MD-M/parmread.F b/source/unres/src_MD-M/parmread.F index bd2165b..0fc1ffa 100644 --- a/source/unres/src_MD-M/parmread.F +++ b/source/unres/src_MD-M/parmread.F @@ -97,6 +97,12 @@ c enddo enddo endif +C reading lipid parameters + read(iliptranpar,*) pepliptran + do i=1,ntyp + read(iliptranpar,*) liptranene(i) + enddo + close(iliptranpar) #ifdef CRYST_THETA C C Read the parameters of the probability distribution/energy expression