27 |
real, intent(in):: t(klon, klev), qs(klon, klev), gz(klon, klev) |
real, intent(in):: t(klon, klev), qs(klon, klev), gz(klon, klev) |
28 |
real, intent(in):: p(klon, klev), h(klon, klev) |
real, intent(in):: p(klon, klev), h(klon, klev) |
29 |
real, intent(in):: tv(klon, klev), lv(klon, klev) |
real, intent(in):: tv(klon, klev), lv(klon, klev) |
30 |
real, intent(in):: pbase(klon), buoybase(klon), plcl(klon) |
real, intent(in):: pbase(:), buoybase(:), plcl(:) ! (ncum) |
31 |
|
|
32 |
! outputs: |
! outputs: |
33 |
integer, intent(out):: inb(:) ! (ncum) |
integer, intent(out):: inb(:) ! (ncum) |