30 |
real ptimestep, l_mix, r_aspect |
real ptimestep, l_mix, r_aspect |
31 |
REAL, intent(in):: pt(ngrid, nlay) |
REAL, intent(in):: pt(ngrid, nlay) |
32 |
real pdtadj(ngrid, nlay) |
real pdtadj(ngrid, nlay) |
33 |
REAL pu(ngrid, nlay), pduadj(ngrid, nlay) |
REAL, intent(in):: pu(ngrid, nlay) |
34 |
REAL pv(ngrid, nlay), pdvadj(ngrid, nlay) |
real pduadj(ngrid, nlay) |
35 |
|
REAL, intent(in):: pv(ngrid, nlay) |
36 |
|
real pdvadj(ngrid, nlay) |
37 |
REAL po(ngrid, nlay), pdoadj(ngrid, nlay) |
REAL po(ngrid, nlay), pdoadj(ngrid, nlay) |
38 |
REAL, intent(in):: pplay(ngrid, nlay) |
REAL, intent(in):: pplay(ngrid, nlay) |
39 |
real, intent(in):: pplev(ngrid, nlay+1) |
real, intent(in):: pplev(ngrid, nlay+1) |