Skip to content

Commit 135afa5

Browse files
Merge branch 'develop' into fix/stc_check
2 parents 02091b4 + 7fa602c commit 135afa5

31 files changed

Lines changed: 3850 additions & 1050 deletions

ccpp/data/GFS_typedefs.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3083,7 +3083,7 @@ subroutine coupling_create (Coupling, Model)
30833083
Coupling%snow_cpl = clear_val
30843084
endif
30853085

3086-
if (Model%cplflx .or. Model%cplchm .or. Model%cplwav) then
3086+
if (Model%cplflx .or. Model%cplchm .or. Model%cplwav .or. Model%cpl_fire) then
30873087
!--- instantaneous quantities
30883088
allocate (Coupling%u10mi_cpl (IM))
30893089
allocate (Coupling%v10mi_cpl (IM))

ccpp/data/GFS_typedefs.meta

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2868,15 +2868,15 @@
28682868
dimensions = (horizontal_dimension)
28692869
type = real
28702870
kind = kind_phys
2871-
active = (flag_for_surface_flux_coupling .or. flag_for_chemistry_coupling .or. flag_for_ocean_wave_coupling)
2871+
active = (flag_for_surface_flux_coupling .or. flag_for_chemistry_coupling .or. flag_for_ocean_wave_coupling .or. do_fire_coupling)
28722872
[v10mi_cpl]
28732873
standard_name = y_wind_at_10m_for_coupling
28742874
long_name = instantaneous V10m
28752875
units = m s-1
28762876
dimensions = (horizontal_dimension)
28772877
type = real
28782878
kind = kind_phys
2879-
active = (flag_for_surface_flux_coupling .or. flag_for_chemistry_coupling .or. flag_for_ocean_wave_coupling)
2879+
active = (flag_for_surface_flux_coupling .or. flag_for_chemistry_coupling .or. flag_for_ocean_wave_coupling .or. do_fire_coupling)
28802880
[tsfci_cpl]
28812881
standard_name = surface_skin_temperature_for_coupling
28822882
long_name = instantaneous sfc temperature

0 commit comments

Comments
 (0)