SUEWS API Site
Documentation of SUEWS source code
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | ohm (qn1, qn_av_prev, dqndt_prev, qn_av_next, dqndt_next, qn1_S, qn_s_av_prev, dqnsdt_prev, qn_s_av_next, dqnsdt_next, tstep, dt_since_start, sfr_surf, nsurf, Tair_mav_5d, OHM_coef, OHM_threshSW, OHM_threshWD, soilstore_id, SoilStoreCap, state_id, BldgSurf, WaterSurf, SnowUse, SnowFrac, DiagQS, a1, a2, a3, qs, deltaQi) |
subroutine | ohm_coef_cal (sfr_surf, nsurf, Tair_mav_5d, OHM_coef, OHM_threshSW, OHM_threshWD, soilstore_id, SoilStoreCap, state_id, BldgSurf, WaterSurf, SnowUse, SnowFrac, a1, a2, a3) |
subroutine | ohm_dqndt_cal_x (dt, dt_since_start, qn1_av_prev, qn1, dqndt_prev, qn1_av_next, dqndt_next) |
subroutine | ohm_dqndt_cal (nsh, qn, qn_store_grid, qn_av_store_grid, dqndt) |
subroutine | ohm_qs_cal (qn1, dqndt, a1, a2, a3, qs) |
subroutine ohm | ( | real(kind(1d0)), intent(in) | qn1, |
real(kind(1d0)), intent(in) | qn_av_prev, | ||
real(kind(1d0)), intent(in) | dqndt_prev, | ||
real(kind(1d0)), intent(out) | qn_av_next, | ||
real(kind(1d0)), intent(out) | dqndt_next, | ||
real(kind(1d0)), intent(in) | qn1_S, | ||
real(kind(1d0)), intent(in) | qn_s_av_prev, | ||
real(kind(1d0)), intent(in) | dqnsdt_prev, | ||
real(kind(1d0)), intent(out) | qn_s_av_next, | ||
real(kind(1d0)), intent(out) | dqnsdt_next, | ||
integer, intent(in) | tstep, | ||
integer, intent(in) | dt_since_start, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | sfr_surf, | ||
integer, intent(in) | nsurf, | ||
real(kind(1d0)), intent(in) | Tair_mav_5d, | ||
real(kind(1d0)), dimension(nsurf + 1, 4, 3), intent(in) | OHM_coef, | ||
real(kind(1d0)), dimension(nsurf + 1), intent(in) | OHM_threshSW, | ||
real(kind(1d0)), dimension(nsurf + 1), intent(in) | OHM_threshWD, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | soilstore_id, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | SoilStoreCap, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | state_id, | ||
integer, intent(in) | BldgSurf, | ||
integer, intent(in) | WaterSurf, | ||
integer, intent(in) | SnowUse, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | SnowFrac, | ||
integer, intent(in) | DiagQS, | ||
real(kind(1d0)), intent(out) | a1, | ||
real(kind(1d0)), intent(out) | a2, | ||
real(kind(1d0)), intent(out) | a3, | ||
real(kind(1d0)), intent(out) | qs, | ||
real(kind(1d0)), dimension(nsurf), intent(out) | deltaQi | ||
) |
Definition at line 12 of file suews_phys_ohm.f95.
References errorhint(), ohm_coef_cal(), ohm_dqndt_cal_x(), and ohm_qs_cal().
Referenced by suews_driver::suews_cal_qs().
subroutine ohm_coef_cal | ( | real(kind(1d0)), dimension(nsurf), intent(in) | sfr_surf, |
integer, intent(in) | nsurf, | ||
real(kind(1d0)), intent(in) | Tair_mav_5d, | ||
real(kind(1d0)), dimension(nsurf + 1, 4, 3), intent(in) | OHM_coef, | ||
real(kind(1d0)), dimension(nsurf + 1), intent(in) | OHM_threshSW, | ||
real(kind(1d0)), dimension(nsurf + 1), intent(in) | OHM_threshWD, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | soilstore_id, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | SoilStoreCap, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | state_id, | ||
integer, intent(in) | BldgSurf, | ||
integer, intent(in) | WaterSurf, | ||
integer, intent(in) | SnowUse, | ||
real(kind(1d0)), dimension(nsurf), intent(in) | SnowFrac, | ||
real(kind(1d0)), intent(out) | a1, | ||
real(kind(1d0)), intent(out) | a2, | ||
real(kind(1d0)), intent(out) | a3 | ||
) |
Definition at line 192 of file suews_phys_ohm.f95.
Referenced by ohm().
subroutine ohm_dqndt_cal | ( | integer, intent(in) | nsh, |
real(kind(1d0)), intent(in) | qn, | ||
real(kind(1d0)), dimension(nsh), intent(inout) | qn_store_grid, | ||
real(kind(1d0)), dimension(2*nsh + 1), intent(inout) | qn_av_store_grid, | ||
real(kind(1d0)), intent(out) | dqndt | ||
) |
Definition at line 298 of file suews_phys_ohm.f95.
subroutine ohm_dqndt_cal_x | ( | integer, intent(in) | dt, |
integer, intent(in) | dt_since_start, | ||
real(kind(1d0)), intent(in) | qn1_av_prev, | ||
real(kind(1d0)), intent(in) | qn1, | ||
real(kind(1d0)), intent(in) | dqndt_prev, | ||
real(kind(1d0)), intent(out) | qn1_av_next, | ||
real(kind(1d0)), intent(out) | dqndt_next | ||
) |
Definition at line 261 of file suews_phys_ohm.f95.
Referenced by anohm_module::anohm(), and ohm().
subroutine ohm_qs_cal | ( | real(kind(1d0)), intent(in) | qn1, |
real(kind(1d0)), intent(in) | dqndt, | ||
real(kind(1d0)), intent(in) | a1, | ||
real(kind(1d0)), intent(in) | a2, | ||
real(kind(1d0)), intent(in) | a3, | ||
real(kind(1d0)), intent(out) | qs | ||
) |
Definition at line 337 of file suews_phys_ohm.f95.
Referenced by anohm_module::anohm(), and ohm().