SUEWS API Site
Documentation of SUEWS source code
Modules | Functions/Subroutines
suews_phys_anohm.f95 File Reference

Go to the source code of this file.

Modules

module  anohm_module
 AnOHM: Analytical Objective Hysteresis Model.
 

Functions/Subroutines

subroutine anohm_module::anohm (tstep, dt_since_start, qn1, qn1_av_prev, dqndt_prev, qf, MetForcingData_grid, moist_surf, alb, emis, cpAnOHM, kkAnOHM, chAnOHM, sfr, nsurf, EmissionsMethod, id, Gridiv, qn1_av_next, dqndt_next, a1, a2, a3, qs, deltaQi)
 High level wrapper for AnOHM calculation. More...
 
subroutine anohm_module::anohm_coef (sfc_typ, xid, xgrid, MetForcingData_grid, moist, EmissionsMethod, qf, alb, emis, cpAnOHM, kkAnOHM, chAnOHM, xa1, xa2, xa3)
 High level wrapper for AnOHM coefficients calculation. More...
 
subroutine anohm_module::anohm_xts (sfc_typ, ASd, mSd, ATa, mTa, tau, mWS, mWF, mAH, xalb, xemis, xcp, xk, xch, xBo, tSd, xTHr, xTs)
 calculate the surface temperature related parameters (ATs, mTs, gamma) based on forcings and sfc. More...
 
subroutine anohm_module::anohm_coef_land_cal (ASd, mSd, ATa, mTa, tau, mWS, mWF, mAH, xalb, xemis, xcp, xk, xch, xBo, xa1, xa2, xa3, ATs, mTs, gamma)
 
subroutine anohm_module::anohm_coef_water_cal (ASd, mSd, ATa, mTa, tau, mWS, mWF, mAH, xalb, xemis, xcp, xk, xch, xBo, xeta, xmu, xa1, xa2, xa3, ATs, mTs, gamma)
 a wrapper for retrieving AnOHM coefficients of water body More...
 
subroutine anohm_module::anohm_fc (xid, MetForcingData_grid, EmissionsMethod, qf, ASd, mSd, tSd, ATa, mTa, tTa, tau, mWS, mWF, mAH)
 
subroutine anohm_module::anohm_fcload (xid, MetForcingData_grid, EmissionsMethod, qf, Sd, Ta, RH, pres, WS, WF, AH, tHr)
 load forcing series for AnOHM_FcCal More...
 
subroutine anohm_module::anohm_fccal (Sd, Ta, WS, WF, AH, tHr, ASd, mSd, tSd, ATa, mTa, tTa, tau, mWS, mWF, mAH)
 calculate the key parameters of a sinusoidal curve for AnOHM forcings i.e., a, b, c in a*Sin(Pi/12*t+b)+c More...
 
subroutine anohm_module::anohm_shapefit (tHr, obs, amp, mean, tpeak)
 calculate the key parameters of a sinusoidal curve for AnOHM forcings i.e., a, b, c in a*Sin(Pi/12*t+b)+c, where t is in hour More...
 
subroutine anohm_module::fsin (m, n, x, xdat, ydat, fvec, iflag)
 sinusoidal function f(t) for fitting: f(t) = mean+amp*Sin(Pi/12(t-delta)) x = (/mean,amp,delta/) contains the fitting parameters More...
 
subroutine anohm_module::anohm_bo_cal (sfc_typ, Sd, Ta, RH, pres, tHr, ASd, mSd, ATa, mTa, tau, mWS, mWF, mAH, xalb, xemis, xcp, xk, xch, xSM, tSd, xBo)
 estimate daytime Bowen ratio for calculation of AnOHM coefficients More...
 
subroutine anohm_module::fcnbo (n, x, fvec, iflag, m, prms)
 this fucntion will construct an equaiton for Bo calculation More...
 
real(kind(1d0)) function anohm_module::esat_fn (Ta)
 calculate saturation vapor pressure (es) at air temperature (Ta) (MRR, 1987) More...
 
real(kind(1d0)) function anohm_module::qsat_fn (Ta, pres)
 calculate saturation specific humidity (qsat) at air temperature (Ta) and atmospheric pressure (pres) (MRR, 1987) More...
 
real(kind(1d0)) function anohm_module::qa_fn (Ta, RH, pres)
 convert relative humidity (RH) to specific humidity (qa) at air temperature (Ta) and atmospheric pressure (pres) More...