X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-M%2Fparmread.F;fp=source%2Fwham%2Fsrc-M%2Fparmread.F;h=ce1bf31546e0009f49871174002dc58676404b1b;hb=46f3f544d5a60812e2e11e03b619903f2ed052eb;hp=2fc37d347de929715b0408568f9baa5dabcf56be;hpb=22ea58d3be4c7c625b9c5fb0e9f6d1b2bf7428f6;p=unres.git diff --git a/source/wham/src-M/parmread.F b/source/wham/src-M/parmread.F index 2fc37d3..ce1bf31 100644 --- a/source/wham/src-M/parmread.F +++ b/source/wham/src-M/parmread.F @@ -71,6 +71,7 @@ c If reading not own parameters, skip assignment call reada(controlcard,"ATRISS",atriss,0.3D0) call reada(controlcard,"BTRISS",btriss,0.02D0) call reada(controlcard,"CTRISS",ctriss,1.0D0) + call reada(controlcard,"LIPSCALE",lipscale,1.3D0) dyn_ss=(index(controlcard,'DYN_SS').gt.0) write(iout,*) "ATRISS",atriss write(iout,*) "BTRISS",btriss