X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Freadrtns.F;h=93ed3a46f28a372862f86cdbfb41d572ac4c1767;hb=058b4e72d61c149f66570d580bda9b47464d9df6;hp=8e73ba00fb33346d59318c9ff41eeb9746223f8e;hpb=c12d63759a6170bb02440ae6905db6c0b2a43237;p=unres.git diff --git a/source/unres/src_MD/readrtns.F b/source/unres/src_MD/readrtns.F index 8e73ba0..93ed3a4 100644 --- a/source/unres/src_MD/readrtns.F +++ b/source/unres/src_MD/readrtns.F @@ -150,6 +150,7 @@ C Set up the time limit (caution! The time must be input in minutes!) modecalc=1 refstr=.true. endif + call reada(controlcard,"CHECKGRAD_INC",checkgrad_inc,1.0d-4) if (index(controlcard,'CHECKGRAD').gt.0) then modecalc=5 if (index(controlcard,'CART').gt.0) then