ocean_cpl_mod Module







Uses

  • module~~ocean_cpl_mod~2~~UsesGraph module~ocean_cpl_mod~2 ocean_cpl_mod module~clesphys_mod_h~2 clesphys_mod_h module~ocean_cpl_mod~2->module~clesphys_mod_h~2

Contents


Subroutines

public subroutine ocean_cpl_init(dtime, rlon, rlat)

Read more…

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: dtime
real, intent(in), DIMENSION(klon) :: rlon Read more…
real, intent(in), DIMENSION(klon) :: rlat Read more…

public subroutine ocean_cpl_noice(swnet, lwnet, alb1, windsp, fder_old, itime, dtime, knon, knindex, p1lay, cdragh, cdragq, cdragm, precip_rain, precip_snow, temp_air, spechum, AcoefH, AcoefQ, BcoefH, BcoefQ, AcoefU, AcoefV, BcoefU, BcoefV, ps, u1, v1, gustiness, tsurf_in, radsol, snow, agesno, qsurf, evap, fluxsens, fluxlat, flux_u1, flux_v1, tsurf_new, dflux_s, dflux_l, sens_prec_liq, sss, delta_sal, rhoa, delta_sst, dter, dser, dt_ds)

Receive sea-surface temperature(tsurf_cpl) from coupler

Read more…

Arguments

Type IntentOptional Attributes Name
real, intent(in), DIMENSION(klon) :: swnet
real, intent(in), DIMENSION(klon) :: lwnet
real, intent(in), DIMENSION(klon) :: alb1
real, intent(in), DIMENSION(klon) :: windsp
real, intent(in), DIMENSION(klon) :: fder_old
integer, intent(in) :: itime
real, intent(in) :: dtime
integer, intent(in) :: knon
integer, intent(in), DIMENSION(klon) :: knindex
real, intent(in), DIMENSION(klon) :: p1lay
real, intent(in), DIMENSION(klon) :: cdragh
real, intent(in), DIMENSION(klon) :: cdragq
real, intent(in), DIMENSION(klon) :: cdragm
real, intent(in), DIMENSION(klon) :: precip_rain
real, intent(in), DIMENSION(klon) :: precip_snow
real, intent(in), DIMENSION(klon) :: temp_air
real, intent(in), DIMENSION(klon) :: spechum
real, intent(in), DIMENSION(klon) :: AcoefH
real, intent(in), DIMENSION(klon) :: AcoefQ
real, intent(in), DIMENSION(klon) :: BcoefH
real, intent(in), DIMENSION(klon) :: BcoefQ
real, intent(in), DIMENSION(klon) :: AcoefU
real, intent(in), DIMENSION(klon) :: AcoefV
real, intent(in), DIMENSION(klon) :: BcoefU
real, intent(in), DIMENSION(klon) :: BcoefV
real, intent(in), DIMENSION(klon) :: ps
real, intent(in), DIMENSION(klon) :: u1
real, intent(in), DIMENSION(klon) :: v1
real, intent(in), DIMENSION(klon) :: gustiness
real, intent(in) :: tsurf_in(:)
real, intent(inout), DIMENSION(klon) :: radsol
real, intent(inout), DIMENSION(klon) :: snow
real, intent(inout), DIMENSION(klon) :: agesno Read more…
real, intent(out), DIMENSION(klon) :: qsurf
real, intent(out), DIMENSION(klon) :: evap
real, intent(out), DIMENSION(klon) :: fluxsens
real, intent(out), DIMENSION(klon) :: fluxlat
real, intent(out), DIMENSION(klon) :: flux_u1
real, intent(out), DIMENSION(klon) :: flux_v1
real, intent(out), DIMENSION(klon) :: tsurf_new
real, intent(out), DIMENSION(klon) :: dflux_s
real, intent(out), DIMENSION(klon) :: dflux_l
real, intent(out) :: sens_prec_liq(:)
real, intent(out) :: sss(:) Read more…
real, intent(in) :: delta_sal(:)
real, intent(in) :: rhoa(:)
real, intent(in) :: delta_sst(:)
real, intent(in) :: dter(:)
real, intent(in) :: dser(:)
real, intent(in) :: dt_ds(:) Read more…

public subroutine ocean_cpl_ice(rlon, rlat, swnet, lwnet, alb1, fder_old, itime, dtime, knon, knindex, lafin, p1lay, cdragh, cdragm, precip_rain, precip_snow, temp_air, spechum, AcoefH, AcoefQ, BcoefH, BcoefQ, AcoefU, AcoefV, BcoefU, BcoefV, ps, u1, v1, gustiness, pctsrf, radsol, snow, qsurf, alb1_new, alb2_new, evap, fluxsens, fluxlat, flux_u1, flux_v1, tsurf_new, dflux_s, dflux_l, rhoa)

Receive ocean temperature(tsurf_cpl) and albedo(alb_new) from coupler

Read more…

Arguments

Type IntentOptional Attributes Name
real, intent(in), DIMENSION(klon) :: rlon
real, intent(in), DIMENSION(klon) :: rlat
real, intent(in), DIMENSION(klon) :: swnet
real, intent(in), DIMENSION(klon) :: lwnet
real, intent(in), DIMENSION(klon) :: alb1
real, intent(in), DIMENSION(klon) :: fder_old
integer, intent(in) :: itime
real, intent(in) :: dtime
integer, intent(in) :: knon
integer, intent(in), DIMENSION(klon) :: knindex
logical, intent(in) :: lafin
real, intent(in), DIMENSION(klon) :: p1lay
real, intent(in), DIMENSION(klon) :: cdragh
real, intent(in), DIMENSION(klon) :: cdragm
real, intent(in), DIMENSION(klon) :: precip_rain
real, intent(in), DIMENSION(klon) :: precip_snow
real, intent(in), DIMENSION(klon) :: temp_air
real, intent(in), DIMENSION(klon) :: spechum
real, intent(in), DIMENSION(klon) :: AcoefH
real, intent(in), DIMENSION(klon) :: AcoefQ
real, intent(in), DIMENSION(klon) :: BcoefH
real, intent(in), DIMENSION(klon) :: BcoefQ
real, intent(in), DIMENSION(klon) :: AcoefU
real, intent(in), DIMENSION(klon) :: AcoefV
real, intent(in), DIMENSION(klon) :: BcoefU
real, intent(in), DIMENSION(klon) :: BcoefV
real, intent(in), DIMENSION(klon) :: ps
real, intent(in), DIMENSION(klon) :: u1
real, intent(in), DIMENSION(klon) :: v1
real, intent(in), DIMENSION(klon) :: gustiness
real, intent(in), DIMENSION(klon,nbsrf) :: pctsrf
real, intent(inout), DIMENSION(klon) :: radsol
real, intent(inout), DIMENSION(klon) :: snow Read more…
real, intent(out), DIMENSION(klon) :: qsurf
real, intent(out), DIMENSION(klon) :: alb1_new
real, intent(out), DIMENSION(klon) :: alb2_new
real, intent(out), DIMENSION(klon) :: evap
real, intent(out), DIMENSION(klon) :: fluxsens
real, intent(out), DIMENSION(klon) :: fluxlat
real, intent(out), DIMENSION(klon) :: flux_u1
real, intent(out), DIMENSION(klon) :: flux_v1
real, intent(out), DIMENSION(klon) :: tsurf_new
real, intent(out), DIMENSION(klon) :: dflux_s Read more…
real, intent(out), DIMENSION(klon) :: dflux_l Read more…
real, intent(in) :: rhoa(:) Read more…