subroutine cu_ntiedtke::cubasmcn | ( | integer | klon, |
integer | klev, | ||
integer | klevm1, | ||
integer | kk, | ||
real(kind=kind_phys), dimension(klon,klev) | pten, | ||
real(kind=kind_phys), dimension(klon,klev) | pqen, | ||
real(kind=kind_phys), dimension(klon,klev) | pqsen, | ||
real(kind=kind_phys), dimension(klon,klev) | puen, | ||
real(kind=kind_phys), dimension(klon,klev) | pven, | ||
real(kind=kind_phys), dimension(klon,klev) | pverv, | ||
real(kind=kind_phys), dimension(klon,klev) | pgeo, | ||
real(kind=kind_phys), dimension(klon,klev+1) | pgeoh, | ||
logical, dimension(klon) | ldcum, | ||
integer, dimension(klon) | ktype, | ||
integer, dimension(klon,klev) | klab, | ||
real(kind=kind_phys), dimension(klon,klev) | plrain, | ||
real(kind=kind_phys), dimension(klon,klev) | pmfu, | ||
real(kind=kind_phys), dimension(klon) | pmfub, | ||
integer, dimension(klon) | kcbot, | ||
real(kind=kind_phys), dimension(klon,klev) | ptu, | ||
real(kind=kind_phys), dimension(klon,klev) | pqu, | ||
real(kind=kind_phys), dimension(klon,klev) | plu, | ||
real(kind=kind_phys), dimension(klon,klev) | puu, | ||
real(kind=kind_phys), dimension(klon,klev) | pvu, | ||
real(kind=kind_phys), dimension(klon,klev) | pmfus, | ||
real(kind=kind_phys), dimension(klon,klev) | pmfuq, | ||
real(kind=kind_phys), dimension(klon,klev) | pmful, | ||
real(kind=kind_phys), dimension(klon,klev) | pdmfup ) |
Definition at line 3652 of file cu_ntiedtke.F90.