Changeset 128
- Timestamp:
- 05/29/09 11:55:47 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/procs/plt_map.pro
r124 r128 795 795 ; 796 796 print, ' '+cmd.var+' data to plot min and max : ', $ 797 min(fld(where (fld NE valmask)), /nan), max(fld(where (fld NE valmask)), /nan)797 min(fld(where (fld LE valmask/10)), /nan), max(fld(where (fld LE valmask/10)), /nan) 798 798 print, '' 799 799 … … 801 801 802 802 niveau = 1 803 804 ; compute mean and rms of field 805 zmean = moyenne(fld, 'xy', boite = box_plt, /NAN) 806 zrms = moyenne(fld, 'xy', boite = box_plt, /RMS, /NAN) 807 filleg = ' [region mean/rms='+string(strtrim(zmean, 2))+'/'+string(strtrim(zrms, 2))+']' 803 808 804 809 IF vecplot EQ 0 THEN BEGIN … … 808 813 fldzm = replicate(1, (size(fld))(1))#fldzm 809 814 fld = fld-fldzm 810 filleg= ' Eddy '815 edd_txt = ' Eddy ' 811 816 ENDIF ELSE BEGIN 812 filleg = ''817 edd_txt = '' 813 818 ENDELSE 819 814 820 815 821 IF hotyp EQ 'xyt' THEN date_txt = 'monthly' 816 822 817 pltcmd = 'plt,{a:fld, d:'''+date_txt+''', n:'''+ filleg+varlegend+' '+legbox+legsurf+''', u:'''+field.units+''', g:'''+vargrid+'''}'+mincmd+maxcmd+intcmd+com_strplt+strcont+map_cmd823 pltcmd = 'plt,{a:fld, d:'''+date_txt+''', n:'''+edd_txt+varlegend+' '+legbox+legsurf+''', u:'''+field.units+filleg+''', g:'''+vargrid+'''}'+mincmd+maxcmd+intcmd+com_strplt+strcont+map_cmd 818 824 ;; For 2D plots with overlays (correlation and proba for instance) 819 825 ;; Scratch the titles and define contours style for the second plot
Note: See TracChangeset
for help on using the changeset viewer.