--- trunk/libf/phylmd/phyetat0.f90 2008/07/25 19:59:34 13 +++ trunk/libf/phylmd/phyetat0.f90 2009/07/31 15:18:47 22 @@ -1,13 +1,12 @@ module phyetat0_m - use dimphy, only: klon, klev, zmasq + use dimphy, only: klon IMPLICIT none - REAL, save:: rlat(klon), rlon(klon) - ! latitude et longitude pour chaque point, in degrees + REAL, save:: rlat(klon), rlon(klon) ! latitude and longitude, in degrees - private klon, klev, zmasq + private klon contains @@ -28,6 +27,7 @@ USE temps, ONLY : itau_phy use netcdf, only: nf90_get_att, nf90_global use netcdf95, only: handle_err + use dimphy, only: zmasq, klev include "netcdf.inc"