subroutine module_bl_myjpbl::mixlen |
( |
integer(kind=kint), intent(in) | lmh, |
|
|
real(kind=kfpt), intent(in) | rsqdt, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | u, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | v, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | thv, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | the, |
|
|
real(kind=kfpt), dimension(1:lm), intent(inout) | q2, |
|
|
real(kind=kfpt), dimension(1:lm-1), intent(inout) | epsl, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | epsq2, |
|
|
real(kind=kfpt), dimension(1:lm+1), intent(in) | z, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | p, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | ps, |
|
|
real(kind=kfpt), dimension(1:lm), intent(in) | rxner, |
|
|
real(kind=kfpt), dimension(1:lm-1), intent(out) | gm, |
|
|
real(kind=kfpt), dimension(1:lm-1), intent(out) | gh, |
|
|
real(kind=kfpt), dimension(1:lm-1), intent(out) | el, |
|
|
real(kind=kfpt), intent(out) | pblh, |
|
|
integer(kind=kint), intent(out) | lpbl, |
|
|
integer(kind=kint), intent(out) | lmxl, |
|
|
real(kind=kfpt), intent(inout) | ct, |
|
|
real(kind=kfpt), intent(out) | mixht, |
|
|
integer(kind=kint), intent(in) | i, |
|
|
integer(kind=kint), intent(in) | j, |
|
|
integer(kind=kint), intent(in) | lm ) |
|
private |