36 |
REAL pde_u(klon, klev) ! flux detraine dans le panache montant |
REAL pde_u(klon, klev) ! flux detraine dans le panache montant |
37 |
REAL pen_d(klon, klev) ! flux entraine dans le panache descendant |
REAL pen_d(klon, klev) ! flux entraine dans le panache descendant |
38 |
REAL pde_d(klon, klev) ! flux detraine dans le panache descendant |
REAL pde_d(klon, klev) ! flux detraine dans le panache descendant |
39 |
REAL pt(klon, klev) |
REAL, intent(in):: pt(klon, klev) |
40 |
|
|
41 |
REAL, INTENT (IN) :: rlon(klon), rlat(klon) |
REAL, INTENT (IN) :: rlon(klon), rlat(klon) |
42 |
REAL, INTENT (IN) :: dtime |
REAL, INTENT (IN) :: dtime |
48 |
! Couche limite: |
! Couche limite: |
49 |
|
|
50 |
REAL yv1(klon) |
REAL yv1(klon) |
51 |
REAL yu1(klon), pphis(klon), paire(klon) |
REAL yu1(klon), paire(klon) |
52 |
|
REAL, INTENT(IN):: pphis(klon) |
53 |
REAL pcoefh(klon, klev) ! coeff melange Couche limite |
REAL pcoefh(klon, klev) ! coeff melange Couche limite |
54 |
|
|
55 |
! Arguments necessaires pour les sources et puits de traceur |
! Arguments necessaires pour les sources et puits de traceur |