(*)Corrected the default for TOLERENCE_ENT

  Changed the exprsssion for the default value of TOLERENCE_ENT so that it does
not vary with changes to H_TO_M.  This could change answers (or at least
parameter_doc files)  if H_TO_M is not 1 (in which case the previous expression
had mixed units), USE_REGRIDDING is false, and TOLERENCE_ENT is not set
explicitly, but the existing reference solutions are unaffected.

Author: Hallberg-NOAA

src/parameterizations/vertical/MOM_entrain_diffusive.F90

@@ -2255,7 +2255,7 @@ subroutine entrain_diffusive_init(Time, G, GV, param_file, diag, CS)
 ! CS%Tolerance_Ent = MAX(100.0*GV%Angstrom,1.0e-4*sqrt(dt*Kd)) !
   call get_param(param_file, mod, "TOLERANCE_ENT", CS%Tolerance_Ent, &
                  "The tolerance with which to solve for entrainment values.", &
-                 units="m", default=MAX(100.0*GV%Angstrom,1.0e-4*sqrt(dt*Kd)))
+                 units="m", default=MAX(100.0*GV%Angstrom_Z,1.0e-4*sqrt(dt*Kd)))
 
   CS%id_Kd = register_diag_field('ocean_model', 'Kd_effective', diag%axesTL, Time, &
       'Diapycnal diffusivity as applied', 'meter2 second-1')