source: trunk/UTIL/PYTHON/planetoplot.py @ 704

Last change on this file since 704 was 701, checked in by acolaitis, 13 years ago

PYTHON. Added possibility to call for variable <<-v enfact>> - enrichment factor - given that you have co2, ap, bp and ps fields in your file. This will give you the enrichment factor of non condensible gases, ranging from 0 (no enrichment) to X (enrichment by a factor X compared to the mean non condensible gases mass mixing ratio (which is also computed for the relevant time step)).

  • Property svn:executable set to *
File size: 48.1 KB
RevLine 
[349]1#######################
2##### PLANETOPLOT #####
3#######################
[345]4
[349]5### A. Spiga     -- LMD -- 06~09/2011 -- General building and mapping capabilities
6### T. Navarro   -- LMD -- 10~11/2011 -- Improved use for GCM and added sections + 1Dplot capabilities
[392]7### A. Colaitis  -- LMD --    11/2011 -- Mostly minor improvements and inter-plot operation capabilities + zrecast interpolation for gcm
[448]8### A. Spiga     -- LMD -- 11~12/2011 -- Extended multivar subplot capabilities + cosmetic changes + general cleaning and tests
[435]9### A. Colaitis  -- LMD --    12/2011 -- Added movie capability [mencoder must be installed]
[475]10### A. Spiga     -- LMD --    12/2011 -- Added HTML animated page capability + general tests of consistency [winds, etc...] + consistent generic movie loop
[525]11### J. Leconte   -- LMD --    02/2012 -- Added area weighted averaging. Compatibility with terrestrial gcm.
[579]12### A. Spiga     -- LMD --    03/2012 -- Cleaning and improved comments
[345]13def planetoplot (namefiles,\
[351]14           level=0,\
[350]15           vertmode=0,\
[345]16           proj=None,\
17           back=None,\
18           target=None,
19           stride=3,\
20           var=None,\
21           colorb="def",\
[399]22           winds=False,\
[345]23           addchar=None,\
24           interv=[0,1],\
25           vmin=None,\
26           vmax=None,\
27           tile=False,\
28           zoom=None,\
29           display=True,\
30           hole=False,\
31           save="gui",\
32           anomaly=False,\
33           var2=None,\
34           ndiv=10,\
35           mult=1.,\
[578]36           zetitle=["fill"],\
[345]37           slon=None,\
38           slat=None,\
39           svert=None,\
[359]40           stime=None,\
41           outputname=None,\
42           resolution=200,\
43           ope=None,\
44           fileref=None,\
45           minop=0.,\
46           maxop=0.,\
[363]47           titleref="fill",\
[369]48           invert_y=False,\
49           xaxis=[None,None],\
[372]50           yaxis=[None,None],\
[382]51           ylog=False,\
[385]52           yintegral=False,\
[388]53           blat=None,\
[451]54           blon=None,\
[418]55           tsat=False,\
[430]56           flagnolow=False,\
[444]57           mrate=None,\
[453]58           mquality=False,\
[457]59           trans=1,\
[468]60           zarea=None,\
[483]61           axtime=None,\
[502]62           redope=None,\
[507]63           seevar=False,\
[502]64           xlab=None,\
[569]65           ylab=None,\
[612]66           lbls=None,\
67           lstyle=None,\
[647]68           cross=None,\
69           streamflag=False):
[345]70
71    ####################################################################################################################
72    ### Colorbars http://www.scipy.org/Cookbook/Matplotlib/Show_colormaps?action=AttachFile&do=get&target=colormaps3.png
73
74    #################################
75    ### Load librairies and functions
76    from netCDF4 import Dataset
77    from myplot import getcoord2d,define_proj,makeplotres,simplinterv,vectorfield,ptitle,latinterv,getproj,wrfinterv,dumpbdy,\
78                       fmtvar,definecolorvec,defcolorb,getprefix,putpoints,calculate_bounds,errormess,definesubplot,\
79                       zoomset,getcoorddef,getwinddef,whatkindfile,reducefield,bounds,getstralt,getfield,smooth,nolow,\
[612]80                       getname,localtime,check_localtime,polarinterv,getsindex,define_axis,determineplot,readslices,bidimfind,getlschar,hole_bounds,\
[701]81                       windamplitude,slopeamplitude,deltat0t1,enrichment_factor
[430]82    from mymath import deg,max,min,mean,get_tsat,writeascii,fig2data,fig2img
[363]83    import matplotlib as mpl
[640]84    from matplotlib.pyplot import contour,contourf,hist, text,subplot, figure, rcParams, savefig, colorbar, pcolor, show, plot, clabel, title, close, legend, xlabel, axis, ylabel, subplots_adjust, axes, clabel
[345]85    from matplotlib.cm import get_cmap
[490]86    #from mpl_toolkits.basemap import cm
[345]87    import numpy as np
88    from numpy.core.defchararray import find
[430]89    from videosink import VideoSink
[673]90    from times import sol2ls
[444]91    import subprocess
[490]92    #from singlet import singlet
[587]93    from itertools import cycle
[647]94    import os
[359]95
[579]96#########################
97### PRELIMINARY STUFF ###
98#########################
99### we say hello
[392]100    print "********************************************"
101    print "********** WELCOME TO PLANETOPLOT **********"
102    print "********************************************"
[579]103### we ensure namefiles and var are arrays
[392]104    if not isinstance(namefiles, np.ndarray): namefiles = [namefiles]
105    if not isinstance(var, np.ndarray):       var = [var]
[579]106### we initialize a few variables
107    initime=-1 ; sslon = None ; sslat = None
[582]108    if slon is not None: sslon = np.zeros([1,2])
109    if slat is not None: sslat = np.zeros([1,2])
[579]110    k = 0 ; firstfile = True ; count = 0
111### we avoid specific cases not yet implemented
112    if mrate is not None and len(var) > 1: errormess("multivar not allowed in movies. should be fixed soon!")
113### we prepare number of plot fields [zelen] and plot instances [numplot] according to user choices
114### --> we support multifile and multivar plots : files + vars separated by commas are on the same figure
[349]115    nlon, nlat, nvert, ntime, mapmode, nslices = determineplot(slon, slat, svert, stime)
[392]116    zelen = len(namefiles)*len(var)
[424]117    numplot = zelen*nslices
[392]118    print "********** FILES, SLICES, VARS, TOTAL PLOTS: ", len(namefiles), nslices, len(var), numplot
[579]119    print "********** MAPMODE: ", mapmode
120### we correct number of plot fields for possible operation (substract, etc...)
[423]121    if ope is not None:
122        if fileref is not None:       zelen = zelen + 2
123        elif "var" in ope:            zelen = zelen + 1
[579]124### we define the arrays for plot fields -- which will be placed within multiplot loops
125    all_var  = [[]]*zelen ; all_var2  = [[]]*zelen
126    all_title = [[]]*zelen ; all_varname = [[]]*zelen ; all_namefile = [[]]*zelen ; all_time = [[]]*zelen
127    all_windu = [[]]*zelen ; all_windv = [[]]*zelen
[392]128 
[579]129#############################
130### LOOP OVER PLOT FIELDS ###
131#############################
[392]132    for nnn in range(len(namefiles)):
133     for vvv in range(len(var)): 
134
[579]135    ### we load each NETCDF objects in namefiles
[468]136      namefile = namefiles[nnn] 
[345]137      nc  = Dataset(namefile)
[579]138    ### we explore the variables in the file
[507]139      varinfile = nc.variables.keys()
140      if seevar: print varinfile ; exit()
[579]141    ### we define the type of file we have (gcm, meso, etc...)
[507]142      typefile = whatkindfile(nc)
[579]143      if firstfile:                 typefile0 = typefile
144      elif typefile != typefile0:   errormess("Not the same kind of files !", [typefile0, typefile])
145    ### we care for input file being 1D simulations
[637]146      if "longitude" in nc.dimensions and "latitude" in nc.dimensions: is1d = len(nc.variables["longitude"][:])*len(nc.variables["latitude"][:])
147      elif "lon" in nc.dimensions and "lat" in nc.dimensions: is1d = len(nc.variables["lon"][:])*len(nc.variables["lat"][:])
148      if typefile in ['gcm','earthgcm'] and is1d == 1:       mapmode=0 ; winds=False
[579]149    ### we create default vert and time prescriptions if not here in case mapping mode is on (lat/lon maps)
[548]150      if redope is None and mapmode == 1:
[477]151          if svert is None:  svert = readslices(str(level)) ; nvert=1
152          if stime is None and mrate is None:
153             stime = readslices(str(0)) ; ntime=1 ## this is a default choice
154             print "WELL... nothing about time axis. I took default: first time reference stored in file."
[579]155    ### we get the names of variables to be read. in case only one available, we choose this one.
[507]156      varname=var[vvv] 
[701]157      if ((varname not in nc.variables) and not ((typefile in ['meso']) and (varname in ['UV','uv','uvmet','slopexy','SLOPEXY','deltat','DELTAT'])) and not ((typefile in ['gcm']) and (varname in ['enfact']))): 
[507]158          if len(varinfile) == 1:   varname = varinfile[0] 
159          else:                     varname = False
[579]160    ### we get the names of wind variables to be read (if any)
[349]161      if winds:                                                   
[345]162         [uchar,vchar,metwind] = getwinddef(nc)             
163         if uchar == 'not found': winds = False
[579]164    ### we tell the user that either no var or no wind is not acceptable
[392]165      if not varname and not winds: errormess("please set at least winds or var",printvar=nc.variables)
[579]166    ### we get the coordinates lat/lon to be used
[399]167      [lon2d,lat2d] = getcoorddef(nc)
[579]168    ### we get an adapted map projection if none is provided by the user
[548]169      if proj == None:   proj = getproj(nc)                 
[579]170    ### we define plot boundaries given projection or user choices
[489]171      if firstfile:
172         if proj in ["npstere","spstere"]: [wlon,wlat] = polarinterv(lon2d,lat2d)
173         elif proj in ["lcc","laea"]:      [wlon,wlat] = wrfinterv(lon2d,lat2d)
174         else:                             [wlon,wlat] = simplinterv(lon2d,lat2d)
175         if zoom:                          [wlon,wlat] = zoomset(wlon,wlat,zoom)
[558]176         elif zarea is not None:           [wlon,wlat] = latinterv(area=zarea)
[489]177
[490]178##########################################################
179############ LOAD 4D DIMENSIONS : x, y, z, t #############
180##########################################################
[558]181      if typefile in ["gcm","earthgcm","ecmwf"]:
[610]182          if slon is not None: sslon = slon 
183          if slat is not None: sslat = slat 
[558]184          ### LAT
185          if "latitude" in nc.variables:  lat = nc.variables["latitude"][:]
186          elif "lat" in nc.variables:     lat = nc.variables["lat"][:]
187          ### LON
188          if "longitude" in nc.variables: lon = nc.variables["longitude"][:]
189          elif "lon" in nc.variables:     lon = nc.variables["lon"][:]
190          ### ALT
191          if "altitude" in nc.variables:  vert = nc.variables["altitude"][:]
192          elif "Alt" in nc.variables:     vert = nc.variables["Alt"][:]
193          elif "lev" in nc.variables:     vert = nc.variables["lev"][:]
194          else:                           vert = [0.]
195          ### AIRE (to weight means with the area)
196          if "aire" in nc.variables:      area = nc.variables["aire"][:,:] 
[525]197          else:                           area = None
198          ### TIME
199          if "Time" in nc.variables:            time = nc.variables["Time"][:]
200          elif "time" in nc.variables:          time = nc.variables["time"][:]
201          elif "time_counter" in nc.variables:  time = nc.variables["time_counter"][:]/86400. #### time counter cinverstion from s-> days
[640]202          else:                                 time = [0.] #errormess("no time axis found.")
203          if axtime in ["ls"]:
204              print "converting to Ls ..."
205              for iii in range(len(time)):
[673]206                time[iii] = sol2ls(time[iii])
[640]207                if iii > 0:
208                  while abs(time[iii]-time[iii-1]) > 300:
209                    time[iii] = time[iii]+360
[494]210          # for 1D plots (no need for longitude computation):
211          if axtime in ["lt"]:
212              if initime == -1: initime=input("Please type initial local time:")
213              time = (initime+time*24)%24
214              print "LOCAL TIMES.... ", time
[548]215      elif typefile in ['meso','geo']:
[525]216          area = None ## not active for the moment
[490]217          ###### STUFF TO GET THE CORRECT LAT/LON FROM MESOSCALE FILES WITH 2D LAT/LON ARRAYS
218          ###### principle: calculate correct indices then repopulate slon and slat
219          if slon is not None or slat is not None:
[612]220              if firstfile and save == 'png' and typefile == 'meso' and "HGT" in varinfile and display:   iwantawhereplot = nc     #show a topo map with a cross on the chosen point
[562]221              else:                                                                           iwantawhereplot = None   #do not show anything, just select indices
[490]222              numlon = 1 ; numlat = 1 
[610]223              if slon is not None:   numlon = slon.shape[1]   
224              if slat is not None:   numlat = slat.shape[1]
[490]225              indices = np.ones([numlon,numlat,2]) ; vlon = None ; vlat = None
226              for iii in range(numlon): 
227               for jjj in range(numlat):
[610]228                 if slon is not None:  vlon = slon[0][iii]  ### note: slon[:][0] does not work
229                 if slat is not None:  vlat = slat[0][jjj]  ### note: slon[:][0] does not work
[490]230                 indices[iii,jjj,:] = bidimfind(lon2d,lat2d,vlon,vlat,file=iwantawhereplot) 
231                 lonp,latp = ( lon2d[indices[iii,jjj,0],indices[iii,jjj,1]] , lat2d[indices[iii,jjj,0],indices[iii,jjj,1]] )
[587]232              ### possible bug here if several --lat
[490]233              for iii in range(numlon):
234               for jjj in range(numlat):
[610]235                 if slon is not None: sslon[0][iii] = indices[iii,0,1] #...this is idx
236                 if slat is not None: sslat[0][jjj] = indices[0,jjj,0] #...this is idy
[490]237              lonp,latp = ( lon2d[indices[0,0,0],indices[0,0,1]] , lat2d[indices[0,0,0],indices[0,0,1]] )
238          ######
[548]239          if typefile in ['meso'] and mapmode == 1: lon2d = dumpbdy(lon2d,6) ; lat2d = dumpbdy(lat2d,6)  ### important to do that now and not before
[490]240          ######
[393]241          if varname in ['PHTOT','W']:    vertdim='BOTTOM-TOP_PATCH_END_STAG'
242          else:                           vertdim='BOTTOM-TOP_PATCH_END_UNSTAG'
[490]243          if (var2 is not None and var2 not in ['PHTOT','W']): dumped_vert_stag=True ; vertdim='BOTTOM-TOP_PATCH_END_UNSTAG'
244          else:                                                dumped_vert_stag=False
[393]245          if varname in ['V']:  latdim='SOUTH-NORTH_PATCH_END_STAG'
246          else:                 latdim='SOUTH-NORTH_PATCH_END_UNSTAG'
247          if varname in ['U']:  londim='WEST-EAST_PATCH_END_STAG'
248          else:                 londim='WEST-EAST_PATCH_END_UNSTAG'
[402]249          lon = np.arange(0,getattr(nc,londim),1) ; lat = np.arange(0,getattr(nc,latdim),1)
[468]250          ###
251          if axtime in ["ls","sol"]:
252              lstab, soltab, lttab = getlschar ( namefile, getaxis = True )
253              if axtime == "ls":      time = lstab
254              elif axtime == "sol":   time = soltab
255          else:
[665]256              if ope in ["cat"] and nnn > 0:    count = time[-1] + 1  ## so that a cat is possible with simple subscripts
257              else:                             count = 0
[613]258              if "Times" in nc.dimensions:   time = count + np.arange(0,len(nc.dimensions["Times"]),1)
259              elif "Time" in nc.dimensions:  time = count + np.arange(0,len(nc.dimensions["Time"]),1)
260              else:                          time = count + np.arange(0,1,1)
[489]261          if axtime in ["lt"]:
[569]262              ftime = np.zeros(len(time))
263              for i in range(len(time)): 
264                 ftime[i] = localtime ( interv[0]+time[i]*interv[1], 0.5*(wlon[0]+wlon[1]) )
265              time=ftime
266              time=check_localtime(time)
[489]267              print "LOCAL TIMES.... ", time
[569]268
[468]269          ###
[426]270          if typefile in ['geo']:   vert = [0.] ; stime = readslices(str(0))
271          else:
272              if vertmode is None:  vertmode=0
[687]273              if vertmode == 0:     
274                  if "vert" in nc.variables: vert = nc.variables["vert"][:]/1000. ; vertmode = 1
275                  else:                      vert = np.arange(0,getattr(nc,vertdim),1)
[562]276              elif vertmode == -1:  vert = nc.variables["PHTOT"][0,:,0,0]/3.72 ; vert = np.array(vert[0:len(vert)-1]) #; print vert
[610]277              elif vertmode == 1 or vertmode == 2:  vert = nc.variables["vert"][:]        ## pressure in Pa
278              else:                                 vert = nc.variables["vert"][:]/1000.  ## altitude in km
[350]279       #if firstfile:
280       #   lat0 = lat
281       #elif len(lat0) != len(lat):
282       #   errormess("Not the same latitude lengths !", [len(lat0), len(lat)])
283       #elif sum((lat == lat0) == False) != 0:
284       #   errormess("Not the same latitudes !", [lat,lat0])
285       ## Faire d'autre checks sur les compatibilites entre fichiers!!
[349]286##########################################################
[490]287##########################################################
288##########################################################
[345]289
[402]290      all_varname[k] = varname
291      all_namefile[k] = namefile
[406]292      all_time[k] = time
[612]293      if var2: 
[637]294         all_var2[k] = getfield(nc,var2)
[612]295         if ((var2 in ['slopexy','SLOPEXY']) and (typefile in ['meso']) and (var2 not in nc.variables)): all_var2[k] = slopeamplitude(nc)
[451]296      if winds: all_windu[k] = getfield(nc,uchar) ; all_windv[k] = getfield(nc,vchar)
[571]297      #####################
298      ##### GETFIELDS #####
299      #####################
300      ##### SPECIFIC CASES
[701]301      ##### note : we could probably call those via a "toolbox" in myplot.
[571]302      ##### 1. saturation temperature
[398]303      if varname in ["temp","t","T_nadir_nit","T_nadir_day","temp_day","temp_night"] and tsat:
[392]304          tt=getfield(nc,varname) ; print "computing Tsat-T, I ASSUME Z-AXIS IS PRESSURE"
305          if type(tt).__name__=='MaskedArray':  tt.set_fill_value([np.NaN]) ; tinput=tt.filled()
306          else:                                 tinput=tt
[391]307          all_var[k]=get_tsat(vert,tinput,zlon=lon,zlat=lat,zalt=vert,ztime=time)
[571]308      ##### 2. wind amplitude
309      elif ((varname in ['UV','uv','uvmet']) and (typefile in ['meso']) and (varname not in nc.variables)):
310          all_var[k]=windamplitude(nc)
[612]311      elif ((varname in ['slopexy','SLOPEXY']) and (typefile in ['meso']) and (varname not in nc.variables)):
312          all_var[k]=slopeamplitude(nc)
[701]313      #### 3. Near surface instability
[612]314      elif ((varname in ['DELTAT','deltat']) and (typefile in ['meso']) and (varname not in nc.variables)):
315          all_var[k]=deltat0t1(nc)
[701]316      #### 4. Enrichment factor
317      elif ((typefile in ['gcm']) and (varname in ['enfact'])):
318          all_var[k]=enrichment_factor(nc)
[388]319      else:
[392]320      ##### GENERAL STUFF HERE
[571]321          all_var[k] = getfield(nc,varname)
[468]322      print "**** GOT SUBDATA:",k," NAMEFILE:",namefile," VAR:",varname, var2 ; k += 1 ; firstfile = False
[345]323      #### End of for namefile in namefiles
324
[359]325    ##################################
[380]326    ### Operation on files
327    if ope is not None:
[468]328        print "********** OPERATION: ",ope
[422]329        if "var" not in ope:
330             if len(var) > 1: errormess("for this operation... please set only one var !")
[457]331             if ope in ["-","+","-%"]:
[569]332                if fileref is not None:   
[571]333                   ncref = Dataset(fileref)
334                   if ((all_varname[k-1] in ['UV','uv','uvmet']) and (typefile in ['meso']) and (all_varname[k-1] not in ncref.variables)):
335                      all_var[k] = windamplitude(ncref)
[612]336                   elif ((all_varname[k-1] in ['slopexy','SLOPEXY']) and (typefile in ['meso']) and (all_varname[k-1] not in ncref.variables)):
337                      all_var[k] = slopeamplitude(ncref)
338                   elif ((all_varname[k-1] in ['DELTAT','deltat']) and (typefile in ['meso']) and (all_varname[k-1] not in ncref.variables)):
339                      all_var[k]=deltat0t1(ncref)
[569]340                   else:
[571]341                      all_var[k] = getfield(ncref,all_varname[k-1])
[569]342                   all_varname[k] = all_varname[k-1] ; all_time[k] = all_time[k-1] ; all_namefile[k] = all_namefile[k-1] ; all_var2[k] = all_var2[k-1]
[612]343                   if winds: all_windu[k] = getfield(ncref,uchar) ; all_windv[k] = getfield(ncref,vchar)
[569]344                else: errormess("fileref is missing!") 
[380]345                if ope == "-":     all_var[k+1]= all_var[k-1] - all_var[k]
346                elif ope == "+":   all_var[k+1]= all_var[k-1] + all_var[k]
[502]347                elif ope == "-%":
348                    masked = np.ma.masked_where(all_var[k] == 0,all_var[k])
349                    masked.set_fill_value([np.NaN])
350                    all_var[k+1]= 100.*(all_var[k-1] - masked)/masked
[569]351                all_varname[k+1] = all_varname[k] ; all_time[k+1] = all_time[k] ; all_namefile[k+1] = all_namefile[k] ; all_var2[k+1] = all_var2[k] ; numplot = numplot+2
[612]352                if winds: all_windu[k+1] = all_windu[k-1]-all_windu[k] ; all_windv[k+1] = all_windv[k-1] - all_windv[k]
[380]353             elif ope in ["cat"]:
[468]354                tabtime = all_time[0];tab = all_var[0];k = 1
[462]355                if var2: tab2 = all_var2[0]
[475]356                while k != len(namefiles) and len(all_time[k]) != 0:
[462]357                    if var2: tab2 = np.append(tab2,all_var2[k],axis=0) 
[468]358                    tabtime = np.append(tabtime,all_time[k]) ; tab = np.append(tab,all_var[k],axis=0) ; k += 1
359                all_time[0] = np.array(tabtime) ; all_var[0] = np.array(tab) ; numplot = 1
[462]360                if var2: all_var2[0] = np.array(tab2)
[422]361             else: errormess(ope+" : non-implemented operation. Check pp.py --help")
362        else:
363             if len(namefiles) > 1: errormess("for this operation... please set only one file !") 
364             if len(var) > 2:       errormess("not sure this works for more than 2 vars... please check.")
365             if   ope in ["div_var"]: all_var[k] = all_var[k-2] / all_var[k-1] ; insert = '_div_'
366             elif ope in ["mul_var"]: all_var[k] = all_var[k-2] * all_var[k-1] ; insert = '_mul_'
367             elif ope in ["add_var"]: all_var[k] = all_var[k-2] + all_var[k-1] ; insert = '_add_'
368             elif ope in ["sub_var"]: all_var[k] = all_var[k-2] - all_var[k-1] ; insert = '_sub_'
369             else:                    errormess(ope+" : non-implemented operation. Check pp.py --help")
370             numplot = numplot + 1 ; all_time[k] = all_time[k-1] ; all_namefile[k] = all_namefile[k-1]
371             all_varname[k] = all_varname[k-2] + insert + all_varname[k-1] 
[345]372    ##################################
373    ### Open a figure and set subplots
374    fig = figure()
375    subv,subh = definesubplot( numplot, fig ) 
[457]376    if ope in ['-','-%']: subv,subh = 2,2
[345]377 
378    #################################
379    ### Time loop for plotting device
[448]380    nplot = 1 ; error = False 
[612]381    if lstyle is not None: linecycler = cycle(lstyle)
382    else: linecycler = cycle(["-","--","-.",":"])
[392]383    print "********************************************"
[345]384    while error is False:
[458]385     
386       print "********** NPLOT", nplot
[424]387       if nplot > numplot: break
[345]388
[424]389       ####################################################################
[392]390       ## get all indexes to be taken into account for this subplot and then reduce field
391       ## We plot 1) all lon slices 2) all lat slices 3) all vert slices 4) all time slices and then go to the next slice
[569]392       indexlon  = getsindex(sslon,(nplot-1)%nlon,lon)
393       indexlat  = getsindex(sslat,((nplot-1)//nlon)%nlat,lat)
[392]394       indexvert = getsindex(svert,((nplot-1)//(nlon*nlat))%nvert,vert) 
[423]395       if ope is not None:
396           if fileref is not None:      index_f = ((nplot-1)//(nlon*nlat*nvert*ntime))%(len(namefiles)+2)  ## OK only 1 var,  see test in the beginning
397           elif "var" in ope:           index_f = ((nplot-1)//(nlon*nlat*nvert*ntime))%(len(var)+1)        ## OK only 1 file, see test in the beginning
[451]398           elif "cat" in ope:           index_f = 0
[423]399       else:                            yeah = len(namefiles)*len(var) ; index_f = ((nplot-1)//(nlon*nlat*nvert*ntime))%yeah
[407]400       time = all_time[index_f]
[435]401       if mrate is not None:                 indextime = None 
402       else:                                 indextime = getsindex(stime,((nplot-1)//(nlon*nlat*nvert))%ntime,time)
[426]403       ltst = None 
[548]404       if typefile in ['meso'] and indextime is not None:  ltst = localtime ( interv[0]+indextime*interv[1], 0.5*(wlon[0]+wlon[1]) ) 
[468]405       print "********** INDEX LON:",indexlon," LAT:",indexlat," VERT:",indexvert," TIME:",indextime
[490]406       ##var = nc.variables["phisinit"][:,:]
407       ##contourf(np.transpose(var),30,cmap = get_cmap(name="Greys_r") ) ; axis('off') ; plot(indexlat,indexlon,'mx',mew=4.0,ms=20.0)
408       ##show()
409       ##exit()
410       #truc = True
411       #truc = False
412       #if truc: indexvert = None
[424]413       ####################################################################
[475]414       ########## REDUCE FIELDS
415       ####################################################################
[448]416       error = False
[392]417       varname = all_varname[index_f]
[448]418       if varname:   ### what is shaded.
[436]419           what_I_plot, error = reducefield( all_var[index_f], d4=indextime, d1=indexlon, d2=indexlat, d3=indexvert, \
[525]420                                             yint=yintegral, alt=vert, anomaly=anomaly, redope=redope, mesharea=area )
[516]421           if mult != 2718.:  what_I_plot = what_I_plot*mult
422           else:              what_I_plot = np.log10(what_I_plot) ; print "log plot"
[647]423                     
[451]424       if var2:      ### what is contoured.
[448]425           what_I_plot_contour, error = reducefield( all_var2[index_f], d4=indextime, d1=indexlon, d2=indexlat , d3=indexvert, \
426                                             yint=yintegral, alt=vert )
[451]427       if winds:     ### what is plot as vectors.
428           vecx, error = reducefield( all_windu[index_f], d4=indextime, d3=indexvert, yint=yintegral, alt=vert)
429           vecy, error = reducefield( all_windv[index_f], d4=indextime, d3=indexvert, yint=yintegral, alt=vert)
[490]430           if varname in [uchar,vchar]: what_I_plot = np.sqrt( np.square(vecx) + np.square(vecy) ) ; varname = "wind"
431
432       #####################################################################
433       #if truc:
434       #   nx = what_I_plot.shape[2] ; ny = what_I_plot.shape[1] ; nz = what_I_plot.shape[0]
435       #   for k in range(nz): print k,' over ',nz ; what_I_plot[k,:,:] = what_I_plot[k,:,:] / smooth(what_I_plot[k,:,:],12)
436       #   for iii in range(nx):
437       #    for jjj in range(ny):
438       #     deviation = what_I_plot[:,jjj,iii] ; mx = max(deviation) ; mn = min(deviation)
439       #     if iii > 6 and iii < nx-6 and jjj > 6 and jjj < ny-6:   what_I_plot[0,jjj,iii],rel = singlet(deviation,vert/1000.)  ### z must be in km
440       #     else:                                                   what_I_plot[0,jjj,iii]     = 0.
441       #     if np.abs(what_I_plot[0,jjj,iii]) > 1.5:
442       #         print iii,jjj,what_I_plot[0,jjj,iii],int(abs(1.-mx)*100.),int(abs(1.-mn)*100.)
443       #         plot(rel)
444       #   show()
445       #   anomaly = True ### pour avoir les bons reglages plots
446       #   what_I_plot = what_I_plot[0,:,:] 
447       #####################################################################
448
[448]449       ####################################################################
[458]450       ### General plot settings
451       changesubplot = (numplot > 1) and (len(what_I_plot.shape) != 1)  ## default for 1D plots: superimposed. to be reworked for better flexibility.
[518]452       if changesubplot: subplot(subv,subh,nplot) #; subplots_adjust(wspace=0,hspace=0)
[458]453       ####################################################################
[475]454       if error:
455               errormess("There is an error in reducing field !")
456       else:
[448]457               ticks = ndiv + 1 
[405]458               fvar = varname
459               if anomaly: fvar = 'anomaly'
[475]460               ###
461               if mapmode == 0:    ### could this be moved inside imov loop ?
[430]462                   itime=indextime
[587]463                   if len(what_I_plot.shape) == 3: itime=[0]
[475]464                   m = None ; x = None ; y = None
[608]465                   latyeah = lat ; lonyeah = lon
466                   if typefile in ['meso']:
467                       # now that the section is determined we can set the real lat
468                       # ... or for now, a temptative one.
469                       if slon is not None: latyeah = lat2d[:,0]
470                       if slat is not None: lonyeah = lon2d[0,:]
471                   what_I_plot, x, y = define_axis(lonyeah,latyeah,vert,time,indexlon,indexlat,indexvert,\
[430]472                         itime,what_I_plot, len(all_var[index_f].shape),vertmode)
[475]473               ###
474               if (fileref is not None) and (index_f == numplot-1):    zevmin, zevmax = calculate_bounds(what_I_plot,vmin=minop,vmax=maxop)
[405]475               else:                                                   zevmin, zevmax = calculate_bounds(what_I_plot,vmin=vmin,vmax=vmax)
[475]476               if (fileref is not None) and (index_f == numplot-1):    colorb = "RdBu_r"
[518]477               if colorb in ["def","nobar","onebar"]:                  palette = get_cmap(name=defcolorb(fvar.upper()))
[436]478               else:                                                   palette = get_cmap(name=colorb)
[490]479               #palette = cm.GMT_split
[489]480               ##### 1. ELIMINATE 0D or >3D CASES
481               if len(what_I_plot.shape) == 0:   
482                 print "VALUE VALUE VALUE VALUE ::: ",what_I_plot
483                 save = 'donothing'
484               elif len(what_I_plot.shape) >= 4:
[475]485                 print "WARNING!!! ",len(what_I_plot.shape),"-D PLOT NOT SUPPORTED !!! dimensions: ",what_I_plot.shape
486                 errormess("Are you sure you did not forget to prescribe a dimension ?")
487               ##### 2. HANDLE simple 1D/2D field and movies of 1D/2D fields
488               else:
[434]489                 if mrate is not None: iend=len(time)-1
[448]490                 else:                 iend=0
491                 imov = 0 
[475]492                 if len(what_I_plot.shape) == 3:
493                    if var2:               which = "contour" ## have to start with contours rather than shading
494                    else:                  which = "regular"
495                    if mrate is None:      errormess("3D field. Use --rate RATE for movie or specify --time TIME. Exit.")
496                 elif len(what_I_plot.shape) == 2:
497                    if var2:               which = "contour" ## have to start with contours rather than shading
498                    else:                  which = "regular"
499                    if mrate is not None:  which = "unidim"
500                 elif len(what_I_plot.shape) == 1:
501                    which = "unidim"
[562]502                    if what_I_plot.shape[-1] == 1:      print "VALUE VALUE VALUE VALUE ::: ", what_I_plot[0] ; save = 'donothing'
[475]503                 ##### IMOV LOOP #### IMOV LOOP
[430]504                 while imov <= iend:
[448]505                    print "-> frame ",imov+1, which
506                    if which == "regular":   
507                        if mrate is None:                                   what_I_plot_frame = what_I_plot
508                        else:                                               what_I_plot_frame = what_I_plot[imov,:,:]
[451]509                        if winds:
510                            if mrate is None:                                   vecx_frame = vecx ; vecy_frame = vecy
511                            else:                                               vecx_frame = vecx[imov,:,:] ; vecy_frame = vecy[imov,:,:]
[448]512                    elif which == "contour": 
513                        if mrate is None or what_I_plot_contour.ndim < 3:   what_I_plot_frame = what_I_plot_contour
514                        else:                                               what_I_plot_frame = what_I_plot_contour[imov,:,:]
[475]515                    elif which == "unidim":
516                        if mrate is None:                                   what_I_plot_frame = what_I_plot
517                        else:                                               what_I_plot_frame = what_I_plot[:,imov]  ## because swapaxes
518                    #if mrate is not None:     
519                    if mapmode == 1: 
[451]520                            m = define_proj(proj,wlon,wlat,back=back,blat=blat,blon=blon)  ## this is dirty, defined above but out of imov loop
521                            x, y = m(lon2d, lat2d)                                         ## this is dirty, defined above but out of imov loop
[548]522                    if typefile in ['meso'] and mapmode == 1:   what_I_plot_frame = dumpbdy(what_I_plot_frame,6,condition=True)
[464]523#                   if typefile in ['mesoideal']:    what_I_plot_frame = dumpbdy(what_I_plot_frame,0,stag='W',condition=dumped_vert_stag)
[444]524
[475]525                    if which == "unidim":
[614]526                        if lbls is not None: lbl=lbls[nplot-1] 
[612]527                        else:
528                           lbl = ""
529                           if indexlat is not None:  lbl = lbl + " ix" + str(indexlat[0])
530                           if indexlon is not None:  lbl = lbl + " iy" + str(indexlon[0])
531                           if indexvert is not None: lbl = lbl + " iz" + str(indexvert[0])
532                           if indextime is not None: lbl = lbl + " it" + str(indextime[0])
[647]533                           if lbl == "": lbl = all_namefile[index_f]
[569]534
[475]535                        if mrate is not None: x = y  ## because swapaxes...
[490]536                        #what_I_plot_frame = np.diff(what_I_plot_frame, n=1) ; x = x[1:]
[587]537                     
538                        zeline = next(linecycler) ## "-" for simple lines
539                        if tile:      zemarker = 'x'
540                        else:         zemarker = None 
[579]541                        this_is_a_regular_plot = (indexvert is not None) or (indextime is None) or (indexlat is None) or (indexlon is None)
[587]542                        if this_is_a_regular_plot:   plot(x,what_I_plot_frame,zeline,label=lbl,marker=zemarker)  ## vertical profile
543                        else:                        plot(what_I_plot_frame,x,zeline,label=lbl,marker=zemarker)  ## regular plot
[475]544                        if nplot > 1: legend(loc='best')
[502]545                        if indextime is None and axtime is not None and xlab is None:    xlabel(axtime.upper()) ## define the right label
[642]546                        if save == 'txt':  writeascii(np.transpose([x,np.transpose(what_I_plot)]),'profile'+str(nplot*1000+imov)+'.txt')
[475]547
[569]548                    elif which == "regular":
[647]549                   
550                        # plot stream lines if there is a stream file and a vert/lat slice. Might not work with movies ??
551                        if streamflag and sslat is None and svert is None:
552                             streamfile = all_namefile[index_f].replace('.nc','_stream.nc')
553                             teststream = os.path.exists(streamfile)
554                             if teststream:
555                                print 'INFO: Using stream file',streamfile, 'for stream lines'
556                                ncstream = Dataset(streamfile)
557                                psi = getfield(ncstream,'psi')
558                                psi = psi[0,:,:,0] # time and longitude are dummy dimensions
559                                if psi.shape[1] != len(x) or psi.shape[0] != len(y):
560                                    errormess('stream file does not fit! Dimensions: '+str(psi.shape)+' '+str(x.shape)+' '+str(y.shape))
561                                zelevels = np.arange(-1.e10,1.e10,1.e9)
562                                zemin = np.min(abs(zelevels))
563                                zemax = np.max(abs(zelevels))
564                                zewidth  =  (abs(zelevels)-zemin)*(5.- 0.5)/(zemax - zemin) + 0.5 # linewidth ranges from 5 to 0.5
565                                cs = contour( x,y,psi, zelevels, colors='k', linewidths = zewidth)
566                                clabel(cs, inline=True, fontsize = 4.*rcParams['font.size']/5., fmt="%1.1e")
567                             else:
568                                print 'WARNING: STREAM FILE',streamfile, 'DOES NOT EXIST !'
569                             
[448]570                        if hole:         what_I_plot_frame = hole_bounds(what_I_plot_frame,zevmin,zevmax)
571                        else:            what_I_plot_frame = bounds(what_I_plot_frame,zevmin,zevmax)
572                        if flagnolow:    what_I_plot_frame = nolow(what_I_plot_frame)
573                        if not tile:
574                            #zelevels = np.linspace(zevmin*(1. + 1.e-7),zevmax*(1. - 1.e-7)) #,num=20)
575                            zelevels = np.linspace(zevmin,zevmax,num=ticks)
[548]576                            #what_I_plot_frame = smooth(what_I_plot_frame,100)
[453]577                            if mapmode == 1:       m.contourf( x, y, what_I_plot_frame, zelevels, cmap = palette, alpha=trans)
578                            elif mapmode == 0:     contourf( x, y, what_I_plot_frame, zelevels, cmap = palette, alpha=trans)
[612]579                            if cross is not None and mapmode == 1:
580                               idx,idy=m(cross[0][0],cross[0][1])
581                               mpl.pyplot.plot([idx],[idy],'+k',mew=0.5,ms=18)
[448]582                        else:
[458]583                            if mapmode == 1:       m.pcolor( x, y, what_I_plot_frame, cmap = palette, vmin=zevmin, vmax=zevmax, alpha=trans)
584                            elif mapmode == 0:     pcolor( x, y, what_I_plot_frame, cmap = palette, vmin=zevmin, vmax=zevmax, alpha=trans)
[647]585                       
[475]586
[518]587                        if colorb not in ['nobar','onebar']:       
[475]588                            if (fileref is not None) and (index_f == numplot-1):   daformat = "%.3f" 
[468]589                            elif mult != 1:                                        daformat = "%.1f"
[448]590                            else:                                                  daformat = fmtvar(fvar.upper())
[603]591                            #if proj in ['moll','cyl']:  zeorientation="horizontal" ; zepad = 0.05
592                            if proj in ['moll']:        zeorientation="horizontal" ; zepad = 0.05
[599]593                            else:                       zeorientation="vertical" ; zepad = 0.03
594                            zecb = colorbar( fraction=0.05,pad=zepad,format=daformat,orientation=zeorientation,\
[468]595                                      ticks=np.linspace(zevmin,zevmax,num=min([ticks/2+1,21])),extend='neither',spacing='proportional' ) 
[578]596                            if zeorientation == "horizontal" and zetitle[0] != "fill": zecb.ax.set_xlabel(zetitle[index_f]) ; zetitle[index_f]=""
[451]597                        if winds:
[548]598                            if typefile in ['meso']:
[451]599                                [vecx_frame,vecy_frame] = [dumpbdy(vecx_frame,6,stag=uchar,condition=True), dumpbdy(vecy_frame,6,stag=vchar,condition=True)]
600                                key = True
[637]601                                if fvar in ['UV','uv','uvmet']: key = False
[451]602                            elif typefile in ['gcm']:
603                                key = False
[548]604                            if metwind and mapmode == 1:   [vecx_frame,vecy_frame] = m.rotate_vector(vecx_frame, vecy_frame, lon2d, lat2d)
[638]605                            if var:       colorvec = definecolorvec(colorb) 
606                            else:         colorvec = definecolorvec(back) 
[451]607                            vectorfield(vecx_frame, vecy_frame, x, y, stride=stride, csmooth=2,\
608                                             #scale=15., factor=300., color=colorvec, key=key)
609                                             scale=20., factor=250., color=colorvec, key=key)
610                                                              #200.         ## or csmooth=stride
[640]611                        if ope == '-' and nplot == numplot: # this should work as long as ope is '-' guarantees 3 plots for 4 panels without contour
612                            subplot(subv,subh,nplot+1)
[642]613                            rcParams["legend.fontsize"] = 'xx-large'
[641]614                            if indexlat is None:
615                                latmin = -50.; latmax = 50. # latitude range for histogram of difference
[640]616                                zeindexlat = (lat<latmax)*(lat>latmin)
[642]617                                # this follows the define_axis logic in myplot.py:
618                                if indextime is None or indexlon is None: what_I_plot_frame = what_I_plot_frame[zeindexlat,:]
619                                else: what_I_plot_frame = what_I_plot_frame[:,zeindexlat]
[640]620                            toplot = np.ravel(what_I_plot_frame[np.isnan(what_I_plot_frame)==False])
[641]621                            zebins = np.linspace(zevmin,zevmax,num=30)
[640]622                            hist(toplot,bins=zebins,histtype='step',linewidth=2,color='k',normed=True)
[647]623                            zestd = np.std(toplot);zemean = np.mean(toplot)
[641]624                            zebins = np.linspace(zevmin,zevmax,num=300)
[640]625                            zegauss = (1./(zestd * np.sqrt(2 * np.pi)) * np.exp( - (zebins - zemean)**2 / (2 * zestd**2) ) )
[642]626                            plot(zebins, zegauss, linewidth=1, color='r',label="mean: "+str(zemean)[0:5]+"\nstd: "+str(zestd)[0:5])
627                            legend(loc=0,frameon=False)
[640]628                            title("Histogram fig(1) "+ope+" fig(2)")
629                            subplot(subv,subh,nplot) # go back to last plot for title of contour difference
[642]630                           
[448]631                    elif which == "contour":
[562]632                        zevminc, zevmaxc = calculate_bounds(what_I_plot_frame, vmin=min(what_I_plot_frame), vmax=max(what_I_plot_frame))
[448]633                        zelevels = np.linspace(zevminc,zevmaxc,ticks/2) #20)
[637]634                        if var2 == 'HGT':     zelevels = np.arange(-10000.,30000.,1000.)
635                        elif var2 == 'tpot':  zelevels = np.arange(270,370,5)
636                        elif var2 == 'tk':    zelevels = np.arange(150,250,5)
[608]637                        if mapmode == 0:   
[637]638                            what_I_plot_frame, x, y = define_axis( lonyeah,latyeah,vert,time,indexlon,indexlat,indexvert,\
[448]639                                                              itime,what_I_plot_frame, len(all_var2[index_f].shape),vertmode )
[637]640                            ## is this needed? only if len(all_var2[index_f].shape) != len(all_var[index_f].shape)
641                            cs = contour( x,y,what_I_plot_frame, zelevels, colors='k', linewidths = 0.33)#, alpha=0.5, linestyles='solid')
642                            clabel(cs, inline=1, fontsize = 4.*rcParams['font.size']/5., fmt=fmtvar(var2.upper()))
643                        elif mapmode == 1:  cs = m.contour( x,y,what_I_plot_frame, zelevels, colors='k', linewidths = 0.33)#, alpha=0.5, linestyles='solid')
[475]644                    if which in ["regular","unidim"]:
[448]645
[475]646                        if nplot > 1 and which == "unidim":
647                           pass  ## because we superimpose nplot instances
648                        else:
649                           # Axis directives for movie frames [including the first one).
650                           zxmin, zxmax = xaxis ; zymin, zymax = yaxis
651                           if zxmin is not None: mpl.pyplot.xlim(xmin=zxmin)
652                           if zxmax is not None: mpl.pyplot.xlim(xmax=zxmax)
653                           if zymin is not None: mpl.pyplot.ylim(ymin=zymin)
654                           if zymax is not None: mpl.pyplot.ylim(ymax=zymax)
655                           if ylog:      mpl.pyplot.semilogy()
656                           if invert_y:  ax = mpl.pyplot.gca() ; ax.set_ylim(ax.get_ylim()[::-1])
[502]657                           if xlab is not None: xlabel(xlab)
658                           if ylab is not None: ylabel(ylab)
[475]659
[448]660                        if mrate is not None:
[451]661                           ### THIS IS A MENCODER MOVIE
662                           if mrate > 0:
663                             figframe=mpl.pyplot.gcf()
664                             if mquality:   figframe.set_dpi(600.)
665                             else:          figframe.set_dpi(200.)
666                             mframe=fig2img(figframe)
667                             if imov == 0:
668                                moviename='movie' ;W,H = figframe.canvas.get_width_height()
669                                video = VideoSink((H,W), moviename, rate=mrate, byteorder="rgba")
670                             video.run(mframe) ; close()
671                             if imov == iend: video.close()                           
672                           ### THIS IS A WEBPAGE MOVIE
673                           else:
674                             nameframe = "image"+str(1000+imov)
675                             makeplotres(nameframe,res=100.,disp=False) ; close()
676                             if imov == 0: myfile = open("zepics", 'w')
677                             myfile.write("modImages["+str(imov)+"] = '"+nameframe+"_100.png';"+ '\n')
678                             if imov == iend:
679                                 myfile.write("first_image = 0;"+ '\n')
680                                 myfile.write("last_image = "+str(iend)+";"+ '\n')
681                                 myfile.close()
[475]682                        if var2 and which == "regular":  which = "contour"
[448]683                        imov = imov+1
684                    elif which == "contour":
685                        which = "regular"
686
[345]687       ### Next subplot
[483]688       zevarname = varname
689       if redope is not None: zevarname = zevarname + "_" + redope
690       basename = getname(var=zevarname,var2=var2,winds=winds,anomaly=anomaly)
[462]691       if len(what_I_plot.shape) > 3:
692           basename = basename + getstralt(nc,level) 
[451]693       if mrate is not None: basename = "movie_" + basename
[548]694       if typefile in ['meso']:
[569]695            if sslon is not None: basename = basename + "_lon_" + str(int(round(lonp)))
696            if sslat is not None: basename = basename + "_lat_" + str(int(round(latp)))
[349]697            plottitle = basename
[468]698            ### dans le nouveau systeme time=ls,sol,lt cette ligne pourrait ne servir a rien (ou deplacer au dessus)
699            if addchar and indextime is not None:   [addchar,gogol,gogol2] = getlschar ( all_namefile[index_f] )  ;  plottitle = plottitle + addchar
[485]700            ### en fait redope is None doit etre remplace par : n'est ni maxt ni mint
701            if redope is None and ltst is not None and ( (mapmode == 0) or (proj in ["lcc","laea","merc","nsper"]) ):  plottitle = plottitle + "_LT" + str(ltst)
[349]702       else:
[359]703            if fileref is not None:
[402]704                if index_f is numplot-1:     plottitle = basename+' '+"fig(1) "+ope+" fig(2)"
705                elif index_f is numplot-2:   plottitle = basename+' '+fileref
[647]706                else:                        plottitle = basename+' '+all_namefile[index_f]
707            else:                            plottitle = basename+' '+all_namefile[index_f]
[468]708       if mult != 1:                         plottitle = '{:.0e}'.format(mult) + "*" + plottitle
[578]709       if zetitle[0] != "fill":                 
[580]710          if index_f < len(zetitle): plottitle = zetitle[index_f]
711          else: plottitle = zetitle[0]
[578]712          if titleref is "fill":             titleref=zetitle[index_f]
[359]713          if fileref is not None:
[402]714             if index_f is numplot-2:        plottitle = titleref
715             if index_f is numplot-1:        plottitle = "fig(1) "+ope+" fig(2)"
716#       if indexlon is not None:      plottitle = plottitle + " lon: " + str(min(lon[indexlon])) +" "+ str(max(lon[indexlon]))
717#       if indexlat is not None:      plottitle = plottitle + " lat: " + str(min(lat[indexlat])) +" "+ str(max(lat[indexlat]))
718#       if indexvert is not None:     plottitle = plottitle + " vert: " + str(min(vert[indexvert])) +" "+ str(max(vert[indexvert]))
719#       if indextime is not None:     plottitle = plottitle + " time: " + str(min(time[indextime])) +" "+ str(max(time[indextime]))
[518]720       if colorb != "onebar": title( plottitle )
[402]721       if nplot >= numplot: error = True
[345]722       nplot += 1
723
[518]724    if colorb == "onebar":
725        cax = axes([0.1, 0.2, 0.8, 0.03]) # a ameliorer
726        zecb = colorbar(cax=cax, orientation="horizontal", format=fmtvar(fvar.upper()),\
727                 ticks=np.linspace(zevmin,zevmax,num=min([ticks/2+1,21])),extend='neither',spacing='proportional')
[578]728        if zetitle[0] != "fill": zecb.ax.set_xlabel(zetitle[index_f]) ; zetitle[index_f]=""
[345]729
[612]730
[345]731    ##########################################################################
732    ### Save the figure in a file in the data folder or an user-defined folder
[359]733    if outputname is None:
[548]734       if typefile in ['meso']:   prefix = getprefix(nc)
[359]735       elif typefile in ['gcm']:            prefix = 'LMD_GCM_'
736       else:                                prefix = ''
[345]737    ###
[359]738       zeplot = prefix + basename
739       if addchar:         zeplot = zeplot + addchar
740       if numplot <= 0:    zeplot = zeplot + "_LT"+str(abs(numplot))
[345]741    ###
[359]742       if not target:      zeplot = namefile[0:find(namefile,'wrfout')] + zeplot
743       else:               zeplot = target + "/" + zeplot 
[345]744    ###
[359]745    else:
746       zeplot=outputname
747
[436]748    if mrate is None:
749        pad_inches_value = 0.35
750        print "********** SAVE ", save
751        if save == 'png': 
752            if display: makeplotres(zeplot,res=100.,pad_inches_value=pad_inches_value) #,erase=True)  ## a miniature
753            makeplotres(zeplot,res=resolution,pad_inches_value=pad_inches_value,disp=False)
754        elif save in ['eps','svg','pdf']:     makeplotres(zeplot,pad_inches_value=pad_inches_value,disp=False,ext=save)
755        elif save == 'gui':                   show()
[489]756        elif save == 'donothing':             pass
[436]757        elif save == 'txt':                   print "Saved results in txt file." 
758        else: 
759            print "INFO: save mode not supported. using gui instead."
760            show()
[345]761
[447]762    ###################################
763    #### Getting more out of this video -- PROBLEMS WITH CREATED VIDEOS
764    #
765    #if mrate is not None:
766    #    print "Re-encoding movie.. first pass"
767    #    video.first_pass(filename=moviename,quality=mquality,rate=mrate)
768    #    print "Re-encoding movie.. second pass"
769    #    video.second_pass(filename=moviename,quality=mquality,rate=mrate)   
[444]770
[345]771    ###############
772    ### Now the end
773    return zeplot
Note: See TracBrowser for help on using the repository browser.