subroutine clm_lake::shallakefluxes |
( |
real(kind_lake), dimension(1), intent(in) | forc_t, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_pbot, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_psrf, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_hgt, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_hgt_q, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_hgt_t, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_hgt_u, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_q, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_u, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_v, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_lwrad, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_snow, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_rain, |
|
|
real(kind_lake), dimension(1), intent(inout) | t_grnd, |
|
|
real(kind_lake), dimension(1), intent(in) | h2osno, |
|
|
real(kind_lake), dimension(1), intent(in) | snowdp, |
|
|
real(kind_lake), dimension(1), intent(in) | sabg, |
|
|
real(kind_lake), dimension(1), intent(in) | lat, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | dz, |
|
|
real(kind_lake), dimension(1,nlevlake), intent(in) | dz_lake, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | t_soisno, |
|
|
real(kind_lake), dimension(1,nlevlake), intent(in) | t_lake, |
|
|
integer, dimension(1), intent(in) | snl, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | h2osoi_liq, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | h2osoi_ice, |
|
|
real(kind_lake), dimension(1), intent(in) | savedtke1, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_prec_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_evap_soi, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_evap_tot, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_sh_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_lwrad_out, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_lwrad_net, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_soil_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_sh_tot, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_lh_tot, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_lh_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | t_veg, |
|
|
real(kind_lake), dimension(1), intent(out) | t_ref2m, |
|
|
real(kind_lake), dimension(1), intent(out) | q_ref2m, |
|
|
real(kind_lake), dimension(1), intent(out) | taux, |
|
|
real(kind_lake), dimension(1), intent(out) | tauy, |
|
|
real(kind_lake), dimension(1), intent(out) | ram1, |
|
|
real(kind_lake), dimension(1), intent(out) | ws, |
|
|
real(kind_lake), dimension(1), intent(out) | ks, |
|
|
real(kind_lake), dimension(1), intent(out) | eflx_gnet, |
|
|
real(kind_lake), dimension(1), intent(out) | z0mg, |
|
|
real(kind_lake), dimension(1), intent(out) | ustar_out, |
|
|
character(len=*), intent(inout) | errmsg, |
|
|
integer, intent(inout) | errflg, |
|
|
real(kind_lake), intent(in) | xlat_d, |
|
|
real(kind_lake), intent(in) | xlon_d ) |
|
private |