Changeset 50 for trunk/src/paper01/fig8
- Timestamp:
- 04/29/11 11:09:12 (13 years ago)
- Location:
- trunk/src/paper01/fig8
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/paper01/fig8/lhf_validation_scatter_2000_2009.pro
r46 r50 15 15 ; rankdir="LR", 16 16 ; ] 17 ; lhf_erai [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/lhf_2000_2009_erai_v52.txt"];18 ; lhf_tropflux [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/lhf_2000_2009_trop_v52.txt"];19 ; lhf_oaflux [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/lhf_2000_2009_oaflx_v52.txt"];20 ; lhf_ncep [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/lhf_2000_2009_ncep_v52.txt"];21 ; lhf_ncep2_oafluxgrid [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/lhf_ncep2_oafluxgrid_19890101_20091231.nc"];22 ; lhf_ncep1 [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/lhf_2000_2009_ncep1_v52.txt"];23 ; lhf_ncep1_2 [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/fluxe_ncep1_19890101_20091231.nc"];24 ; lhf_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/erai_lhf_19890101_20091231_oafluxgrid.nc"];25 ; lhf_tropflux2 [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/TropFlux_19890101_20091231.nc"];26 ; lhf_oafluxgrid [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/lhf_oafluxgrid_1985_2009.nc"];27 ; 28 ; figure [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/lhf_validation_scatter_2000_2009.ps"];17 ; lhf_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lhf_2000_2009_erai_v52.txt"]; 18 ; lhf_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lhf_2000_2009_trop_v52.txt"]; 19 ; lhf_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lhf_2000_2009_oaflx_v52.txt"]; 20 ; lhf_ncep [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lhf_2000_2009_ncep_v52.txt"]; 21 ; lhf_ncep2_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lhf_ncep2_oafluxgrid_19890101_20091231.nc"]; 22 ; lhf_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lhf_2000_2009_ncep1_v52.txt"]; 23 ; lhf_ncep1_2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/fluxe_ncep1_19890101_20091231.nc"]; 24 ; lhf_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_lhf_19890101_20091231_oafluxgrid.nc"]; 25 ; lhf_tropflux2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_19890101_20091231.nc"]; 26 ; lhf_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lhf_oafluxgrid_1985_2009.nc"]; 27 ; 28 ; figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/lhf_validation_scatter_2000_2009.ps"]; 29 29 ; 30 30 ; lhf_validation_scatter_2000_2009 [shape=box, … … 40 40 ; ======== 41 41 ; 42 ; :ref:` tropflux_profile.sh`43 ; :ref:` tropflux_init.pro`44 ; :ref:`cm_ tropflux.pro`42 ; :ref:`project_profile.sh` 43 ; :ref:`project_init.pro` 44 ; :ref:`cm_project.pro` 45 45 ; 46 46 ; :func:`x_site_location` … … 55 55 ; :: 56 56 ; 57 ; IDL> @tropflux_init58 57 ; IDL> date1=19890101L 59 58 ; IDL> date2=20091231L … … 93 92 pro lhf_validation_scatter_2000_2009,date1,date2 94 93 @cm_general 95 @cm_ tropflux94 @cm_project 96 95 reinitplt, /z,/invert 97 96 key_portrait = 1 … … 119 118 close,/all 120 119 121 fi_lhf_erai= tropflux_id_env+'lhf_2000_2009_erai_v52.txt'120 fi_lhf_erai=project_id_env+'lhf_2000_2009_erai_v52.txt' 122 121 openw,1,fi_lhf_erai 123 fi_lhf_trop= tropflux_id_env+'lhf_2000_2009_trop_v52.txt'122 fi_lhf_trop=project_id_env+'lhf_2000_2009_trop_v52.txt' 124 123 openw,2,fi_lhf_trop 125 fi_lhf_oaflx= tropflux_id_env+'lhf_2000_2009_oaflx_v52.txt'124 fi_lhf_oaflx=project_id_env+'lhf_2000_2009_oaflx_v52.txt' 126 125 openw,3,fi_lhf_oaflx 127 fi_lhf_ncep= tropflux_id_env+'lhf_2000_2009_ncep_v52.txt'126 fi_lhf_ncep=project_id_env+'lhf_2000_2009_ncep_v52.txt' 128 127 openw,4,fi_lhf_ncep 129 fi_lhf_ncep1= tropflux_id_env+'lhf_2000_2009_ncep1_v52.txt'128 fi_lhf_ncep1=project_id_env+'lhf_2000_2009_ncep1_v52.txt' 130 129 openw,5,fi_lhf_ncep1 131 130 … … 138 137 ;; first reading the whole ERAI uncorrected and corrected data 139 138 140 file= tropflux_id_env+'erai_lhf_19890101_20091231_oafluxgrid.nc'139 file=project_id_env+'erai_lhf_19890101_20091231_oafluxgrid.nc' 141 140 initncdf, file 142 141 unc=read_ncdf('lhf',date1,date2,file=file,/nostr) 143 142 help, unc 144 143 145 file= tropflux_id_env+"TropFlux_19890101_20091231.nc"144 file=project_id_env+"TropFlux_19890101_20091231.nc" 146 145 initncdf, file 147 146 cor=read_ncdf('lhf',date1,date2,file=file,/nostr) … … 149 148 help, cor 150 149 151 file= tropflux_id_env+'lhf_oafluxgrid_1985_2009.nc'150 file=project_id_env+'lhf_oafluxgrid_1985_2009.nc' 152 151 initncdf, file 153 152 oaf=read_ncdf("lhf", date1, date2, file=file,/nostr) 154 153 help, oaf 155 154 156 fi= tropflux_id_env+'lhf_ncep2_oafluxgrid_19890101_20091231.nc'155 fi=project_id_env+'lhf_ncep2_oafluxgrid_19890101_20091231.nc' 157 156 initncdf, fi 158 157 nce=read_ncdf("lhf", date1, date2, file=fi,/nostr) 159 158 help, nce 160 159 161 file= tropflux_id_env+'fluxe_ncep1_19890101_20091231.nc'160 file=project_id_env+'fluxe_ncep1_19890101_20091231.nc' 162 161 initncdf, file 163 162 nce1=-1*read_ncdf("lhf", date1, date2, file=file,/nostr) … … 228 227 close,/all 229 228 230 fi_lhf_erai= tropflux_id_env+'lhf_2000_2009_erai_v52.txt'229 fi_lhf_erai=project_id_env+'lhf_2000_2009_erai_v52.txt' 231 230 res=read_ascii(fi_lhf_erai,data_start=1) 232 231 ff=res.field1 … … 259 258 oplot, [20,200], [20,200] 260 259 261 fi_lhf_trop= tropflux_id_env+'lhf_2000_2009_trop_v52.txt'260 fi_lhf_trop=project_id_env+'lhf_2000_2009_trop_v52.txt' 262 261 res=read_ascii(fi_lhf_trop,data_start=1) 263 262 ff=res.field1 … … 291 290 292 291 293 fi_lhf_oaflx= tropflux_id_env+'lhf_2000_2009_oaflx_v52.txt'292 fi_lhf_oaflx=project_id_env+'lhf_2000_2009_oaflx_v52.txt' 294 293 res=read_ascii(fi_lhf_oaflx,data_start=1) 295 294 ff=res.field1 … … 322 321 oplot, [20,200], [20,200] 323 322 324 fi_lhf_ncep= tropflux_id_env+'lhf_2000_2009_ncep_v52.txt'323 fi_lhf_ncep=project_id_env+'lhf_2000_2009_ncep_v52.txt' 325 324 res=read_ascii(fi_lhf_ncep,data_start=1) 326 325 ff=res.field1 … … 353 352 oplot, [20,200], [20,200] 354 353 355 fi_lhf_ncep1= tropflux_id_env+'lhf_2000_2009_ncep1_v52.txt'354 fi_lhf_ncep1=project_id_env+'lhf_2000_2009_ncep1_v52.txt' 356 355 res=read_ascii(fi_lhf_ncep1,data_start=1) 357 356 ff=res.field1 … … 386 385 closeps 387 386 388 fig= tropflux_od_env+'lhf_validation_scatter_2000_2009.ps'387 fig=project_od_env+'lhf_validation_scatter_2000_2009.ps' 389 388 spawn, 'mv '+psdir+'idl.ps '+fig 390 389 spawn, 'gv '+fig -
trunk/src/paper01/fig8/shf_validation_scatter_2000_2009.pro
r46 r50 15 15 ; rankdir="LR", 16 16 ; ] 17 ; shf_erai [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/shf_2000_2009_erai_v52.txt"];18 ; shf_tropflux [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/shf_2000_2009_trop_v52.txt"];19 ; shf_oaflux [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/shf_2000_2009_oaflx_v52.txt"];20 ; shf_ncep [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/shf_2000_2009_ncep_v52.txt"];21 ; shf_ncep2_oafluxgrid [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/shf_ncep2_oafluxgrid_19890101_20091231.nc"];22 ; shf_ncep1 [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/shf_2000_2009_ncep1_v52.txt"];23 ; shf_ncep1_2 [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/fluxe_ncep1_19890101_20091231.nc"];24 ; shf_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/erai_shf_19890101_20091231_oafluxgrid.nc"];25 ; shf_tropflux2 [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/TropFlux_19890101_20091231.nc"];26 ; shf_oafluxgrid [shape=ellipse,fontname=Courier,label="${ TROPFLUX_ID}/shf_oafluxgrid_1985_2009.nc"];27 ; 28 ; figure [shape=ellipse,fontname=Courier,label="${ TROPFLUX_OD}/shf_validation_scatter_2000_2009.ps"];17 ; shf_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/shf_2000_2009_erai_v52.txt"]; 18 ; shf_tropflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/shf_2000_2009_trop_v52.txt"]; 19 ; shf_oaflux [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/shf_2000_2009_oaflx_v52.txt"]; 20 ; shf_ncep [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/shf_2000_2009_ncep_v52.txt"]; 21 ; shf_ncep2_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/shf_ncep2_oafluxgrid_19890101_20091231.nc"]; 22 ; shf_ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/shf_2000_2009_ncep1_v52.txt"]; 23 ; shf_ncep1_2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/fluxe_ncep1_19890101_20091231.nc"]; 24 ; shf_erai_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_shf_19890101_20091231_oafluxgrid.nc"]; 25 ; shf_tropflux2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_19890101_20091231.nc"]; 26 ; shf_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/shf_oafluxgrid_1985_2009.nc"]; 27 ; 28 ; figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/shf_validation_scatter_2000_2009.ps"]; 29 29 ; 30 30 ; shf_validation_scatter_2000_2009 [shape=box, … … 40 40 ; ======== 41 41 ; 42 ; :ref:` tropflux_profile.sh`43 ; :ref:` tropflux_init.pro`44 ; :ref:`cm_ tropflux.pro`42 ; :ref:`project_profile.sh` 43 ; :ref:`project_init.pro` 44 ; :ref:`cm_project.pro` 45 45 ; 46 46 ; :func:`x_site_location` … … 55 55 ; :: 56 56 ; 57 ; IDL> @tropflux_init58 57 ; IDL> date1=19890101L 59 58 ; IDL> date2=20091231L … … 93 92 pro shf_validation_scatter_2000_2009, date1, date2 94 93 @cm_general 95 @cm_ tropflux94 @cm_project 96 95 reinitplt, /z,/invert 97 96 key_portrait = 1 … … 120 119 close,/all 121 120 122 fi_shf_erai= tropflux_id_env+'shf_2000_2009_erai_v52.txt'121 fi_shf_erai=project_id_env+'shf_2000_2009_erai_v52.txt' 123 122 openw,1,fi_shf_erai 124 fi_shf_trop= tropflux_id_env+'shf_2000_2009_trop_v52.txt'123 fi_shf_trop=project_id_env+'shf_2000_2009_trop_v52.txt' 125 124 openw,2,fi_shf_trop 126 fi_shf_oaflx= tropflux_id_env+'shf_2000_2009_oaflx_v52.txt'125 fi_shf_oaflx=project_id_env+'shf_2000_2009_oaflx_v52.txt' 127 126 openw,3,fi_shf_oaflx 128 fi_shf_ncep= tropflux_id_env+'shf_2000_2009_ncep_v52.txt'127 fi_shf_ncep=project_id_env+'shf_2000_2009_ncep_v52.txt' 129 128 openw,4,fi_shf_ncep 130 129 131 fi_shf_ncep1= tropflux_id_env+'shf_2000_2009_ncep1_v52.txt'130 fi_shf_ncep1=project_id_env+'shf_2000_2009_ncep1_v52.txt' 132 131 openw,5,fi_shf_ncep1 133 132 … … 141 140 ;; first reading the whole ERAI uncorrected and corrected data 142 141 143 file= tropflux_id_env+'erai_shf_19890101_20091231_oafluxgrid.nc'142 file=project_id_env+'erai_shf_19890101_20091231_oafluxgrid.nc' 144 143 initncdf, file 145 144 unc=read_ncdf('shf',date1,date2,file=file,/nostr) 146 145 help, unc 147 146 148 file= tropflux_id_env+'TropFlux_19890101_20091231_v51.nc'147 file=project_id_env+'TropFlux_19890101_20091231_v51.nc' 149 148 initncdf, file 150 149 cor=read_ncdf('shf',date1,date2,file=file,/nostr) … … 152 151 help, cor 153 152 154 file= tropflux_id_env+'shf_oafluxgrid_1985_2009.nc'153 file=project_id_env+'shf_oafluxgrid_1985_2009.nc' 155 154 initncdf, file 156 155 oaf=read_ncdf("shf", date1, date2, file=file,/nostr) 157 156 help, oaf 158 157 159 fi= tropflux_id_env+'shf_ncep2_oafluxgrid_19890101_20091231.nc'158 fi=project_id_env+'shf_ncep2_oafluxgrid_19890101_20091231.nc' 160 159 initncdf, fi 161 160 nce=read_ncdf("shf", date1, date2, file=fi,/nostr) 162 161 help, nce 163 162 164 file= tropflux_id_env+'fluxe_ncep1_19890101_20091231.nc'163 file=project_id_env+'fluxe_ncep1_19890101_20091231.nc' 165 164 initncdf, file 166 165 nce1=-1*read_ncdf("shf", date1, date2, file=file,/nostr) … … 228 227 close,/all 229 228 230 fi_shf_erai= tropflux_id_env+'shf_2000_2009_erai_v52.txt'229 fi_shf_erai=project_id_env+'shf_2000_2009_erai_v52.txt' 231 230 res=read_ascii(fi_shf_erai,data_start=1) 232 231 ff=res.field1 … … 260 259 261 260 262 fi_shf_trop= tropflux_id_env+'shf_2000_2009_trop_v52.txt'261 fi_shf_trop=project_id_env+'shf_2000_2009_trop_v52.txt' 263 262 res=read_ascii(fi_shf_trop,data_start=1) 264 263 ff=res.field1 … … 292 291 293 292 294 fi_shf_oaflx= tropflux_id_env+'shf_2000_2009_oaflx_v52.txt'293 fi_shf_oaflx=project_id_env+'shf_2000_2009_oaflx_v52.txt' 295 294 res=read_ascii(fi_shf_oaflx,data_start=1) 296 295 ff=res.field1 … … 323 322 oplot, [-5,25], [-5,25] 324 323 325 fi_shf_ncep= tropflux_id_env+'shf_2000_2009_ncep_v52.txt'324 fi_shf_ncep=project_id_env+'shf_2000_2009_ncep_v52.txt' 326 325 res=read_ascii(fi_shf_ncep,data_start=1) 327 326 ff=res.field1 … … 354 353 oplot, [-5,25], [-5,25] 355 354 356 fi_shf_ncep1= tropflux_id_env+'shf_2000_2009_ncep1_v52.txt'355 fi_shf_ncep1=project_id_env+'shf_2000_2009_ncep1_v52.txt' 357 356 res=read_ascii(fi_shf_ncep1,data_start=1) 358 357 ff=res.field1 … … 387 386 closeps 388 387 389 fig= tropflux_od_env+'shf_validation_scatter_2000_2009.ps'388 fig=project_od_env+'shf_validation_scatter_2000_2009.ps' 390 389 spawn, 'mv '+psdir+'idl.ps '+fig 391 390 spawn, 'gv '+fig
Note: See TracChangeset
for help on using the changeset viewer.