checkgrad_inc added to input for checkgrad cart

[unres.git] / source / unres / src_MD / readrtns.F

diff --git a/source/unres/src_MD/readrtns.F b/source/unres/src_MD/readrtns.F
index 8e73ba0..93ed3a4 100644 (file)
--- 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