| subroutine gfdl_cloud_microphys_v3_mod::sedimentation |
( |
real(kind_phys), intent(in) | dts, |
|
|
integer, intent(in) | ks, |
|
|
integer, intent(in) | ke, |
|
|
real (kind = r8), dimension (ks:ke), intent(inout) | tz, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | qv, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | ql, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | qr, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | qi, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | qs, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | qg, |
|
|
real(kind_phys), dimension (ks:ke), intent(in) | dz, |
|
|
real(kind_phys), dimension (ks:ke), intent(in) | dp, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | vtw, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | vtr, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | vti, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | vts, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | vtg, |
|
|
real(kind_phys), intent(out) | w1, |
|
|
real(kind_phys), intent(out) | r1, |
|
|
real(kind_phys), intent(out) | i1, |
|
|
real(kind_phys), intent(out) | s1, |
|
|
real(kind_phys), intent(out) | g1, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | pfw, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | pfr, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | pfi, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | pfs, |
|
|
real(kind_phys), dimension (ks:ke), intent(out) | pfg, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | u, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | v, |
|
|
real(kind_phys), dimension (ks:ke), intent(inout) | w, |
|
|
real(kind_phys), dimension (ks:ke), intent(in) | den, |
|
|
real(kind_phys), dimension (ks:ke), intent(in) | denfac, |
|
|
real (kind = r8), intent(inout) | dte ) |
|
private |