19 |
|
|
20 |
INTEGER, intent(in):: nsrf ! indice pour le type de surface |
INTEGER, intent(in):: nsrf ! indice pour le type de surface |
21 |
|
|
22 |
REAL, intent(in), dimension(klon):: u, v, t, q |
REAL, intent(in):: u(:), v(:) ! (klon) vent au 1er niveau du mod\`ele |
23 |
! u-------input-R- vent zonal au 1er niveau du modele |
REAL, intent(in), dimension(klon):: t |
|
! v-------input-R- vent meridien au 1er niveau du modele |
|
24 |
! t-------input-R- temperature de l'air au 1er niveau du modele |
! t-------input-R- temperature de l'air au 1er niveau du modele |
25 |
|
REAL, intent(in), dimension(klon):: q |
26 |
! q-------input-R- humidite de l'air au 1er niveau du modele |
! q-------input-R- humidite de l'air au 1er niveau du modele |
27 |
|
|
28 |
REAL, intent(in):: zgeop(klon) ! géopotentiel au 1er niveau du modèle |
REAL, intent(in):: zgeop(klon) ! géopotentiel au 1er niveau du modèle |