/[lmdze]/trunk/Sources/phylmd/phyetat0.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/phyetat0.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 177 by guez, Fri Feb 5 16:02:34 2016 UTC revision 178 by guez, Fri Mar 11 18:47:26 2016 UTC
# Line 27  contains Line 27  contains
27      USE dimsoil, ONLY : nsoilmx      USE dimsoil, ONLY : nsoilmx
28      USE indicesol, ONLY : epsfra, is_lic, is_oce, is_sic, is_ter, nbsrf      USE indicesol, ONLY : epsfra, is_lic, is_oce, is_sic, is_ter, nbsrf
29      use netcdf, only: nf90_global, nf90_inq_varid, NF90_NOERR, NF90_NOWRITE      use netcdf, only: nf90_global, nf90_inq_varid, NF90_NOERR, NF90_NOWRITE
30      use netcdf95, only: nf95_close, nf95_get_att, nf95_get_var, &      use netcdf95, only: nf95_get_att, nf95_get_var, nf95_inq_varid, &
31           nf95_inq_varid, nf95_inquire_variable, NF95_OPEN           nf95_inquire_variable, NF95_OPEN
32    
33      REAL, intent(out):: pctsrf(klon, nbsrf)      REAL, intent(out):: pctsrf(klon, nbsrf)
34      REAL, intent(out):: tsol(klon, nbsrf)      REAL, intent(out):: tsol(klon, nbsrf)
Legend:
Removed from v.177  
changed lines
  Added in v.178
  ViewVC Help
Powered by ViewVC 1.1.21