opt_trs bug fixed

Author: helin wei

physics/SFC_Models/Land/Noahmp/module_sf_noahmplsm.F90

@@ -5873,15 +5873,15 @@ subroutine thermalz0(parameters,    fveg,          z0m, z0mg,       zlvl,
 
         z0h_out = z0m_out
 
-      elseif (opt_trs == chen09 .or. opt_trs == tessel) then
+      elseif (opt_trs == tessel) then
 
         if (vegtyp <= 5) then
           z0h_out = z0m_out
         else
           z0h_out = z0m_out * 0.01
         endif
 
-      elseif (opt_trs == blumel99) then
+      elseif (opt_trs == chen09 .or. opt_trs == blumel99) then
 
         reyn = ustarx*z0m_out/viscosity                      ! Blumel99 eqn 36c
         if (reyn > 2.0) then