source: trunk/MESOSCALE/PLOT/SPEC/POLAR/defs/polar_inc_topo.pro.intercomp @ 134

Last change on this file since 134 was 85, checked in by aslmd, 14 years ago

LMD_MM_MARS et LMD_LES_MARS: ajout des routines IDL pour tracer les sorties --> voir mesoscale/PLOT

File size: 2.8 KB
Line 
1        model = 'LMD_MMM' & interptype = '_zabg' & numnest = '1' & nlevel = 0 & cfield1  = 'HGT' & lonfield = 'XLONG' & latfield = 'XLAT'
2        ;model = 'LMD_MMM' & interptype = '_zabg' & numnest = '2' & nlevel = 0 & cfield1  = 'HGT' & lonfield = 'XLONG' & latfield = 'XLAT'
3        ;model = 'LMD_MMM' & interptype = '_zabg' & numnest = '3' & nlevel = 0 & cfield1  = 'HGT' & lonfield = 'XLONG' & latfield = 'XLAT'
4        ;model = 'LMD_MMM' & interptype = '_zabg' & numnest = '4' & nlevel = 0 & cfield1  = 'HGT' & lonfield = 'XLONG' & latfield = 'XLAT'
5        ;model = 'MRAMS'   & interptype = '_zabg' & numnest = '1' & nlevel = 0 & cfield1  = 'topo' & lonfield = 'glon' & latfield = 'glat'
6        ;model = 'MRAMS'   & interptype = '_zabg' & numnest = '2' & nlevel = 0 & cfield1  = 'topo' & lonfield = 'glon' & latfield = 'glat'
7        ;model = 'MRAMS'   & interptype = '_zabg' & numnest = '3' & nlevel = 0 & cfield1  = 'topo' & lonfield = 'glon' & latfield = 'glat'
8        ;model = 'MRAMS'   & interptype = '_zabg' & numnest = '4' & nlevel = 0 & cfield1  = 'topo' & lonfield = 'glon' & latfield = 'glat'
9
10;;;;;*************************************** FOLDER etc...
11        folder  = '../INTERCOMP/' + model + '/'
12        filename        = folder + model + '_d0'+numnest+'_2024-05-57_06:00:00'
13        filename        = filename + interptype
14        save_ps         = model + numnest + interptype + string(nlevel,'(I0)') + '_HGT';___'
15
16;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
17;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
18latmin = -90 & latmax = 40 & lonmin = -180 & lonmax = 180  ;; vue complete nest 1
19;latmin = -90 & latmax = 20 & lonmin = -90 & lonmax = 30 ;-0.0001  ;; vue d'un quartier nest2
20;latmin = -40 & latmax = -10 & lonmin = -60 & lonmax = -15  ;; vue quartier un peu plus zoom
21;latmin = -30 & latmax = -24 & lonmin = -38 & lonmax = -32  ;; vue centree nest 4
22;latmin = -30 & latmax = -20 & lonmin = -45 & lonmax = -30  ;; vue centree nest 4
23;
24cfield2  = cfield1
25cfield3  = cfield1
26;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
27format        = '(I0)'
28colors        = 128
29minfield_init = -8000.
30maxfield_init = +12000.
31pal           =  33 ;39 ;6 ;11 ;0 ;11 ;6 ;0 ;6 ;39 ;19
32        minfield_init = -2500.
33        maxfield_init = +1500.
34title_user    = ''
35;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
36missing_value=1.e30
37lim_max = maxfield_init & w=where((what_I_plot ge lim_max) and (what_I_plot le 1e9)) & if (w[0] ne -1) then what_I_plot[w]=lim_max
38lim_min = minfield_init & w=where(what_I_plot le lim_min) & if (w[0] ne -1) then what_I_plot[w]=lim_min
39;lim_blank = 0.5 & w=where(abs(what_I_plot) le lim_blank) & if (w[0] ne -1) then what_I_plot[w]=missing_value
40overcontour = overcontour / 1000.
41lev = -10. + 1.*findgen(40)
42lev = -10. + 0.5*findgen(80)
43flag_cb = 'false'
44;flag_cb = 'true'
45;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
46
Note: See TracBrowser for help on using the repository browser.