Index: /LMDZ6/trunk/libf/phylmdiso/limit_read_mod.F90
===================================================================
--- /LMDZ6/trunk/libf/phylmdiso/limit_read_mod.F90	(revision 5075)
+++ /LMDZ6/trunk/libf/phylmdiso/limit_read_mod.F90	(revision 5076)
@@ -275,5 +275,5 @@
     USE surface_data, ONLY : type_ocean, ok_veget
     USE lmdz_netcdf, ONLY:nf90_noerr,nf90_close,nf90_get_var,nf90_inq_varid,nf90_nowrite,&
-            nf90_inq_dimid,nf90_inquire_dimension,nf90_open
+            nf90_inq_dimid,nf90_inquire_dimension,nf90_open,nf90_get_att,nf90_inquire
     USE indice_sol_mod
 #ifdef ISO
Index: /LMDZ6/trunk/libf/phylmdiso/phyaqua_mod.F90
===================================================================
--- /LMDZ6/trunk/libf/phylmdiso/phyaqua_mod.F90	(revision 5075)
+++ /LMDZ6/trunk/libf/phylmdiso/phyaqua_mod.F90	(revision 5076)
@@ -539,6 +539,4 @@
     IMPLICIT NONE
 
-    include "netcdf.inc"
-
     INTEGER, INTENT (IN) :: klon
     REAL, INTENT (IN) :: phy_nat(klon, 360)
@@ -593,6 +591,8 @@
     USE mod_phys_lmdz_transfert_para, ONLY: gather
     USE phys_cal_mod, ONLY: year_len
+    USE lmdz_netcdf, ONLY:nf_clobber,nf_close,nf_noerr,nf_strerror,nf_put_att_text,nf_def_var,&
+            nf_def_dim,nf_create,nf90_put_var,nf_unlimited,nf_global,nf_64bit_offset,nf90_format,&
+            nf_enddef
     IMPLICIT NONE
-    include "netcdf.inc"
 
     INTEGER, INTENT (IN) :: klon
@@ -675,5 +675,5 @@
       ! write the 'times'
       DO k = 1, year_len
-        ierr = nf90_put_var(nid, id_tim, k, k)
+        ierr = nf90_put_var(nid, id_tim, k, [k])
         IF (ierr/=nf_noerr) THEN
           WRITE (*, *) 'writelim error with temps(k),k=', k