46 |
! d_trs----output-R- le changement de "trs" |
! d_trs----output-R- le changement de "trs" |
47 |
!====================================================================== |
!====================================================================== |
48 |
!====================================================================== |
!====================================================================== |
49 |
REAL dtime |
REAL, intent(in):: dtime |
50 |
REAL u1lay(klon), v1lay(klon) |
REAL u1lay(klon), v1lay(klon) |
51 |
REAL coef(klon,klev) |
REAL coef(klon,klev) |
52 |
REAL, intent(in):: t(klon,klev) ! temperature (K) |
REAL, intent(in):: t(klon,klev) ! temperature (K) |