Flux variable declarations; these include fields sent from the coupler ("in"), sent to the coupler ("out"), and used internally ("internal")
REVISION HISTORY:
author Elizabeth C. Hunke, LANLINTERFACE:
module ice_fluxUSES:
use ice_kinds_mod use ice_domain use ice_constants
INTERFACE:
subroutine init_flux_atm(i,j)DESCRIPTION:
Initialize all fluxes sent to coupler for use by the atm model and a few state quantities
REVISION HISTORY:
author: Elizabeth C. Hunke, LANLUSES:
INPUT/OUTPUT PARAMETERS:
integer i,j
INTERFACE:
subroutine init_flux_ocn(i,j)DESCRIPTION:
Initialize fluxes sent to coupler for use by the ocean model
REVISION HISTORY:
author: Elizabeth C. Hunke, LANLUSES:
INPUT/OUTPUT PARAMETERS:
integer i,j
INTERFACE:
subroutine merge_fluxes(i,j,nc,frshn,evapn, & fshn,flhn,flwupn,swbot,Focn,Trefn,strxn,stryn)DESCRIPTION:
Aggregates flux information from all ice thickness categories
REVISION HISTORY:
author: Elizabeth C. Hunke, LANLUSES:
use ice_stateINPUT/OUTPUT PARAMETERS:
integer (kind=int_kind), intent(in) :: i,j,nc real (kind=dbl_kind), intent(in) :: & frshn ! fresh water flux to ocean (kg/m2/s) &, evapn ! evaporation (kg/m2/s) &, fshn ! sensible heat flx (W/m**2) &, flhn ! latent heat flx (W/m**2) &, flwupn ! upwd lw emitted heat flx (W/m**2) &, swbot ! sw radiation through ice bot (W/m**2) &, Focn ! actual ocn/ice heat flx (W/m**2) &, Trefn ! air tmp rfrnc level (K) &, strxn ! air/ice zonal strss, (N/m**2) &, stryn ! air/ice merdnl strss, (N/m**2)