model/fv_regional_bc.F90: initialize cld_amt to zero so that GFDL-MP …

…can be coldstarted from RAP/HRRR input data
NOAA-EMC · Dec 2, 2020 · 48ea719 · 48ea719
1 parent 35079f0
commit 48ea719
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/model/fv_regional_bc.F90 b/model/fv_regional_bc.F90
@@ -3701,7 +3701,7 @@ subroutine remap_scalar_nggps_regional_bc(Atm                         &
 ! If the source is from old GFS or operational GSM then the tracers will be fixed in the boundaries
 ! and may not provide a very good result
 ! 
-!  if (cld_amt .gt. 0) BC_side%q_BC(:,:,:,cld_amt) = 0.
+  if (cld_amt .gt. 0) BC_side%q_BC(:,:,:,cld_amt) = 0.
   if (trim(data_source) /= 'FV3GFS GAUSSIAN NEMSIO FILE') then
    if ( Atm%flagstruct%nwat .eq. 6 ) then
       do k=1,npz