Go to the source code of this file.
|
module | ufo_aod_mod |
| Fortran module to handle aod observations.
|
|
|
integer, parameter | ufo_aod_mod::max_string =800 |
|
logical, parameter | ufo_aod_mod::ice4qsat =.TRUE. |
|
real(fp), parameter | ufo_aod_mod::ttp = 2.7316e+2_fp |
|
real(fp), parameter | ufo_aod_mod::psat = 6.1078e+2_fp |
|
real(fp), parameter | ufo_aod_mod::rd = 2.8705e+2_fp |
|
real(fp), parameter | ufo_aod_mod::rv = 4.6150e+2_fp |
|
real(fp), parameter | ufo_aod_mod::cv = 7.1760e+2_fp |
|
real(fp), parameter | ufo_aod_mod::cliq = 4.1855e+3_fp |
|
real(fp), parameter | ufo_aod_mod::csol = 2.1060e+3_fp |
|
real(fp), parameter | ufo_aod_mod::cvap = 1.8460e+3_fp |
|
real(fp), parameter | ufo_aod_mod::hvap = 2.5000e+6_fp |
|
real(fp), parameter | ufo_aod_mod::hfus = 3.3358e+5_fp |
|
real(fp), parameter | ufo_aod_mod::grav = 9.81_fp |
|
real(fp), parameter | ufo_aod_mod::tmix = ttp-20._fp |
|
real(fp), parameter | ufo_aod_mod::hsub = hvap+hfus |
|
real(fp), parameter | ufo_aod_mod::eps = rd/rv |
|
real(fp), parameter | ufo_aod_mod::omeps =one-eps |
|
real(fp), parameter | ufo_aod_mod::dldt =cvap-cliq |
|
real(fp), parameter | ufo_aod_mod::dldti = cvap-csol |
|
real(fp), parameter | ufo_aod_mod::xa = -(dldt/rv) |
|
real(fp), parameter | ufo_aod_mod::xai = -(dldti/rv) |
|
real(fp), parameter | ufo_aod_mod::xb = xa+hvap/(rv*ttp) |
|
real(fp), parameter | ufo_aod_mod::xbi = xai+hsub/(rv*ttp) |
|
logical | ufo_aod_mod::flip_vertical |
|
◆ genqsat()
subroutine ufo_aod_simobs::genqsat |
( |
real(fp), dimension(nsig), intent(out) |
qsat, |
|
|
real(fp), dimension(nsig), intent(in) |
tsen, |
|
|
real(fp), dimension(nsig), intent(in) |
prsl, |
|
|
integer, intent(in) |
nsig, |
|
|
logical, intent(in) |
ice |
|
) |
| |
◆ gocart_aerosol_size()
real(fp) function ufo_aod_simobs::gocart_aerosol_size |
( |
integer, intent(in) |
itype, |
|
|
real(fp), intent(in) |
eh |
|
) |
| |
◆ load_aerosol_data()
subroutine ufo_aod_simobs::load_aerosol_data |
( |
| ) |
|
|
private |
◆ load_atm_data()
subroutine ufo_aod_simobs::load_atm_data |
( |
| ) |
|
|
private |