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

…can be coldstarted from RAP/HRRR input data (NOAA-EMC#49) This PR is a cherry-pick of commit 48ea719 that went into the ufs-release/public-v2 branch of the authoritative (NOAA-GFDL) repository. See NOAA-GFDL#62 for more information.
LarissaReames-NOAA · Jan 6, 2021 · 76489d6 · 76489d6
1 parent 9ed4a19
commit 76489d6
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