Index: trunk/LMDZ.MARS/libf/phymars/wstats.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/wstats.F90	(revision 1550)
+++ trunk/LMDZ.MARS/libf/phymars/wstats.F90	(revision 1560)
@@ -173,5 +173,5 @@
    write (*,*) "STATS: creation de ",nom
    namebis=trim(nom)
-   call def_var(nid,namebis,titre,unite,nbdim,id,meanid,ierr)
+   call def_var_stats(nid,namebis,titre,unite,nbdim,id,meanid,ierr)
    if (dim.eq.3) then
      call inivar(nid,meanid,size(px3_glop,1),dim,indx,px3_glop,ierr)
@@ -180,5 +180,5 @@
    endif
    namebis=trim(nom)//"_sd"
-   call def_var(nid,namebis,trim(titre)//" total standard deviation over the season",unite,nbdim,id,sdid,ierr)
+   call def_var_stats(nid,namebis,trim(titre)//" total standard deviation over the season",unite,nbdim,id,sdid,ierr)
    if (dim.eq.3) then
      call inivar(nid,sdid,size(px3_glop,1),dim,indx,px3_glop,ierr)