Changeset 43 for trunk/src/paper01/fig12


Ignore:
Timestamp:
04/11/11 18:05:51 (13 years ago)
Author:
pinsard
Message:

add minimal header in paper01 IDL files

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/src/paper01/fig12/swr_statistics_map_2000_2009_v50.pro

    r41 r43  
     1;+ 
     2; .. _swr_statistics_map_2000_2009_v50.pro 
     3; 
     4; ==================================== 
     5; swr_statistics_map_2000_2009_v50.pro 
     6; ==================================== 
     7; 
     8; DESCRIPTION 
     9; =========== 
     10; 
     11; SEE ALSO 
     12; ======== 
     13; 
     14; :ref:`tropflux_profile.sh` 
     15; 
     16; EXAMPLES 
     17; ======== 
     18; 
     19; :: 
     20; 
     21;  IDL> @tropflux_init 
     22;  IDL> swr_statistics_map_2000_2009_v50 
     23; 
     24; EVOLUTIONS 
     25; ========== 
     26; 
     27; $Id$ 
     28; 
     29; - fplod 20110411T142955Z aedon.locean-ipsl.upmc.fr (Darwin) 
     30; 
     31;   * minimal header 
     32; 
     33;- 
    134pro swr_statistics_map_2000_2009_v50 
    235@common 
    3 ;------------------------------------------------------------ 
    436reinitplt, /z,/invert 
    537key_portrait = 1 
    … …  
    739 
    840openps, FILENAME = 'idl.ps' 
    9 ;------------------------------------------------------------ 
    1041; partie a changer 
    11 ;------------------------------------------------------------ 
    1242bias_mi=-20 & bias_ma=20 & bias_int=2 
    1343std_mi=0.7   & std_ma=1.31  & std_int=0.05 
    … …  
    90120for n=0,NN-1 do begin 
    91121  x=lon(n) 
    92   y=lat(n)  
    93   c=cor_trop(n)  
    94    
    95   plots, x,y,psym=8,symsize=1.5,color=0 
    96 endfor 
    97 ;------------------------------------------------------------ 
     122  y=lat(n) 
     123  c=cor_trop(n) 
     124 
     125  plots, x,y,psym=8,symsize=1.5,color=0 
     126endfor 
    98127plt, 12+msk,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,cor_mi, cor_ma,int=cor_int,/nocolorb, $ 
    99128   title='2) SWR Correlation -  ERAI', subtitle='', small=[1,4,2],/noer,/rempl, marge=marge 
    … …  
    116145for n=0,NN-1 do begin 
    117146  x=lon(n) 
    118   y=lat(n)  
    119   c=cor_era(n)  
    120    
    121   plots, x,y,psym=8,symsize=1.5,color=0 
    122 endfor 
    123 ;------------------------------------------------------------ 
     147  y=lat(n) 
     148  c=cor_era(n) 
     149 
     150  plots, x,y,psym=8,symsize=1.5,color=0 
     151endfor 
    124152plt, 12+msk,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,cor_mi, cor_ma,int=cor_int,/nocolorb, $ 
    125153   title='3) SWR Correlation - OAFlux', subtitle='', small=[1,4,3],/noer,/rempl, marge=marge 
    … …  
    144172  y=lat(n) 
    145173  c=cor_oaflx(n) 
    146   
    147   plots, x,y,psym=8,symsize=1.5,color=0 
    148 endfor 
    149 ;------------------------------------------------------------ 
     174 
     175  plots, x,y,psym=8,symsize=1.5,color=0 
     176endfor 
    150177plt, 12+msk,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,cor_mi, cor_ma,int=cor_int, $ 
    151178   title='4) SWR Correlation - SWR_olr', subtitle='', small=[1,4,4],/noer,/rempl, marge=marge1 
    … …  
    170197  y=lat(n) 
    171198  c=cor_olr(n) 
    172   
     199 
    173200  plots, x,y,psym=8,symsize=1.5,color=0 
    174201endfor 
    175202 
    176203erase 
    177 ;------------------------------------------------------------ 
    178204 
    179205plt, -5+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,bias_mi, bias_ma, int=bias_int, marge=marge,/nocolorb, $ 
    … …  
    197223for n=0,NN-1 do begin 
    198224  x=lon(n) 
    199   y=lat(n)  
    200   c=bias_trop(n)  
    201    
    202   plots, x,y,psym=8,symsize=1.5,color=0 
    203 endfor 
    204 ;------------------------------------------------------------ 
     225  y=lat(n) 
     226  c=bias_trop(n) 
     227 
     228  plots, x,y,psym=8,symsize=1.5,color=0 
     229endfor 
    205230plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,bias_mi, bias_ma, int=bias_int,/noer, marge=marge, $ 
    206231   title='2) SWR Mean bias - ERAI', subtitle='', small=[1,4,2],/rempl,format='(i3)',/nocolorb 
    … …  
    225250  y=lat(n) 
    226251  c=bias_era(n) 
    227    
    228   plots, x,y,psym=8,symsize=1.5,color=0 
    229 endfor 
    230  
    231 ;------------------------------------------------------------ 
     252 
     253  plots, x,y,psym=8,symsize=1.5,color=0 
     254endfor 
     255 
    232256 
    233257plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,bias_mi, bias_ma, int=bias_int,/noer, marge=marge, $ 
    … …  
    253277  y=lat(n) 
    254278  c=bias_oaflx(n) 
    255    
    256   plots, x,y,psym=8,symsize=1.5,color=0 
    257 endfor 
    258  
    259 ;------------------------------------------------------------ 
     279 
     280  plots, x,y,psym=8,symsize=1.5,color=0 
     281endfor 
     282 
    260283 
    261284plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,bias_mi, bias_ma, int=bias_int,/noer, marge=marge1, $ 
    … …  
    281304  y=lat(n) 
    282305  c=bias_olr(n) 
    283    
     306 
    284307  plots, x,y,psym=8,symsize=1.5,color=0 
    285308endfor 
    … …  
    287310erase 
    288311 
    289 ;------------------------------------------------------------ 
    290312 
    291313plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,rmsd_mi, rmsd_ma, int=rmsd_int,/noer, $ 
    … …  
    311333  y=lat(n) 
    312334  c=rmsd_trop(n) 
    313    
    314   plots, x,y,psym=8,symsize=1.5,color=0 
    315 endfor 
    316 ;------------------------------------------------------------ 
     335 
     336  plots, x,y,psym=8,symsize=1.5,color=0 
     337endfor 
    317338plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,rmsd_mi, rmsd_ma, int=rmsd_int,/noer, $ 
    318339   title='2) RMSD - ERAI', subtitle='', small=[1,4,2],/rempl,/nocolorb, marge=marge 
    … …  
    337358  y=lat(n) 
    338359  c=rmsd_era(n) 
    339    
    340   plots, x,y,psym=8,symsize=1.5,color=0 
    341 endfor 
    342 ;------------------------------------------------------------ 
     360 
     361  plots, x,y,psym=8,symsize=1.5,color=0 
     362endfor 
    343363plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,rmsd_mi, rmsd_ma, int=rmsd_int,/noer, $ 
    344364   title='3) RMSD - OAFlux', subtitle='', small=[1,4,3],/rempl,/nocolorb, marge=marge 
    … …  
    363383  y=lat(n) 
    364384  c=rmsd_oaflx(n) 
    365    
    366   plots, x,y,psym=8,symsize=1.5,color=0 
    367 endfor 
    368  
    369 ;------------------------------------------------------------ 
     385 
     386  plots, x,y,psym=8,symsize=1.5,color=0 
     387endfor 
     388 
    370389plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,rmsd_mi, rmsd_ma, int=rmsd_int,/noer, $ 
    371390   title='4) RMSD - SWR_olr', subtitle='', small=[1,4,4],/rempl, marge=marge1 
    … …  
    390409  y=lat(n) 
    391410  c=rmsd_olr(n) 
    392    
    393   plots, x,y,psym=8,symsize=1.5,color=0 
    394 endfor 
    395 ;------------------------------------------------------------ 
     411 
     412  plots, x,y,psym=8,symsize=1.5,color=0 
     413endfor 
    396414erase 
    397415plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,std_mi, std_ma, int=std_int,/noer, $ 
    … …  
    420438  plots, x,y,psym=8,symsize=1.5,color=0 
    421439endfor 
    422 ;------------------------------------------------------------ 
    423440plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,std_mi, std_ma, int=std_int,/noer, $ 
    424441   title='2) STD ratop - ERAI', subtitle='', small=[1,4,2],/rempl,/nocolorb, marge=marge 
    … …  
    447464endfor 
    448465 
    449 ;------------------------------------------------------------ 
    450466plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,std_mi, std_ma, int=std_int,/noer, $ 
    451467   title='3) STD rato - OAFlux', subtitle='', small=[1,4,3],/rempl,/nocolorb, marge=marge 
    … …  
    474490endfor 
    475491 
    476 ;------------------------------------------------------------ 
    477492plt,0.8+msk*1.e-5,realcont=2,/nocont,/nofill,xminor=1,yminor=1,lct=64,std_mi, std_ma, int=std_int,/noer, $ 
    478493   title='4) STD rato - SWR_olr', subtitle='', small=[1,4,4],/rempl, marge=marge1 
    … …  
    500515  plots, x,y,psym=8,symsize=1.5,color=0 
    501516endfor 
    502 ;------------------------------------------------------------ 
    503517closeps 
    504518fig='swr_statistics_map_2000_2009_v50.ps' 
    505519spawn, 'mv '+psdir+'idl.ps '+cpsdir+fig 
    506520spawn, 'gv '+cpsdir+fig 
    507 ;------------------------------------------------------------ 
    508521return 
    509522end 
    510  
Note: See TracChangeset for help on using the changeset viewer.