--- trunk/Sources/dyn3d/grilles_gcm_netcdf_sub.f 2015/04/29 15:47:56 134 +++ trunk/Sources/dyn3d/grilles_gcm_netcdf_sub.f 2015/05/26 17:46:03 139 @@ -10,8 +10,9 @@ ! longitudes and latitudes in degrees for grids u and v. USE comconst, ONLY: g - USE comgeom, ONLY: aire_2d, rlatu, rlatv, rlonu, rlonv + USE comgeom, ONLY: aire_2d USE dimens_m, ONLY: iim, jjm + use dynetat0_m, only: rlatu, rlatv, rlonu, rlonv USE netcdf, ONLY: nf90_clobber, nf90_float, nf90_int USE netcdf95, ONLY: nf95_close, nf95_create, nf95_def_dim, nf95_def_var, & nf95_enddef, nf95_put_att, nf95_put_var, nf95_redef