In this PR, subroutine coupler_generate_sfc_xgrid has been defined and used in full _couplermain.
In the block of code preceding call coupler_generate_sfc_xgrid, the call to _atmos_ice_landchksum has been left inside the "If(Atm%pe)" statement. There is a possibility this call could be moved up where it more belongs to the set of calls that _set_ice_surfacefields. The setting of the current pelist to Atm%pelist has also been left unchanged in case this information is useful in understanding the top portion of the fast loop that relates to atmospheric dynamics.
Regression tests in AM4, AM5, CM4, SPEAR, OM4_extra, and OMIP4_CORE2 xmls pass.
In this PR, subroutine
coupler_generate_sfc_xgrid
has been defined and used in full _couplermain.In the block of code preceding
call coupler_generate_sfc_xgrid
, the call to _atmos_ice_landchksum has been left inside the "If(Atm%pe)" statement. There is a possibility this call could be moved up where it more belongs to the set of calls that _set_ice_surfacefields. The setting of the current pelist to Atm%pelist has also been left unchanged in case this information is useful in understanding the top portion of the fast loop that relates to atmospheric dynamics.Regression tests in AM4, AM5, CM4, SPEAR, OM4_extra, and OMIP4_CORE2 xmls pass.