Changeset 112 for trunk/mesoscale/PLOT/SPEC/SERIES/mawd.pro

Timestamp:

Apr 18, 2011, 8:14:47 AM (14 years ago)

Author:

aslmd

Message:

LMD_MM_MARS et LMD_LES_MARS: fichiers pour graphiques et MAJ notes

File:

• trunk/mesoscale/PLOT/SPEC/SERIES/mawd.pro (modified) (3 diffs)

trunk/mesoscale/PLOT/SPEC/SERIES/mawd.pro

@@ -2 +2 @@
 
 ;;;;;;;
-f_user='/donnees/aslmd/SVN/trunk/mesoscale/TMPDIR/GCMINI/mawd.nc'
+;f_user='/donnees/aslmd/SVN/trunk/mesoscale/TMPDIR/GCMINI/mawd.nc'
 ;f_user='/tmp7/aslmd/mawd.nc'
+f_user='/d5/aslmd/mawd.nc'
 v_user = 'mtot'
 x_user = 'Time'
@@ -37 +38 @@
 ncdf_varget, cdfid, varid, champ
 
-varid=ncdf_varid(cdfid,x_user)
-ncdf_varget, cdfid, varid, xx
-
 varid=ncdf_varid(cdfid,y_user)
 ncdf_varget, cdfid, varid, yy
@@ -46 +44 @@
   ;;; en precip-microns
   champ = champ * 1.e6 / 917.
-  ;;; entre 0 et 360
-  xx = xx MOD 360
+  ;;; prendre Time depuis un autre fichier
+  cdfid = ncdf_open('/d5/aslmd/gcm_LT14_a035.nc')
+  varid=ncdf_varid(cdfid,x_user)
+  ncdf_varget, cdfid, varid, xx
+  ;;;; entre 0 et 360
+  ;xx = xx MOD 360
 endif else begin
+  varid=ncdf_varid(cdfid,x_user)
+  ncdf_varget, cdfid, varid, xx
   xx = xx - 360.*2.
 endelse