subroutine, public fv_sat_adj::fv_sat_adj_run |
( |
real(kind=kind_dyn), intent(in) | mdt, |
|
|
real(kind=kind_dyn), intent(in) | zvir, |
|
|
integer, intent(in) | is, |
|
|
integer, intent(in) | ie, |
|
|
integer, intent(in) | isd, |
|
|
integer, intent(in) | ied, |
|
|
integer, intent(in) | isc1, |
|
|
integer, intent(in) | iec1, |
|
|
integer, intent(in) | isc2, |
|
|
integer, intent(in) | iec2, |
|
|
integer, intent(in) | kmp, |
|
|
integer, intent(in) | km, |
|
|
integer, intent(in) | kmdelz, |
|
|
integer, intent(in) | js, |
|
|
integer, intent(in) | je, |
|
|
integer, intent(in) | jsd, |
|
|
integer, intent(in) | jed, |
|
|
integer, intent(in) | jsc1, |
|
|
integer, intent(in) | jec1, |
|
|
integer, intent(in) | jsc2, |
|
|
integer, intent(in) | jec2, |
|
|
integer, intent(in) | ng, |
|
|
logical, intent(in) | hydrostatic, |
|
|
logical, intent(in) | fast_mp_consv, |
|
|
real(kind=kind_dyn), dimension(is:ie, js:je), intent(inout) | te0_2d, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(out) | te0, |
|
|
integer, intent(in) | ngas, |
|
|
real(kind=kind_dyn), dimension(:,:,:,:), intent(inout), optional | qvi, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(inout) | qv, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(inout) | ql, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(inout) | qi, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(inout) | qr, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(inout) | qs, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(inout) | qg, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed), intent(in) | hs, |
|
|
real(kind=kind_dyn), dimension(is:ie, 1:km+1, js:je), intent(in) | peln, |
|
|
real(kind=kind_dyn), dimension(is:ie, js:je, 1:kmdelz), intent(in) | delz, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(in) | delp, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(inout) | pt, |
|
|
real(kind=kind_dyn), dimension(is:ie, js:je, 1:km), intent(inout) | pkz, |
|
|
real(kind=kind_dyn), dimension(isd:isd, jsd:jsd, 1), intent(inout) | q_con, |
|
|
real(kind=kind_dyn), intent(in) | akap, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1), intent(inout) | cappa, |
|
|
real(kind_grid), dimension(isd:ied, jsd:jed), intent(in) | area, |
|
|
real(kind=kind_dyn), dimension(is:ie, js:je, 1:km), intent(inout) | dtdt, |
|
|
logical, intent(in) | out_dt, |
|
|
logical, intent(in) | last_step, |
|
|
logical, intent(in) | do_qa, |
|
|
real(kind=kind_dyn), dimension(isd:ied, jsd:jed, 1:km), intent(out) | qa, |
|
|
integer, intent(in) | nthreads, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg ) |