Changeset 112

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

Location:

trunk/mesoscale

Files:

• LMD_LES_MARS/modif_mars/DEF/REAL_50m_145_145_201_12km_case_Cvrai.tar.gz (added)
• LMD_MM_MARS/SRC/POSTPROC/api.F90 (modified) (1 diff)
• NOTES.txt (modified) (3 diffs)
• PLOT/SPEC/MAP/defs/POLAR_newphys_RAC_MTOT.map_uvt_inc.pro (added)
• PLOT/SPEC/MAP/defs/POLAR_newphys_RAC_QH2Oatm1.map_uvt_inc.pro (added)
• PLOT/SPEC/MAP/defs/POLAR_newphys_RAC_QSURFICEneg.map_uvt_inc.pro (added)
• PLOT/SPEC/MAP/defs/POLAR_newphys_RAC_QSURFICEpos.map_uvt_inc.pro (added)
• PLOT/SPEC/MAP/defs/POLAR_newphys_RAC_TAUTES.map_uvt_inc.pro (added)
• PLOT/SPEC/MAP/defs/THARSIS_newphys_RAC_TAUTES.map_uvt_inc.pro (added)
• PLOT/SPEC/MAP/defs/THARSIS_newphys_noRAC_TAUTES.map_uvt_inc.pro (added)
• PLOT/SPEC/SERIES/mawd.pro (modified) (3 diffs)
• PLOT/SPEC/SERIES/mawd_inc.pro (modified) (1 diff)

trunk/mesoscale/LMD_MM_MARS/SRC/POSTPROC/api.F90

@@ -90 +90 @@
       CHARACTER (LEN=20)                                 :: process, dummy
       CHARACTER (LEN=2000)                               :: fields, process_these_fields
-      REAL, DIMENSION(299)                                :: interp_levels
+      REAL, DIMENSION(299)                               :: interp_levels
       REAL                                               :: rval
       REAL                                               :: MISSING=1.e36

trunk/mesoscale/NOTES.txt

@@ +1 @@
+
+        13min_si_Registry_modifie     
+        15min_makemeso_moins_f        
+        1min_phys_plus_dyn_chgtresol  
+
+        PD_SCALAR est T par defaut desormais !!
+
 
 il faudrait regler le prob du Registry dans le LES
@@ -12 +19 @@
 
 concat.e puis localtime.e puis
+localtime.e (tres long) puis concatnc.e pour avoir en ls
+le resultat doit etre strider a 10... sinon bug affichage
+
 ncwa -O -v mtot,icetot -a longitude -d longitude,-179.0,179.0 diagfi.nc yeye.nc
 ncwa -O -v mtot -a longitude -d longitude,-180.0,180.0 concat_LT.nc mawd.nc
@@ -26 +36 @@
         tester traceurs radiativement actifs avec la nouvelle physique ?????
 
-A FAIRE: PB LES sur iDATAPLEX (les points HFX nuls) (pas de soucis sur ciclad)
+        A FAIRE: PB LES sur iDATAPLEX (les points HFX nuls) (pas de soucis sur ciclad)
 METTRE SUR LE svn LA BASE d'ETATS INITIAUX ????
 

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

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

@@ -32 +32 @@
 
 ;;;;;*************************************** MAP LIMITS
-        windowx         =       [30.,150.]        
+        windowx         =       [30.,150.]
+        windowx         =       [30.,1500.]
         windowy         =       [-15.,90.]
+
+;;;;; MULTIYEAR
+        isotropic       =       'false'
+        windowx         =       [1500.,4000.]
+        intervalx       =       500.0
+        windowy         =       [-90.,90.]
+        intervaly       =       30.0
+        lev             =       [100.]