surf_seaice_mod Module




Used by

  • module~~surf_seaice_mod~~UsedByGraph module~surf_seaice_mod surf_seaice_mod module~pbl_surface_mod pbl_surface_mod module~pbl_surface_mod->module~surf_seaice_mod module~pbl_surface_mod~2 pbl_surface_mod module~pbl_surface_mod~2->module~surf_seaice_mod proc~old_lmdz1d old_lmdz1d proc~old_lmdz1d->module~pbl_surface_mod proc~phyredem~2 phyredem proc~phyredem~2->module~pbl_surface_mod proc~iniaqua~2 iniaqua proc~iniaqua~2->module~pbl_surface_mod proc~physiq physiq proc~physiq->module~pbl_surface_mod proc~phys_output_write~2 phys_output_write proc~phys_output_write~2->module~pbl_surface_mod proc~phyredem phyredem proc~phyredem->module~pbl_surface_mod proc~change_srf_frac change_srf_frac proc~change_srf_frac->module~pbl_surface_mod proc~scm scm proc~scm->module~pbl_surface_mod proc~create_etat0_unstruct~2 create_etat0_unstruct proc~create_etat0_unstruct~2->module~pbl_surface_mod proc~phys_output_write_spl~2 phys_output_write_spl proc~phys_output_write_spl~2->module~pbl_surface_mod proc~iniaqua~3 iniaqua proc~iniaqua~3->module~pbl_surface_mod proc~phyetat0 phyetat0 proc~phyetat0->module~pbl_surface_mod proc~phyetat0~2 phyetat0 proc~phyetat0~2->module~pbl_surface_mod proc~phys_output_write_spl phys_output_write_spl proc~phys_output_write_spl->module~pbl_surface_mod proc~create_etat0_unstruct create_etat0_unstruct proc~create_etat0_unstruct->module~pbl_surface_mod proc~physiq~2 physiq proc~physiq~2->module~pbl_surface_mod proc~change_srf_frac~2 change_srf_frac proc~change_srf_frac~2->module~pbl_surface_mod proc~etat0phys_netcdf etat0phys_netcdf proc~etat0phys_netcdf->module~pbl_surface_mod proc~phys_output_write phys_output_write proc~phys_output_write->module~pbl_surface_mod

Contents


Subroutines

public subroutine surf_seaice(rlon, rlat, swnet, lwnet, alb1, fder, itime, dtime, jour, knon, knindex, lafin, tsurf, p1lay, cdragh, cdragm, precip_rain, precip_snow, temp_air, spechum, AcoefH, AcoefQ, BcoefH, BcoefQ, AcoefU, AcoefV, BcoefU, BcoefV, ps, u1, v1, gustiness, pctsrf, snow, qsurf, qsol, agesno, tsoil, z0m, z0h, SFRWL, alb_dir_new, alb_dif_new, evap, fluxsens, fluxlat, tsurf_new, dflux_s, dflux_l, flux_u1, flux_v1, hice, tice, bilg_cumul, fcds, fcdi, dh_basal_growth, dh_basal_melt, dh_top_melt, dh_snow2sic, dtice_melt, dtice_snow2sic)

Switch according to type of ocean (couple, slab or forced)

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
integer, intent(in) :: itime
real, intent(in) :: dtime
integer, intent(in) :: jour
integer, intent(in) :: knon
integer, intent(in), DIMENSION(klon) :: knindex
logical, intent(in) :: lafin
real, intent(in), DIMENSION(klon) :: tsurf
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 Read more…
real, intent(inout), DIMENSION(klon) :: snow
real, intent(inout), DIMENSION(klon) :: qsurf
real, intent(inout), DIMENSION(klon) :: qsol
real, intent(inout), DIMENSION(klon) :: agesno
real, intent(inout), DIMENSION(klon, nsoilmx) :: tsoil Read more…
real, intent(out), DIMENSION(klon) :: z0m
real, intent(out), DIMENSION(klon) :: z0h
real, intent(in), DIMENSION(6) :: SFRWL
real, intent(out), DIMENSION(klon,nsw) :: alb_dir_new
real, intent(out), DIMENSION(klon,nsw) :: alb_dif_new
real, intent(out), DIMENSION(klon) :: evap
real, intent(out), DIMENSION(klon) :: fluxsens
real, intent(out), DIMENSION(klon) :: fluxlat
real, intent(out), DIMENSION(klon) :: tsurf_new
real, intent(out), DIMENSION(klon) :: dflux_s
real, intent(out), DIMENSION(klon) :: dflux_l
real, intent(out), DIMENSION(klon) :: flux_u1
real, intent(out), DIMENSION(klon) :: flux_v1
real, intent(inout), DIMENSION(klon) :: hice
real, intent(inout), DIMENSION(klon) :: tice
real, intent(inout), DIMENSION(klon) :: bilg_cumul
real, intent(inout), DIMENSION(klon) :: fcds
real, intent(inout), DIMENSION(klon) :: fcdi
real, intent(inout), DIMENSION(klon) :: dh_basal_growth
real, intent(inout), DIMENSION(klon) :: dh_basal_melt
real, intent(inout), DIMENSION(klon) :: dh_top_melt Read more…
real, intent(inout), DIMENSION(klon) :: dh_snow2sic Read more…
real, intent(inout), DIMENSION(klon) :: dtice_melt Read more…
real, intent(inout), DIMENSION(klon) :: dtice_snow2sic Read more…