Changeset 50 for trunk/src/paper01/fig9


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

replace TROPFLUX by PROJECT

Location:
trunk/src/paper01/fig9
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/src/paper01/fig9/lwr_validation_scatter_2000_2007.pro

    r46 r50  
    1515;       rankdir="LR", 
    1616;       ] 
    17 ;       lwr_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/lwr_2000_2007_erai.txt"]; 
    18 ;       lwr_tropflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/lwr_2000_2007_trop.txt"]; 
    19 ;       lwr_oaflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/lwr_2000_2007_oaflx.txt"]; 
    20 ;       lwr_ncep [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/lwr_2000_2007_ncep.txt"]; 
    21 ;       lwr_ncep1 [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/lwr_2000_2007_ncep1.txt"]; 
    22 ;       lwr_ncep1_2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/fluxe_ncep1_19890101_20091231.nc"]; 
    23 ;       lwr_clark [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/lwr_2000_2007_clark.txt"]; 
    24 ;       lwr_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_fluxes_19930101_20090801_TROP_oafluxgrid.nc"]; 
    25 ;       lwr_tropflux2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/TropFlux_lwr_19890101_20091231.nc"]; 
    26 ;       lwr_tropflux3 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/TropFlux_19890101_20091231.nc"]; 
    27 ;       lwr_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/lwr_oafluxgrid_1985_2007.nc"]; 
    28 ;       lwr_ncep2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/NCEP2_flux_19890101_20090729.nc"]; 
    29 ; 
    30 ;       figure [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/lwr_validation_scatter_2000_2007.ps"]; 
     17;       lwr_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lwr_2000_2007_erai.txt"]; 
     18;       lwr_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lwr_2000_2007_trop.txt"]; 
     19;       lwr_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lwr_2000_2007_oaflx.txt"]; 
     20;       lwr_ncep [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lwr_2000_2007_ncep.txt"]; 
     21;       lwr_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lwr_2000_2007_ncep1.txt"]; 
     22;       lwr_ncep1_2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/fluxe_ncep1_19890101_20091231.nc"]; 
     23;       lwr_clark [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lwr_2000_2007_clark.txt"]; 
     24;       lwr_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_fluxes_19930101_20090801_TROP_oafluxgrid.nc"]; 
     25;       lwr_tropflux2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_lwr_19890101_20091231.nc"]; 
     26;       lwr_tropflux3 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_19890101_20091231.nc"]; 
     27;       lwr_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lwr_oafluxgrid_1985_2007.nc"]; 
     28;       lwr_ncep2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/NCEP2_flux_19890101_20090729.nc"]; 
     29; 
     30;       figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lwr_validation_scatter_2000_2007.ps"]; 
    3131; 
    3232;       lwr_validation_scatter_2000_2007 [shape=box, 
    … …  
    4242; ======== 
    4343; 
    44 ; :ref:`tropflux_profile.sh` 
    45 ; 
    46 ; :ref:`tropflux_init.pro` 
    47 ; :ref:`cm_tropflux.pro` 
     44; :ref:`project_profile.sh` 
     45; 
     46; :ref:`project_init.pro` 
     47; :ref:`cm_project.pro` 
    4848; 
    4949; :func:`x_site_location` 
    … …  
    5858; :: 
    5959; 
    60 ;  IDL> @tropflux_init 
    6160;  IDL> date1=19890101L 
    6261;  IDL> date2=20091231L 
    … …  
    9695pro lwr_validation_scatter_2000_2007, date1, date2 
    9796@cm_general 
    98 @cm_tropflux 
     97@cm_project 
    9998reinitplt, /z,/invert 
    10099key_portrait = 1 
    … …  
    126125close,/all 
    127126 
    128 fi_lwr_erai=tropflux_id_env+'lwr_2000_2007_erai.txt' 
     127fi_lwr_erai=project_id_env+'lwr_2000_2007_erai.txt' 
    129128openw,1,fi_lwr_erai 
    130 fi_lwr_trop=tropflux_id_env+'lwr_2000_2007_trop.txt' 
     129fi_lwr_trop=project_id_env+'lwr_2000_2007_trop.txt' 
    131130openw,2,fi_lwr_trop 
    132 fi_lwr_oaflx=tropflux_id_env+'lwr_2000_2007_oaflx.txt' 
     131fi_lwr_oaflx=project_id_env+'lwr_2000_2007_oaflx.txt' 
    133132openw,3,fi_lwr_oaflx 
    134 fi_lwr_ncep=tropflux_id_env+'lwr_2000_2007_ncep.txt' 
     133fi_lwr_ncep=project_id_env+'lwr_2000_2007_ncep.txt' 
    135134openw,4,fi_lwr_ncep 
    136 fi_lwr_ncep1=tropflux_id_env+'lwr_2000_2007_ncep1.txt' 
     135fi_lwr_ncep1=project_id_env+'lwr_2000_2007_ncep1.txt' 
    137136openw,5,fi_lwr_ncep1 
    138 fi_lwr_clark=tropflux_id_env+'lwr_2000_2007_clark.txt' 
     137fi_lwr_clark=project_id_env+'lwr_2000_2007_clark.txt' 
    139138openw,6,fi_lwr_clark 
    140139 
    … …  
    148147;; first reading the whole ERAI uncorrected and corrected data 
    149148 
    150 file=tropflux_id_env+'erai_fluxes_19930101_20090801_TROP_oafluxgrid.nc' 
     149file=project_id_env+'erai_fluxes_19930101_20090801_TROP_oafluxgrid.nc' 
    151150initncdf, file 
    152151unc=read_ncdf('lwr',date1,date2,file=file,/nostr) 
    153152help, unc 
    154153 
    155 file=tropflux_id_env+'TropFlux_lwr_19890101_20091231.nc" 
     154file=project_id_env+'TropFlux_lwr_19890101_20091231.nc" 
    156155initncda, file 
    157156cor=read_ncdf('lwr',date1,date2,file=file,/nostr) & cor=-1*cor 
    158157help, cor 
    159158 
    160 file=tropflux_id_env+'lwr_oafluxgrid_1985_2007.nc' 
     159file=project_id_env+'lwr_oafluxgrid_1985_2007.nc' 
    161160initncdf, file 
    162161oaf=read_ncdf("lwr", date1, date2, file=file,/nostr) 
    163162help, oaf 
    164163 
    165 fi=tropflux_id_env+'NCEP2_flux_19890101_20090729.nc' 
     164fi=project_id_env+'NCEP2_flux_19890101_20090729.nc' 
    166165initncdf, fi 
    167166nce=read_ncdf("lwr", date1, date2, file=fi,/nostr) ;;  & nce=-1*nce 
    168167help, nce 
    169168 
    170 file=tropflux_id_env+'fluxe_ncep1_19890101_20091231.nc' 
     169file=project_id_env+'fluxe_ncep1_19890101_20091231.nc' 
    171170initncdf, file 
    172171nce1=-1*read_ncdf("lwr", date1, date2, file=file,/nostr) 
    173172help, nce1 
    174173 
    175 file=tropflux_id_env+'TropFlux_19890101_20091231.nc' 
     174file=project_id_env+'TropFlux_19890101_20091231.nc' 
    176175initncdf, file 
    177176clark=-1*read_ncdf("lwr", date1, date2, file=file,/nostr) 
    … …  
    245244close,/all 
    246245 
    247 fi_lwr_erai=tropflux_id_env+'lwr_2000_2007_erai.txt' 
     246fi_lwr_erai=project_id_env+'lwr_2000_2007_erai.txt' 
    248247res=read_ascii(fi_lwr_erai,data_start=1) 
    249248ff=res.field1 
    … …  
    278277significance_test, mean_tao, mean_erai 
    279278 
    280 fi_lwr_trop=tropflux_id_env+'lwr_2000_2007_trop.txt' 
     279fi_lwr_trop=project_id_env+'lwr_2000_2007_trop.txt' 
    281280res=read_ascii(fi_lwr_trop,data_start=1) 
    282281ff=res.field1 
    … …  
    311310significance_test, mean_tao, mean_trop 
    312311 
    313 fi_lwr_oaflx=tropflux_id_env+'lwr_2000_2007_oaflx.txt' 
     312fi_lwr_oaflx=project_id_env+'lwr_2000_2007_oaflx.txt' 
    314313res=read_ascii(fi_lwr_oaflx,data_start=1) 
    315314ff=res.field1 
    … …  
    344343significance_test, mean_tao, mean_oaf 
    345344 
    346 fi_lwr_ncep=tropflux_id_env+'lwr_2000_2007_ncep.txt' 
     345fi_lwr_ncep=project_id_env+'lwr_2000_2007_ncep.txt' 
    347346res=read_ascii(fi_lwr_ncep,data_start=1) 
    348347ff=res.field1 
    … …  
    377376significance_test, mean_tao, mean_nce 
    378377 
    379 fi_lwr_ncep1=tropflux_id_env+'lwr_2000_2007_ncep1.txt' 
     378fi_lwr_ncep1=project_id_env+'lwr_2000_2007_ncep1.txt' 
    380379res=read_ascii(fi_lwr_ncep1,data_start=1) 
    381380ff=res.field1 
    … …  
    410409significance_test, mean_tao, mean_nce 
    411410 
    412 fi_lwr_clark=tropflux_id_env+'lwr_2000_2007_clark.txt' 
     411fi_lwr_clark=project_id_env+'lwr_2000_2007_clark.txt' 
    413412res=read_ascii(fi_lwr_clark,data_start=1) 
    414413ff=res.field1 
    … …  
    445444closeps 
    446445 
    447 fig=tropflux_od_env+'lwr_validation_scatter_2000_2007.ps' 
     446fig=project_od_env+'lwr_validation_scatter_2000_2007.ps' 
    448447spawn, 'mv '+psdir+'idl.ps '+fig 
    449448spawn, 'gv '+fig 

  • trunk/src/paper01/fig9/swr_validation_scatter_2000_2007.pro

    r46 r50  
    1515;       rankdir="LR", 
    1616;       ] 
    17 ;       swr_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/swr_2000_2007_erai_v50.txt"]; 
    18 ;       swr_tropflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/swr_2000_2007_trop_v50.txt"]; 
    19 ;       swr_oaflux [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/swr_2000_2007_oaflx_v50.txt"]; 
    20 ;       swr_ncep [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/swr_2000_2007_ncep_v50.txt"]; 
    21 ;       swr_ncep1 [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/swr_2000_2007_ncep1_v50.txt"]; 
    22 ;       swr_olr [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/swr_2000_2007_olr_v50.txt"]; 
    23 ;       swr_ncep1_2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/fluxe_ncep1_19890101_20091231.nc"]; 
    24 ;       swr_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_fluxes_20000101_20090801_TROP_oafluxgrid.nc"]; 
    25 ;       swr_tropflux2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/TropFlux_swr_19890101_20091231_DT_v51.nc"]; 
    26 ;       swr_tropflux3 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/TropFlux_19890101_20091231.nc"]; 
    27 ;       swr_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/swr_oafluxgrid_1985_2007.nc"]; 
    28 ;       swr_ncep2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/swr_ncep2_oaflxgrid_19890101_20091231.nc"]; 
    29 ; 
    30 ;       figure [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/swr_validation_scatter_2000_2007.ps"]; 
     17;       swr_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/swr_2000_2007_erai_v50.txt"]; 
     18;       swr_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/swr_2000_2007_trop_v50.txt"]; 
     19;       swr_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/swr_2000_2007_oaflx_v50.txt"]; 
     20;       swr_ncep [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/swr_2000_2007_ncep_v50.txt"]; 
     21;       swr_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/swr_2000_2007_ncep1_v50.txt"]; 
     22;       swr_olr [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/swr_2000_2007_olr_v50.txt"]; 
     23;       swr_ncep1_2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/fluxe_ncep1_19890101_20091231.nc"]; 
     24;       swr_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_fluxes_20000101_20090801_TROP_oafluxgrid.nc"]; 
     25;       swr_tropflux2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_swr_19890101_20091231_DT_v51.nc"]; 
     26;       swr_tropflux3 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_19890101_20091231.nc"]; 
     27;       swr_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/swr_oafluxgrid_1985_2007.nc"]; 
     28;       swr_ncep2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/swr_ncep2_oaflxgrid_19890101_20091231.nc"]; 
     29; 
     30;       figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/swr_validation_scatter_2000_2007.ps"]; 
    3131; 
    3232;       swr_validation_scatter_2000_2007 [shape=box, 
    … …  
    4242; ======== 
    4343; 
    44 ; :ref:`tropflux_profile.sh` 
    45 ; :ref:`tropflux_init.pro` 
    46 ; :ref:`cm_tropflux.pro` 
     44; :ref:`project_profile.sh` 
     45; :ref:`project_init.pro` 
     46; :ref:`cm_project.pro` 
    4747; 
    4848; :func:`x_site_location` 
    … …  
    5757; :: 
    5858; 
    59 ;  IDL> @tropflux_init 
    6059;  IDL> date1=19890101L 
    6160;  IDL> date2=20091231L 
    … …  
    9594pro swr_validation_scatter_2000_2007, date1, date2 
    9695@cm_genral 
    97 @cm_tropflux 
     96@cm_project 
    9897reinitplt, /z,/invert 
    9998key_portrait = 1 
    … …  
    124123close,/all 
    125124 
    126 fi_swr_erai=tropflux_id_env+'swr_2000_2007_erai_v50.txt' 
     125fi_swr_erai=project_id_env+'swr_2000_2007_erai_v50.txt' 
    127126openw,1,fi_swr_erai 
    128 fi_swr_trop=tropflux_id_env+'swr_2000_2007_trop_v50.txt' 
     127fi_swr_trop=project_id_env+'swr_2000_2007_trop_v50.txt' 
    129128openw,2,fi_swr_trop 
    130 fi_swr_oaflx=tropflux_id_env+'swr_2000_2007_oaflx_v50.txt' 
     129fi_swr_oaflx=project_id_env+'swr_2000_2007_oaflx_v50.txt' 
    131130openw,3,fi_swr_oaflx 
    132 fi_swr_ncep=tropflux_id_env+'swr_2000_2007_ncep_v50.txt' 
     131fi_swr_ncep=project_id_env+'swr_2000_2007_ncep_v50.txt' 
    133132openw,4,fi_swr_ncep 
    134 fi_swr_ncep1=tropflux_id_env+'swr_2000_2007_ncep1_v50.txt' 
     133fi_swr_ncep1=project_id_env+'swr_2000_2007_ncep1_v50.txt' 
    135134openw,5,fi_swr_ncep1 
    136 fi_swr_olr=tropflux_id_env+'swr_2000_2007_olr_v50.txt' 
     135fi_swr_olr=project_id_env+'swr_2000_2007_olr_v50.txt' 
    137136openw,6,fi_swr_olr 
    138137 
    … …  
    147146;; first reading the whole ERAI uncorrected and corrected data 
    148147 
    149 file=tropflux_id_env+'erai_fluxes_20000101_20090801_TROP_oafluxgrid.nc' 
     148file=project_id_env+'erai_fluxes_20000101_20090801_TROP_oafluxgrid.nc' 
    150149initncdf, file 
    151150unc=read_ncdf('swr',date1,date2,file=file,/nostr) & unc=-1*unc 
    152151help, unc 
    153152 
    154 file=tropflux_id_env+'TropFlux_swr_19890101_20071231_DT_v51.nc' 
     153file=project_id_env+'TropFlux_swr_19890101_20071231_DT_v51.nc' 
    155154initncdf, file 
    156155cor=read_ncdf('swr',date1,date2,file=file,/nostr) 
    157156help, cor 
    158157 
    159 file=tropflux_id_env+'swr_oafluxgrid_1985_2007.nc' 
     158file=project_id_env+'swr_oafluxgrid_1985_2007.nc' 
    160159initncdf, file 
    161160oaf=read_ncdf("swr", date1, date2, file=file,/nostr) 
    162161help, oaf 
    163162 
    164 fi=tropflux_id_env+'swr_ncep2_oaflxgrid_19890101_20091231.nc' 
     163fi=project_id_env+'swr_ncep2_oaflxgrid_19890101_20091231.nc' 
    165164initncdf, fi 
    166165nce=read_ncdf("swr", date1, date2, file=fi,/nostr) & nce=0.94*nce 
    167166help, nce 
    168167 
    169 file=tropflux_id_env+'fluxe_ncep1_19890101_20091231.nc' 
     168file=project_id_env+'fluxe_ncep1_19890101_20091231.nc' 
    170169initncdf, file 
    171170nce1=read_ncdf("swr", date1, date2, file=file,/nostr) 
    172171help, nce1 
    173172 
    174 file=tropflux_id_env+'TropFlux_swr_19890101_20091231_NRT_v50.nc' 
     173file=project_id_env+'TropFlux_swr_19890101_20091231_NRT_v50.nc' 
    175174initncdf, file 
    176175sw_olr=read_ncdf("sw", date1-1, date2, file=file,/nostr) 
    … …  
    244243close,/all 
    245244 
    246 fi_swr_erai=tropflux_id_env+'swr_2000_2007_erai_v50.txt' 
     245fi_swr_erai=project_id_env+'swr_2000_2007_erai_v50.txt' 
    247246res=read_ascii(fi_swr_erai,data_start=1) 
    248247ff=res.field1 
    … …  
    276275 
    277276 
    278 fi_swr_trop=tropflux_id_env+'swr_2000_2007_trop_v50.txt' 
     277fi_swr_trop=project_id_env+'swr_2000_2007_trop_v50.txt' 
    279278res=read_ascii(fi_swr_trop,data_start=1) 
    280279ff=res.field1 
    … …  
    308307 
    309308 
    310 fi_swr_oaflx=tropflux_id_env+'swr_2000_2007_oaflx_v50.txt' 
     309fi_swr_oaflx=project_id_env+'swr_2000_2007_oaflx_v50.txt' 
    311310res=read_ascii(fi_swr_oaflx,data_start=1) 
    312311ff=res.field1 
    … …  
    340339 
    341340 
    342 fi_swr_ncep=tropflux_id_env+'swr_2000_2007_ncep_v50.txt' 
     341fi_swr_ncep=project_id_env+'swr_2000_2007_ncep_v50.txt' 
    343342res=read_ascii(fi_swr_ncep,data_start=1) 
    344343ff=res.field1 
    … …  
    372371 
    373372 
    374 fi_swr_ncep1=tropflux_id_env+'swr_2000_2007_ncep1_v50.txt' 
     373fi_swr_ncep1=project_id_env+'swr_2000_2007_ncep1_v50.txt' 
    375374res=read_ascii(fi_swr_ncep1,data_start=1) 
    376375ff=res.field1 
    … …  
    404403 
    405404 
    406 fi_swr_olr=tropflux_id_env+'swr_2000_2007_olr_v50.txt' 
     405fi_swr_olr=project_id_env+'swr_2000_2007_olr_v50.txt' 
    407406res=read_ascii(fi_swr_olr,data_start=1) 
    408407ff=res.field1 
    … …  
    438437closeps 
    439438 
    440 fig=tropflux_od_env+'swr_validation_scatter_2000_2007.ps' 
     439fig=project_od_env+'swr_validation_scatter_2000_2007.ps' 
    441440spawn, 'mv '+psdir+'idl.ps '+fig 
    442441spawn, 'gv '+fig 
Note: See TracChangeset for help on using the changeset viewer.