diff --git a/ccpp/physics b/ccpp/physics index c348f3e3..a7330736 160000 --- a/ccpp/physics +++ b/ccpp/physics @@ -1 +1 @@ -Subproject commit c348f3e363f066c2c513b0449690859d3104bac8 +Subproject commit a7330736424acb67df5324579836725ae19b51c5 diff --git a/scm/src/CCPP_typedefs.F90 b/scm/src/CCPP_typedefs.F90 index 0326544c..b14ba29f 100644 --- a/scm/src/CCPP_typedefs.F90 +++ b/scm/src/CCPP_typedefs.F90 @@ -219,6 +219,7 @@ module CCPP_typedefs integer :: nday !< integer :: nf_aelw !< integer :: nf_aesw !< + integer :: nf_albd !< integer :: nn !< integer :: nsamftrac !< integer :: nscav !< @@ -916,6 +917,7 @@ subroutine gfs_interstitial_create (Interstitial, IM, Model) Interstitial%nbdsw = NBDSW Interstitial%nf_aelw = NF_AELW Interstitial%nf_aesw = NF_AESW + Interstitial%nf_albd = NF_ALBD Interstitial%nspc1 = NSPC1 if (Model%oz_phys .or. Model%oz_phys_2015) then Interstitial%oz_coeffp5 = oz_coeff+5 diff --git a/scm/src/CCPP_typedefs.meta b/scm/src/CCPP_typedefs.meta index 4f6c2289..3b031bee 100644 --- a/scm/src/CCPP_typedefs.meta +++ b/scm/src/CCPP_typedefs.meta @@ -1460,6 +1460,12 @@ units = count dimensions = () type = integer +[nf_albd] + standard_name = number_of_components_for_surface_albedo + long_name = number of IR/VIS/UV compinents for surface albedo + units = count + dimensions = () + type = integer [nn] standard_name = number_of_tracers_for_convective_transport long_name = number of tracers for convective transport