Changeset 50 for trunk/src/paper01/fig7


Ignore:
Timestamp:
04/29/11 11:09:12 (13 years ago)
Author:
pinsard
Message:

replace TROPFLUX by PROJECT

Location:
trunk/src/paper01/fig7
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/paper01/fig7/air_validation_scatter_2000_2009_basin.pro

    r46 r50  
    1515;       rankdir="LR", 
    1616;       ] 
    17 ;       air_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/air_2000_2009_erai_*.txt"]; 
    18 ;       air_tropflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/air_2000_2009_trop_*.txt"]; 
    19 ;       air_oaflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/air_2000_2009_oaflx_*.txt"]; 
    20 ;       air_ncep2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/air_2000_2009_ncep2_*.txt"]; 
    21 ;       air_ncep1 [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/air_2000_2009_ncep1_*.txt"]; 
    22 ;       t2m_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_t2m_19890101_20091231_oafluxgrid.nc"]; 
    23 ; 
    24 ;       figure [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/air_validation_scatter_2000_2009_basin.ps"]; 
     17;       air_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/air_2000_2009_erai_*.txt"]; 
     18;       air_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/air_2000_2009_trop_*.txt"]; 
     19;       air_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/air_2000_2009_oaflx_*.txt"]; 
     20;       air_ncep2 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/air_2000_2009_ncep2_*.txt"]; 
     21;       air_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/air_2000_2009_ncep1_*.txt"]; 
     22;       t2m_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_t2m_19890101_20091231_oafluxgrid.nc"]; 
     23; 
     24;       figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/air_validation_scatter_2000_2009_basin.ps"]; 
    2525; 
    2626;       air_validation_scatter_2000_2009_basin [shape=box, 
     
    3636; ======== 
    3737; 
    38 ; :ref:`tropflux_profile.sh` 
    39 ; :ref:`tropflux_init.pro` 
    40 ; :ref:`cm_tropflux.pro` 
     38; :ref:`project_profile.sh` 
     39; :ref:`project_init.pro` 
     40; :ref:`cm_project.pro` 
    4141; 
    4242; :func:`x_site_location` 
     
    5151; :: 
    5252; 
    53 ;  IDL> @tropflux_init 
    5453;  IDL> date1=19890101L 
    5554;  IDL> date2=20091231L 
     
    9089pro air_validation_scatter_2000_2009_basin, date1, date2 
    9190@cm_general 
    92 @cm_tropflux 
     91@cm_project 
    9392reinitplt, /z,/invert 
    9493key_portrait = 1 
     
    150149close,/all 
    151150 
    152 fi_air_erai=tropflux_id_env+'air_2000_2009_erai_'+ocean+'.txt' 
     151fi_air_erai=project_id_env+'air_2000_2009_erai_'+ocean+'.txt' 
    153152openw,1,fi_air_erai 
    154 fi_air_trop=tropflux_id_env+'air_2000_2009_trop_'+ocean+'.txt' 
     153fi_air_trop=project_id_env+'air_2000_2009_trop_'+ocean+'.txt' 
    155154openw,2,fi_air_trop 
    156 fi_air_oaflx=tropflux_id_env+'air_2000_2009_oaflx_'+ocean+'.txt' 
     155fi_air_oaflx=project_id_env+'air_2000_2009_oaflx_'+ocean+'.txt' 
    157156openw,3,fi_air_oaflx 
    158 fi_air_ncep2=tropflux_id_env+'air_2000_2009_ncep2_'+ocean+'.txt' 
     157fi_air_ncep2=project_id_env+'air_2000_2009_ncep2_'+ocean+'.txt' 
    159158openw,4,fi_air_ncep2 
    160 fi_air_ncep1=tropflux_id_env+'air_2000_2009_ncep1_'+ocean+'.txt' 
     159fi_air_ncep1=project_id_env+'air_2000_2009_ncep1_'+ocean+'.txt' 
    161160openw,5,fi_air_ncep1 
    162161 
     
    170169;; first reading the whole ERAI uncorrected and corrected data 
    171170 
    172 file=tropflux_id_env+'erai_t2m_19890101_20091231_oafluxgrid.nc' 
     171file=project_id_env+'erai_t2m_19890101_20091231_oafluxgrid.nc' 
    173172initncdf, file 
    174173unc=read_ncdf('t2m',date1,date2,file=file,/nostr) & unc=unc-273.15 
     
    248247close,/all 
    249248 
    250 fi_air_erai=tropflux_id_env+'air_2000_2009_erai_'+ocean+'.txt' 
     249fi_air_erai=project_id_env+'air_2000_2009_erai_'+ocean+'.txt' 
    251250res=read_ascii(fi_air_erai,data_start=1) 
    252251ff=res.field1 
     
    274273oplot, mean_tao, yfit, color=250, thick=2 
    275274 
    276 fi_air_trop=tropflux_id_env+'air_2000_2009_trop_'+ocean+'.txt' 
     275fi_air_trop=project_id_env+'air_2000_2009_trop_'+ocean+'.txt' 
    277276res=read_ascii(fi_air_trop,data_start=1) 
    278277ff=res.field1 
     
    301300oplot, mean_tao, yfit, color=250, thick=2 
    302301 
    303 fi_air_oaflx=tropflux_id_env+'air_2000_2009_oaflx_'+ocean+'.txt' 
     302fi_air_oaflx=project_id_env+'air_2000_2009_oaflx_'+ocean+'.txt' 
    304303res=read_ascii(fi_air_oaflx,data_start=1) 
    305304ff=res.field1 
     
    330329 
    331330 
    332 fi_air_ncep=tropflux_id_env+'air_2000_2009_ncep2_'+ocean+'.txt' 
     331fi_air_ncep=project_id_env+'air_2000_2009_ncep2_'+ocean+'.txt' 
    333332res=read_ascii(fi_air_ncep,data_start=1) 
    334333ff=res.field1 
     
    357356oplot, mean_tao, yfit, color=250, thick=2 
    358357 
    359 fi_air_ncep1=tropflux_id_env+'air_2000_2009_ncep1_'+ocean+'.txt' 
     358fi_air_ncep1=project_id_env+'air_2000_2009_ncep1_'+ocean+'.txt' 
    360359res=read_ascii(fi_air_ncep1,data_start=1) 
    361360ff=res.field1 
     
    386385closeps 
    387386 
    388 fig=tropflux_od_env+'air_validation_scatter_2000_2009_'+ocean+'.ps' 
     387fig=project_od_env+'air_validation_scatter_2000_2009_'+ocean+'.ps' 
    389388spawn, 'mv '+psdir+'idl.ps '+fig 
    390389spawn, 'gv '+fig 
  • trunk/src/paper01/fig7/q2m_validation_scatter_2000_2009_basin.pro

    r46 r50  
    1515;       rankdir="LR", 
    1616;       ] 
    17 ;       q2m_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/q2m_2000_2009_erai_*.txt"]; 
    18 ;       q2m_erai_2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_q2m_19890101_20091231_oafluxgrid.nc"]; 
    19 ;       q2m_tropflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/q2m_2000_2009_trop_*.txt"]; 
    20 ;       q2m_oaflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/q2m_2000_2009_oaflx_*.txt"]; 
    21 ;       q2m_ncep [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/q2m_2000_2009_ncep_*.txt"]; 
    22 ;       q2m_ncep1 [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/q2m_2000_2009_ncep1_*.txt"]; 
    23 ; 
    24 ;       figure [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/q2m_validation_scatter_2000_2009_basin.ps"]; 
     17;       q2m_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/q2m_2000_2009_erai_*.txt"]; 
     18;       q2m_erai_2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_q2m_19890101_20091231_oafluxgrid.nc"]; 
     19;       q2m_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/q2m_2000_2009_trop_*.txt"]; 
     20;       q2m_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/q2m_2000_2009_oaflx_*.txt"]; 
     21;       q2m_ncep [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/q2m_2000_2009_ncep_*.txt"]; 
     22;       q2m_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/q2m_2000_2009_ncep1_*.txt"]; 
     23; 
     24;       figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/q2m_validation_scatter_2000_2009_basin.ps"]; 
    2525; 
    2626;       q2m_validation_scatter_2000_2009_basin [shape=box, 
     
    3636; ======== 
    3737; 
    38 ; :ref:`tropflux_profile.sh` 
    39 ; :ref:`tropflux_init.pro` 
    40 ; :ref:`cm_tropflux.pro` 
     38; :ref:`project_profile.sh` 
     39; :ref:`project_init.pro` 
     40; :ref:`cm_project.pro` 
    4141; 
    4242; :func:`x_site_location` 
     
    5151; :: 
    5252; 
    53 ;  IDL> @tropflux_init 
    5453;  IDL> date1=19890101L 
    5554;  IDL> date2=20091231L 
     
    9089pro q2m_validation_scatter_2000_2009_basin, date1, date2 
    9190@cm_general 
    92 @cm_tropflux 
     91@cm_project 
    9392reinitplt, /z,/invert 
    9493key_portrait = 1 
     
    148147close,/all 
    149148 
    150 fi_q2m_erai=tropflux_id_env+'q2m_2000_2009_erai_'+ocean+'.txt' 
     149fi_q2m_erai=project_id_env+'q2m_2000_2009_erai_'+ocean+'.txt' 
    151150openw,1,fi_q2m_erai 
    152 fi_q2m_trop=tropflux_id_env+'q2m_2000_2009_trop_'+ocean+'.txt' 
     151fi_q2m_trop=project_id_env+'q2m_2000_2009_trop_'+ocean+'.txt' 
    153152openw,2,fi_q2m_trop 
    154 fi_q2m_oaflx=tropflux_id_env+'q2m_2000_2009_oaflx_'+ocean+'.txt' 
     153fi_q2m_oaflx=project_id_env+'q2m_2000_2009_oaflx_'+ocean+'.txt' 
    155154openw,3,fi_q2m_oaflx 
    156 fi_q2m_ncep=tropflux_id_env+'q2m_2000_2009_ncep_'+ocean+'.txt' 
     155fi_q2m_ncep=project_id_env+'q2m_2000_2009_ncep_'+ocean+'.txt' 
    157156openw,4,fi_q2m_ncep 
    158 fi_q2m_ncep1=tropflux_id_env+'q2m_2000_2009_ncep1_'+ocean+'.txt' 
     157fi_q2m_ncep1=project_id_env+'q2m_2000_2009_ncep1_'+ocean+'.txt' 
    159158openw,5,fi_q2m_ncep1 
    160159 
     
    168167;; first reading the whole ERAI uncorrected and corrected data 
    169168 
    170 file=tropflux_id_env+'erai_q2m_19890101_20091231_oafluxgrid.nc' 
     169file=project_id_env+'erai_q2m_19890101_20091231_oafluxgrid.nc' 
    171170initncdf, file 
    172171unc=read_ncdf('q2m',date1,date2,file=file,/nostr) 
     
    245244close,/all 
    246245 
    247 fi_q2m_erai=tropflux_id_env+'q2m_2000_2009_erai_'+ocean+'.txt' 
     246fi_q2m_erai=project_id_env+'q2m_2000_2009_erai_'+ocean+'.txt' 
    248247res=read_ascii(fi_q2m_erai,data_start=1) 
    249248ff=res.field1 
     
    271270oplot, mean_tao, yfit, color=250, thick=2 
    272271 
    273 fi_q2m_trop=tropflux_id_env+'q2m_2000_2009_trop_'+ocean+'.txt' 
     272fi_q2m_trop=project_id_env+'q2m_2000_2009_trop_'+ocean+'.txt' 
    274273res=read_ascii(fi_q2m_trop,data_start=1) 
    275274ff=res.field1 
     
    298297oplot, mean_tao, yfit, color=250, thick=2 
    299298 
    300 fi_q2m_oaflx=tropflux_id_env+'q2m_2000_2009_oaflx_'+ocean+'.txt' 
     299fi_q2m_oaflx=project_id_env+'q2m_2000_2009_oaflx_'+ocean+'.txt' 
    301300res=read_ascii(fi_q2m_oaflx,data_start=1) 
    302301ff=res.field1 
     
    326325 
    327326 
    328 fi_q2m_ncep=tropflux_id_env+'q2m_2000_2009_ncep_'+ocean+'.txt' 
     327fi_q2m_ncep=project_id_env+'q2m_2000_2009_ncep_'+ocean+'.txt' 
    329328res=read_ascii(fi_q2m_ncep,data_start=1) 
    330329ff=res.field1 
     
    353352oplot, mean_tao, yfit, color=250, thick=2 
    354353 
    355 fi_q2m_ncep1=tropflux_id_env+'q2m_2000_2009_ncep1_'+ocean+'.txt' 
     354fi_q2m_ncep1=project_id_env+'q2m_2000_2009_ncep1_'+ocean+'.txt' 
    356355res=read_ascii(fi_q2m_ncep1,data_start=1) 
    357356ff=res.field1 
     
    382381closeps 
    383382 
    384 fig=tropflux_od_env+'q2m_validation_scatter_2000_2009_'+ocean+'.ps' 
     383fig=project_od_env+'q2m_validation_scatter_2000_2009_'+ocean+'.ps' 
    385384spawn, 'mv '+psdir+'idl.ps '+fig 
    386385spawn, 'gv '+fig 
  • trunk/src/paper01/fig7/sst_validation_scatter_2000_2009_basin.pro

    r46 r50  
    1515;       rankdir="LR", 
    1616;       ] 
    17 ;       sst_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/sst_2000_2009_erai_*.txt"]; 
    18 ;       sst_tropflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/sst_2000_2009_trop_*.txt"]; 
    19 ;       sst_oaflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/sst_2000_2009_oaflx_*.txt"]; 
    20 ;       sst_ncep [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/sst_2000_2009_ncep_*.txt"]; 
    21 ;       sst_ncep1 [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/sst_2000_2009_ncep1_*.txt"]; 
    22 ;       sst_tmi [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/sst_2000_2009_tmi_*.txt"]; 
    23 ; 
    24 ;       figure [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/sst_validation_scatter_2000_2009_basin.ps"]; 
     17;       sst_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/sst_2000_2009_erai_*.txt"]; 
     18;       sst_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/sst_2000_2009_trop_*.txt"]; 
     19;       sst_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/sst_2000_2009_oaflx_*.txt"]; 
     20;       sst_ncep [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/sst_2000_2009_ncep_*.txt"]; 
     21;       sst_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/sst_2000_2009_ncep1_*.txt"]; 
     22;       sst_tmi [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/sst_2000_2009_tmi_*.txt"]; 
     23; 
     24;       figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/sst_validation_scatter_2000_2009_basin.ps"]; 
    2525; 
    2626;       sst_validation_scatter_2000_2009_basin [shape=box, 
     
    3636; ======== 
    3737; 
    38 ; :ref:`tropflux_profile.sh` 
    39 ; :ref:`tropflux_init.pro` 
    40 ; :ref:`cm_tropflux.pro` 
     38; :ref:`project_profile.sh` 
     39; :ref:`project_init.pro` 
     40; :ref:`cm_project.pro` 
    4141; 
    4242; :func:`x_site_location` 
     
    5151; :: 
    5252; 
    53 ;  IDL> @tropflux_init 
    5453;  IDL> date1=19890101L 
    5554;  IDL> date2=20091231L 
     
    8988pro sst_validation_scatter_2000_2009_basin, date1, date2 
    9089@cm_general 
    91 @cm_tropflux 
     90@cm_project 
    9291reinitplt, /z,/invert 
    9392key_portrait = 1 
     
    126125close,/all 
    127126 
    128 fi_sst_erai=tropflux_id_env+'sst_2000_2009_erai_'+ocean+'.txt' 
     127fi_sst_erai=project_id_env+'sst_2000_2009_erai_'+ocean+'.txt' 
    129128openw,1,fi_sst_erai 
    130 fi_sst_trop=tropflux_id_env+'sst_2000_2009_trop_'+ocean+'.txt' 
     129fi_sst_trop=project_id_env+'sst_2000_2009_trop_'+ocean+'.txt' 
    131130openw,2,fi_sst_trop 
    132 fi_sst_oaflx=tropflux_id_env+'sst_2000_2009_oaflx_'+ocean+'.txt' 
     131fi_sst_oaflx=project_id_env+'sst_2000_2009_oaflx_'+ocean+'.txt' 
    133132openw,3,fi_sst_oaflx 
    134 fi_sst_ncep=tropflux_id_env+'sst_2000_2009_ncep_'+ocean+'.txt' 
     133fi_sst_ncep=project_id_env+'sst_2000_2009_ncep_'+ocean+'.txt' 
    135134openw,4,fi_sst_ncep 
    136 fi_sst_tmi=tropflux_id_env+'sst_2000_2009_tmi_'+ocean+'.txt' 
     135fi_sst_tmi=project_id_env+'sst_2000_2009_tmi_'+ocean+'.txt' 
    137136openw,5,fi_sst_tmi 
    138 fi_sst_ncep1=tropflux_id_env+'sst_2000_2009_ncep1_'+ocean+'.txt' 
     137fi_sst_ncep1=project_id_env+'sst_2000_2009_ncep1_'+ocean+'.txt' 
    139138openw,6,fi_sst_ncep1 
    140139 
     
    228227close,/all 
    229228 
    230 fi_sst_erai=tropflux_id_env+'sst_2000_2009_erai_'+ocean+'.txt' 
     229fi_sst_erai=project_id_env+'sst_2000_2009_erai_'+ocean+'.txt' 
    231230res=read_ascii(fi_sst_erai,data_start=1) 
    232231ff=res.field1 
     
    254253oplot, mean_tao, yfit, color=250, thick=2 
    255254 
    256 fi_sst_trop=tropflux_id_env+'sst_2000_2009_trop_'+ocean+'.txt' 
     255fi_sst_trop=project_id_env+'sst_2000_2009_trop_'+ocean+'.txt' 
    257256res=read_ascii(fi_sst_trop,data_start=1) 
    258257ff=res.field1 
     
    281280oplot, mean_tao, yfit, color=250, thick=2 
    282281 
    283 fi_sst_oaflx=tropflux_id_env+'sst_2000_2009_oaflx_'+ocean+'.txt' 
     282fi_sst_oaflx=project_id_env+'sst_2000_2009_oaflx_'+ocean+'.txt' 
    284283res=read_ascii(fi_sst_oaflx,data_start=1) 
    285284ff=res.field1 
     
    310309 
    311310 
    312 fi_sst_ncep=tropflux_id_env+'sst_2000_2009_ncep_'+ocean+'.txt' 
     311fi_sst_ncep=project_id_env+'sst_2000_2009_ncep_'+ocean+'.txt' 
    313312res=read_ascii(fi_sst_ncep,data_start=1) 
    314313ff=res.field1 
     
    338337 
    339338 
    340 fi_sst_tmi=tropflux_id_env+'sst_2000_2009_tmi_'+ocean+'.txt' 
     339fi_sst_tmi=project_id_env+'sst_2000_2009_tmi_'+ocean+'.txt' 
    341340res=read_ascii(fi_sst_tmi,data_start=1) 
    342341ff=res.field1 
     
    365364oplot, mean_tao, yfit, color=250, thick=2 
    366365 
    367 fi_sst_ncep1=tropflux_id_env+'sst_2000_2009_ncep1_'+ocean+'.txt' 
     366fi_sst_ncep1=project_id_env+'sst_2000_2009_ncep1_'+ocean+'.txt' 
    368367res=read_ascii(fi_sst_ncep1,data_start=1) 
    369368ff=res.field1 
     
    394393closeps 
    395394 
    396 fig=tropflux_od_env+'sst_validation_scatter_2000_2009_'+ocean+'.ps' 
     395fig=project_od_env+'sst_validation_scatter_2000_2009_'+ocean+'.ps' 
    397396spawn, 'mv '+psdir+'idl.ps '+fig 
    398397spawn, 'gv '+fig 
  • trunk/src/paper01/fig7/ws_validation_scatter_2000_2009_basin.pro

    r46 r50  
    1616;       rankdir="LR", 
    1717;       ] 
    18 ;       ws_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/ws_2000_2009_erai_*.txt"]; 
    19 ;       ws_tropflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/ws_2000_2009_trop_*.txt"]; 
    20 ;       ws_oaflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/ws_2000_2009_oaflx_*.txt"]; 
    21 ;       ws_ncep [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/ws_2000_2009_ncep_*.txt"]; 
    22 ;       ws_ncep1 [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/ws_2000_2009_ncep1_*.txt"]; 
    23 ;       ws_tmi [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/ws_2000_2009_tmi_*.txt"]; 
    24 ; 
    25 ;       figure [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/ws_validation_scatter_2000_2009_basin.ps"]; 
     18;       ws_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/ws_2000_2009_erai_*.txt"]; 
     19;       ws_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/ws_2000_2009_trop_*.txt"]; 
     20;       ws_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/ws_2000_2009_oaflx_*.txt"]; 
     21;       ws_ncep [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/ws_2000_2009_ncep_*.txt"]; 
     22;       ws_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/ws_2000_2009_ncep1_*.txt"]; 
     23;       ws_tmi [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/ws_2000_2009_tmi_*.txt"]; 
     24; 
     25;       figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/ws_validation_scatter_2000_2009_basin.ps"]; 
    2626; 
    2727;       ws_validation_scatter_2000_2009_basin [shape=box, 
     
    3737; ======== 
    3838; 
    39 ; :ref:`tropflux_profile.sh` 
    40 ; :ref:`tropflux_init.pro` 
    41 ; :ref:`cm_tropflux.pro` 
     39; :ref:`project_profile.sh` 
     40; :ref:`project_init.pro` 
     41; :ref:`cm_project.pro` 
    4242; 
    4343; :func:`x_site_location` 
     
    5252; :: 
    5353; 
    54 ;  IDL> @tropflux_init 
    5554;  IDL> date1=19890101L 
    5655;  IDL> date2=20091231L 
     
    8483pro ws_validation_scatter_2000_2009_basin,date1,date2 
    8584@cm_general 
    86 @cm_tropflux 
     85@cm_project 
    8786reinitplt, /z,/invert 
    8887key_portrait = 1 
     
    143142close,/all 
    144143 
    145 fi_ws_erai=tropflux_id_env+'ws_2000_2009_erai_'+ocean+'.txt' 
     144fi_ws_erai=project_id_env+'ws_2000_2009_erai_'+ocean+'.txt' 
    146145openw,1,fi_ws_erai 
    147 fi_ws_trop=tropflux_id_env+'ws_2000_2009_trop_'+ocean+'.txt' 
     146fi_ws_trop=project_id_env+'ws_2000_2009_trop_'+ocean+'.txt' 
    148147openw,2,fi_ws_trop 
    149 fi_ws_oaflx=tropflux_id_env+'ws_2000_2009_oaflx_'+ocean+'.txt' 
     148fi_ws_oaflx=project_id_env+'ws_2000_2009_oaflx_'+ocean+'.txt' 
    150149openw,3,fi_ws_oaflx 
    151 fi_ws_ncep=tropflux_id_env+'ws_2000_2009_ncep_'+ocean+'.txt' 
     150fi_ws_ncep=project_id_env+'ws_2000_2009_ncep_'+ocean+'.txt' 
    152151openw,4,fi_ws_ncep 
    153 fi_ws_tmi=tropflux_id_env+'ws_2000_2009_tmi_'+ocean+'.txt' 
     152fi_ws_tmi=project_id_env+'ws_2000_2009_tmi_'+ocean+'.txt' 
    154153openw,5,fi_ws_tmi 
    155 fi_ws_ncep1=tropflux_id_env+'ws_2000_2009_ncep1_'+ocean+'.txt' 
     154fi_ws_ncep1=project_id_env+'ws_2000_2009_ncep1_'+ocean+'.txt' 
    156155openw,6,fi_ws_ncep1 
    157156 
     
    167166;; date1=20000101 & date2=20090931 
    168167 
    169 file=tropflux_id_env+'erai_ws_19890101_20091231_oafluxgrid.nc' 
     168file=project_id_env+'erai_ws_19890101_20091231_oafluxgrid.nc' 
    170169initncdf, file 
    171170u=read_ncdf('u10',date1,date2,file=file,/nostr) 
     
    244243endfor 
    245244close,/all 
    246 fi_ws_erai=tropflux_id_env+'ws_2000_2009_erai_'+ocean+'.txt' 
     245fi_ws_erai=project_id_env+'ws_2000_2009_erai_'+ocean+'.txt' 
    247246res=read_ascii(fi_ws_erai,data_start=1) 
    248247ff=res.field1 
     
    270269oplot, mean_tao, yfit, color=250, thick=2 
    271270 
    272 fi_ws_trop=tropflux_id_env+'ws_2000_2009_trop_'+ocean+'.txt' 
     271fi_ws_trop=project_id_env+'ws_2000_2009_trop_'+ocean+'.txt' 
    273272res=read_ascii(fi_ws_trop,data_start=1) 
    274273ff=res.field1 
     
    297296oplot, mean_tao, yfit, color=250, thick=2 
    298297 
    299 fi_ws_oaflx=tropflux_id_env+'ws_2000_2009_oaflx_'+ocean+'.txt' 
     298fi_ws_oaflx=project_id_env+'ws_2000_2009_oaflx_'+ocean+'.txt' 
    300299res=read_ascii(fi_ws_oaflx,data_start=1) 
    301300ff=res.field1 
     
    326325 
    327326 
    328 fi_ws_ncep=tropflux_id_env+'ws_2000_2009_ncep_'+ocean+'.txt' 
     327fi_ws_ncep=project_id_env+'ws_2000_2009_ncep_'+ocean+'.txt' 
    329328res=read_ascii(fi_ws_ncep,data_start=1) 
    330329ff=res.field1 
     
    353352oplot, mean_tao, yfit, color=250, thick=2 
    354353 
    355 fi_ws_tmi=tropflux_id_env+'ws_2000_2009_tmi_'+ocean+'.txt' 
     354fi_ws_tmi=project_id_env+'ws_2000_2009_tmi_'+ocean+'.txt' 
    356355res=read_ascii(fi_ws_tmi,data_start=1) 
    357356ff=res.field1 
     
    381380 
    382381 
    383 fi_ws_ncep1=tropflux_id_env+'ws_2000_2009_ncep1_'+ocean+'.txt' 
     382fi_ws_ncep1=project_id_env+'ws_2000_2009_ncep1_'+ocean+'.txt' 
    384383res=read_ascii(fi_ws_ncep1,data_start=1) 
    385384ff=res.field1 
     
    410409closeps 
    411410 
    412 fig=tropflux_od_env+'ws_validation_scatter_2000_2009_'+ocean+'.ps' 
     411fig=project_od_env+'ws_validation_scatter_2000_2009_'+ocean+'.ps' 
    413412spawn, 'mv '+psdir+'idl.ps '+fig 
    414413spawn, 'gv '+fig 
Note: See TracChangeset for help on using the changeset viewer.