subroutine cu_ntiedtke::cudlfsn | ( | integer | klon, |
integer | klev, | ||
integer, dimension(klon) | kcbot, | ||
integer, dimension(klon) | kctop, | ||
integer, dimension(klon) | lndj, | ||
logical, dimension(klon) | ldcum, | ||
real(kind=kind_phys), dimension(klon,klev) | ptenh, | ||
real(kind=kind_phys), dimension(klon,klev) | pqenh, | ||
real(kind=kind_phys), dimension(klon,klev) | puen, | ||
real(kind=kind_phys), dimension(klon,klev) | pven, | ||
real(kind=kind_phys), dimension(klon,klev) | pten, | ||
real(kind=kind_phys), dimension(klon,klev) | pqsen, | ||
real(kind=kind_phys), dimension(klon,klev) | pgeo, | ||
real(kind=kind_phys), dimension(klon,klev+1) | pgeoh, | ||
real(kind=kind_phys), dimension(klon,klev+1) | paph, | ||
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) | pmfub, | ||
real(kind=kind_phys), dimension(klon) | prfl, | ||
real(kind=kind_phys), dimension(klon,klev) | ptd, | ||
real(kind=kind_phys), dimension(klon,klev) | pqd, | ||
real(kind=kind_phys), dimension(klon,klev) | pud, | ||
real(kind=kind_phys), dimension(klon,klev) | pvd, | ||
real(kind=kind_phys), dimension(klon,klev) | pmfd, | ||
real(kind=kind_phys), dimension(klon,klev) | pmfds, | ||
real(kind=kind_phys), dimension(klon,klev) | pmfdq, | ||
real(kind=kind_phys), dimension(klon,klev) | pdmfdp, | ||
integer, dimension(klon) | kdtop, | ||
logical, dimension(klon) | lddraf ) |
Definition at line 2382 of file cu_ntiedtke.F90.