X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;ds=sidebyside;f=source%2Fwham%2Fsrc-M%2Freadrtns.F;h=6762578177e489691d68dfb3974db8a33a4e892a;hb=69f9281377be5253df03c0af9087353950e07aaf;hp=5dd092e58008763fac09ed8225c9f271b3e0ccdf;hpb=e9b0405cc001120f54fb30c8ecdf5830249d0493;p=unres.git diff --git a/source/wham/src-M/readrtns.F b/source/wham/src-M/readrtns.F index 5dd092e..6762578 100644 --- a/source/wham/src-M/readrtns.F +++ b/source/wham/src-M/readrtns.F @@ -51,6 +51,8 @@ call multreadi(controlcard,"ISAMPL",isampl,nparmset,1) write (iout,*) "MaxSlice",MaxSlice call readi(controlcard,"NSLICE",nslice,1) + call reada(controlcard,"FRAC_CUTOFF",frac_cutoff,10.0d0) + write (iout,*) "RMSD cutoff for fraction calculations",frac_cutoff call flush(iout) if (nslice.gt.MaxSlice) then write (iout,*) "Error: parameter out of range: NSLICE",nslice,