49 |
! ptimestep physical timestep (s) |
! ptimestep physical timestep (s) |
50 |
! indice sub-surface index |
! indice sub-surface index |
51 |
! snow(klon,nbsrf) snow |
! snow(klon,nbsrf) snow |
52 |
! ptsrf(klon) surface temperature at time-step t (K) |
! ptsrf(knon) surface temperature at time-step t (K) |
53 |
! ptsoil(klon,nsoilmx) temperature inside the ground (K) |
! ptsoil(klon,nsoilmx) temperature inside the ground (K) |
54 |
! pcapcal(klon) surfacic specific heat (W*m-2*s*K-1) |
! pcapcal(klon) surfacic specific heat (W*m-2*s*K-1) |
55 |
! pfluxgrd(klon) surface diffusive flux from ground (Wm-2) |
! pfluxgrd(klon) surface diffusive flux from ground (Wm-2) |
65 |
|
|
66 |
REAL ptimestep |
REAL ptimestep |
67 |
INTEGER indice, knon |
INTEGER indice, knon |
68 |
REAL ptsrf(klon), ptsoil(klon, nsoilmx), snow(klon) |
REAL ptsrf(knon), ptsoil(klon, nsoilmx), snow(klon) |
69 |
REAL pcapcal(klon), pfluxgrd(klon) |
REAL pcapcal(klon), pfluxgrd(klon) |
70 |
|
|
71 |
! ----------------------------------------------------------------------- |
! ----------------------------------------------------------------------- |