62 |
|
|
63 |
REAL, intent(in):: phis(:, :) ! (iim + 1, jjm + 1) |
REAL, intent(in):: phis(:, :) ! (iim + 1, jjm + 1) |
64 |
REAL, intent(in):: phi(:, :, :) ! (iim + 1, jjm + 1, llm) |
REAL, intent(in):: phi(:, :, :) ! (iim + 1, jjm + 1, llm) |
65 |
REAL, intent(in):: w(:, :, :) ! (iim + 1, jjm + 1, llm) in kg / s |
|
66 |
|
REAL, intent(in):: w(:, :, :) ! (iim + 1, jjm + 1, llm) |
67 |
|
! vertical mass flux, in kg / s |
68 |
|
|
69 |
REAL, intent(out):: dufi(:, :, :) ! (iim + 1, jjm + 1, llm) |
REAL, intent(out):: dufi(:, :, :) ! (iim + 1, jjm + 1, llm) |
70 |
! tendency for the covariant zonal velocity (m2 s-2) |
! tendency for the covariant zonal velocity (m2 s-2) |