subroutine clm_lake::shallakehydrology |
( |
real(kind_lake), dimension(1,nlevlake), intent(in) | dz_lake, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_rain, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_snow, |
|
|
real(kind_lake), dimension(1), intent(inout) | begwb, |
|
|
real(kind_lake), dimension(1), intent(in) | qflx_evap_tot, |
|
|
real(kind_lake), dimension(1), intent(in) | forc_t, |
|
|
logical, dimension(1), intent(in) | do_capsnow, |
|
|
real(kind_lake), dimension(1), intent(in) | t_grnd, |
|
|
real(kind_lake), dimension(1), intent(in) | qflx_evap_soi, |
|
|
real(kind_lake), dimension(1), intent(in) | qflx_snomelt, |
|
|
integer, dimension(1,-nlevsnow+1:nlevsoil), intent(in) | imelt, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) | frac_iceold, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) | z, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) | dz, |
|
|
real(kind_lake), dimension(1,-nlevsnow+0:nlevsoil), intent(inout) | zi, |
|
|
integer, dimension(1), intent(inout) | snl, |
|
|
real(kind_lake), dimension(1), intent(inout) | h2osno, |
|
|
real(kind_lake), dimension(1), intent(inout) | snowdp, |
|
|
real(kind_lake), dimension(1,nlevlake), intent(inout) | lake_icefrac, |
|
|
real(kind_lake), dimension(1,nlevlake), intent(inout) | t_lake, |
|
|
real(kind_lake), dimension(1), intent(out) | endwb, |
|
|
real(kind_lake), dimension(1), intent(out) | snowage, |
|
|
real(kind_lake), dimension(1), intent(out) | snowice, |
|
|
real(kind_lake), dimension(1), intent(out) | snowliq, |
|
|
real(kind_lake), dimension(1), intent(out) | t_snow, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) | t_soisno, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) | h2osoi_ice, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) | h2osoi_liq, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) | h2osoi_vol, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_drain, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_surf, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_infl, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_qrgwl, |
|
|
real(kind_lake), dimension(1), intent(out) | qcharge, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_prec_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_snowcap, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_snowcap_col, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_snow_grnd_pft, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_snow_grnd_col, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_rain_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_evap_tot_col, |
|
|
real(kind_lake), dimension(1), intent(out) | soilalpha, |
|
|
real(kind_lake), dimension(1), intent(out) | zwt, |
|
|
real(kind_lake), dimension(1), intent(out) | fcov, |
|
|
real(kind_lake), dimension(1,1:nlevsoil), intent(out) | rootr_column, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_evap_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_sub_snow, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_dew_snow, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_dew_grnd, |
|
|
real(kind_lake), dimension(1), intent(out) | qflx_rain_grnd_col, |
|
|
real(kind_lake), dimension(1,nlevsoil) | watsat, |
|
|
real(kind_lake), dimension(1,nlevsoil) | tksatu, |
|
|
real(kind_lake), dimension(1,nlevsoil) | tkmg, |
|
|
real(kind_lake), dimension(1,nlevsoil) | tkdry, |
|
|
real(kind_lake), dimension(1,nlevsoil) | csol, |
|
|
real(kind_lake), intent(in) | dtime, |
|
|
character(*), intent(inout) | errmsg, |
|
|
integer, intent(inout) | errflg ) |
|
private |