source: trunk/MESOSCALE/PLOT/SPEC/SERIES/windautom.idl @ 205

Last change on this file since 205 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: 1.3 KB
Line 
1; cf gw.def apres 'change plot settings'
2;
3
4;title_user='Evolution of mean wind speed (m/s) with height ABG and LT'
5        ;;'Evolution of mean temperature (K) with height ABG and LT'
6        ;;'Evolution of mean wind speed (m/s) with height ABG and LT'
7
8
9title_user='Evolution of horizontal wind speed (m/s) with height AGL and LT'
10;  title_user='Evolution of vertical wind speed (m/s) with height ABG and LT'
11;title_user='Evolution of temperature (K) with height AGL and LT'
12
13;subtitle_user='Tau dust 5 minus Tau dust 2'
14
15windowx=[6.,29.]
16windowx=[0.,23.]
17windowy=[0.,45.]
18intervalx=1.
19intervaly=5.
20
21pal=33
22numdiv=14
23
24pal=22
25format='(I0)'
26
27minfield_init=0.
28maxfield_init=80.
29numdiv=10
30
31        ;windowx=[0.,23.]
32        ;windowy=[0.,12.]
33        ;intervalx=1.
34        ;intervaly=2.
35        ;minfield_init=0.
36        ;maxfield_init=30.
37
38;minfield_init=120.
39;maxfield_init=220.
40
41
42  ;numdiv=10
43  ;minfield_init=-2.
44  ;maxfield_init=2.
45  ;minfield_init=-0.5
46  ;maxfield_init=0.5
47  ;pal=33
48
49
50isotropic='false'
51
52lim_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
53lim_min = minfield_init & w=where(what_I_plot le lim_min) & if (w[0] ne -1) then what_I_plot[w]=lim_min
54
55;;pour tracer les vents en fonction du temps mettre :
56title_axis=['Martian hour (h)','Height above ground (km)']
Note: See TracBrowser for help on using the repository browser.