subroutine sat_vapor_pres_k_mod::compute_qs_k::compute_qs_k_3d |
( |
real, dimension(:,:,:), intent(in) |
temp, |
|
|
real, dimension(:,:,:), intent(in) |
press, |
|
|
real, intent(in) |
eps, |
|
|
real, intent(in) |
zvir, |
|
|
real, dimension(:,:,:), intent(out) |
qs, |
|
|
integer, intent(out) |
nbad, |
|
|
real, dimension(:,:,:), intent(in), optional |
q, |
|
|
real, intent(in), optional |
hc, |
|
|
real, dimension(:,:,:), intent(out), optional |
dqsdT, |
|
|
real, dimension(:,:,:), intent(out), optional |
esat, |
|
|
logical, intent(in), optional |
es_over_liq, |
|
|
logical, intent(in), optional |
es_over_liq_and_ice |
|
) |
| |
|
private |