--- trunk/Sources/phylmd/phyetat0.f 2016/02/05 16:02:34 175 +++ trunk/Sources/phylmd/phyetat0.f 2016/03/11 18:47:26 178 @@ -27,8 +27,8 @@ USE dimsoil, ONLY : nsoilmx USE indicesol, ONLY : epsfra, is_lic, is_oce, is_sic, is_ter, nbsrf use netcdf, only: nf90_global, nf90_inq_varid, NF90_NOERR, NF90_NOWRITE - use netcdf95, only: nf95_close, nf95_get_att, nf95_get_var, & - nf95_inq_varid, nf95_inquire_variable, NF95_OPEN + use netcdf95, only: nf95_get_att, nf95_get_var, nf95_inq_varid, & + nf95_inquire_variable, NF95_OPEN REAL, intent(out):: pctsrf(klon, nbsrf) REAL, intent(out):: tsol(klon, nbsrf)