initialize drydep_nflds to zero

modified: cesm/nuopc_cap_share/shr_drydep_mod.F90
ESCOMP · May 31, 2022 · b7b2cff · b7b2cff
1 parent f557497
commit b7b2cff
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/cesm/nuopc_cap_share/shr_drydep_mod.F90 b/cesm/nuopc_cap_share/shr_drydep_mod.F90
@@ -296,6 +296,8 @@ subroutine shr_drydep_readnl(NLFilename, drydep_nflds)
     call shr_mpi_bcast( drydep_list, mpicom )
     call shr_mpi_bcast( dep_data_file, mpicom )
 
+    drydep_nflds = 0
+
     do i=1,maxspc
        if(len_trim(drydep_list(i)) > 0) then
           drydep_nflds=drydep_nflds+1