My Project
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | phystokenc (nlon, nlev, pdtphys, rlon, rlat, pt, pmfu, pmfd, pen_u, pde_u, pen_d, pde_d, pfm_therm, pentr_therm, cdragh, pcoefh, yu1, yv1, ftsol, pctsrf, frac_impa, frac_nucl, pphis, paire, dtime, itap, psh, pda, pphi, pmp, pupwd, pdnwd) |
subroutine phystokenc | ( | integer | nlon, |
integer | nlev, | ||
real | pdtphys, | ||
real, dimension(klon) | rlon, | ||
real, dimension(klon) | rlat, | ||
real, dimension(klon,klev) | pt, | ||
real, dimension(klon,klev) | pmfu, | ||
real, dimension(klon,klev) | pmfd, | ||
real, dimension(klon,klev) | pen_u, | ||
real, dimension(klon,klev) | pde_u, | ||
real, dimension(klon,klev) | pen_d, | ||
real, dimension(klon,klev) | pde_d, | ||
real, dimension(klon,klev+1), intent(in) | pfm_therm, | ||
real, dimension(klon,klev) | pentr_therm, | ||
real, dimension(klon) | cdragh, | ||
real, dimension(klon,klev) | pcoefh, | ||
real, dimension(klon) | yu1, | ||
real, dimension(klon) | yv1, | ||
real, dimension(klon,nbsrf) | ftsol, | ||
real, dimension(klon,nbsrf) | pctsrf, | ||
real, dimension(klon,klev) | frac_impa, | ||
real, dimension(klon,klev) | frac_nucl, | ||
real, dimension(klon) | pphis, | ||
real, dimension(klon) | paire, | ||
real | dtime, | ||
integer | itap, | ||
real, dimension(klon,klev), intent(in) | psh, | ||
real, dimension(klon,klev), intent(in) | pda, | ||
real, dimension(klon,klev,klev), intent(in) | pphi, | ||
real, dimension(klon,klev), intent(in) | pmp, | ||
real, dimension(klon,klev), intent(in) | pupwd, | ||
real, dimension(klon,klev), intent(in) | pdnwd | ||
) |
Definition at line 1 of file phystokenc.F90.