Modify setgrd.f: set initial dt to min of dt_initial and estimated value