Changeset 50 for trunk/src/paper01/fig14/coare_validation_net_1992_93_all_v10.pro

Timestamp:

04/29/11 11:09:12 (13 years ago)

Author:

pinsard

Message:

replace TROPFLUX by PROJECT

File:

• trunk/src/paper01/fig14/coare_validation_net_1992_93_all_v10.pro (modified) (24 diffs)

trunk/src/paper01/fig14/coare_validation_net_1992_93_all_v10.pro

@@ -15 +15 @@
 ;       rankdir="LR",
 ;       ]
-;       met_data [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/met_data_as_expt_199*_p*.txt"];
-;       swr_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_swr_19910101_20091231_oafluxgrid.nc"];
-;       lwr_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_lwr_19910101_20091231_oafluxgrid.nc"];
-;       lhf_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_lhf_19910101_20091231_oafluxgrid.nc"];
-;       shf_erai [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/erai_shf_19910101_20091231_oafluxgrid.nc"];
-;       tropflux_general [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/TropFlux_19890101_20091231.nc"];
-;       swr_tropflux_nrt [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/TropFlux_swr_19890101_20091231_NRT_v50.nc"];
-;       swr_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/swr_oafluxgrid_1985_2007.nc"];
-;       lwr_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/lwr_oafluxgrid_1985_2007.nc"];
-;       lhf_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/lhf_oafluxgrid_1985_2007.nc"];
-;       shf_oafluxgrid [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/shf_oafluxgrid_1985_2007.nc"];
-;       swr_ncep2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/swr_ncep2_oaflxgrid_19890101_20091231.nc"];
-;       lwr_ncep2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/NCEP2_flux_19890101_20090729.nc"];
-;       lhf_ncep2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/lhf_ncep2_oafluxgrid_19890101_20091231.nc"];
-;       shf_ncep2 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/shf_ncep2_oafluxgrid_19890101_20091231.nc"];
-;
-;       ncep1 [shape=ellipse,fontname=Courier,label="${TROPFLUX_ID}/ncep1_flux_19890101_20091231.nc"];
-;
-;       figure [shape=ellipse,fontname=Courier,label="${TROPFLUX_OD}/coare_validation_net_1992_93_all_v11.ps"];
+;       met_data [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/met_data_as_expt_199*_p*.txt"];
+;       swr_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_swr_19910101_20091231_oafluxgrid.nc"];
+;       lwr_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_lwr_19910101_20091231_oafluxgrid.nc"];
+;       lhf_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_lhf_19910101_20091231_oafluxgrid.nc"];
+;       shf_erai [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/erai_shf_19910101_20091231_oafluxgrid.nc"];
+;       tropflux_general [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_19890101_20091231.nc"];
+;       swr_tropflux_nrt [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/TropFlux_swr_19890101_20091231_NRT_v50.nc"];
+;       swr_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/swr_oafluxgrid_1985_2007.nc"];
+;       lwr_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lwr_oafluxgrid_1985_2007.nc"];
+;       lhf_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lhf_oafluxgrid_1985_2007.nc"];
+;       shf_oafluxgrid [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/shf_oafluxgrid_1985_2007.nc"];
+;       swr_ncep2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/swr_ncep2_oaflxgrid_19890101_20091231.nc"];
+;       lwr_ncep2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/NCEP2_flux_19890101_20090729.nc"];
+;       lhf_ncep2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/lhf_ncep2_oafluxgrid_19890101_20091231.nc"];
+;       shf_ncep2 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/shf_ncep2_oafluxgrid_19890101_20091231.nc"];
+;
+;       ncep1 [shape=ellipse,fontname=Courier,label="${PROJECT_ID}/ncep1_flux_19890101_20091231.nc"];
+;
+;       figure [shape=ellipse,fontname=Courier,label="${PROJECT_OD}/coare_validation_net_1992_93_all_v11.ps"];
 ;
 ;       coare_validation_net_1992_93_all_v10 [shape=box,
@@ -47 +47 @@
 ; ========
 ;
-; :ref:`tropflux_profile.sh`
-; :ref:`tropflux_init.pro`
-; :ref:`cm_tropflux.pro`
+; :ref:`project_profile.sh`
+; :ref:`project_init.pro`
+; :ref:`cm_project.pro`
 ;
 ; :ref:`statistics.pro`
@@ -58 +58 @@
 ; ::
 ;
-;  IDL> @tropflux_init
 ;  IDL> coare_validation_net_1992_93_all_v10
 ;
@@ -91 +90 @@
 pro coare_validation_net_1992_93_all_v10
 @cm_general
-@cm_tropflux
+@cm_project
 reinitplt, /z,/invert
 key_portrait = 1
@@ -103 +102 @@
 ;; first leg
 ;; start data - 11/11/92 and end date 03/12/92
-fi=tropflux_id_env+"met_data_coare_expt_1992_p1.txt"
+fi=project_id_env+"met_data_coare_expt_1992_p1.txt"
 res=read_ascii(fi,data_start=1)
 ff=res.field1
@@ -118 +117 @@
 ;; second leg
 
-fi=tropflux_id_env+"met_data_coare_expt_1992_p2.txt"
+fi=project_id_env+"met_data_coare_expt_1992_p2.txt"
 res=read_ascii(fi,data_start=1)
 ff=res.field1
@@ -133 +132 @@
 ;; third leg
 
-fi=tropflux_id_env+"met_data_coare_expt_1993_p1.txt"
+fi=project_id_env+"met_data_coare_expt_1993_p1.txt"
 res=read_ascii(fi,data_start=1)
 ff=res.field1
@@ -148 +147 @@
 ;; fourth leg
 
-fi=tropflux_id_env+"met_data_coare_expt_1993_p2.txt"
+fi=project_id_env+"met_data_coare_expt_1993_p2.txt"
 res=read_ascii(fi,data_start=1)
 ff=res.field1
@@ -171 +170 @@
 st4=19930128 & en4=19930216
 
-file=tropflux_id_env+"erai_swr_19910101_20091231_oafluxgrid.nc"
+file=project_id_env+"erai_swr_19910101_20091231_oafluxgrid.nc"
 initncdf, file
 swr1=read_ncdf('swr',st1,en1,file=file,/nostr, box=box) & swr1=grossemoyenne(swr1, "xy", box=box,/nan) & swr1=reform(swr1)
@@ -178 +177 @@
 swr4=read_ncdf('swr',st4,en4,file=file,/nostr, box=box) & swr4=grossemoyenne(swr4, "xy", box=box,/nan) & swr4=reform(swr4)
 
-file=tropflux_id_env+'erai_lwr_19890101_20091231_oafluxgrid.nc'
+file=project_id_env+'erai_lwr_19890101_20091231_oafluxgrid.nc'
 initncdf, file
 lwr1=read_ncdf('lwr',st1-1,en1,file=file,/nostr, box=box) & lwr1=grossemoyenne(lwr1, "xy", box=box,/nan) & lwr1=reform(lwr1)
@@ -185 +184 @@
 lwr4=read_ncdf('lwr',st4-1,en4,file=file,/nostr, box=box) & lwr4=grossemoyenne(lwr4, "xy", box=box,/nan) & lwr4=reform(lwr4)
 
-file=tropflux_id_env+'erai_lhf_19890101_20091231_oafluxgrid.nc'
+file=project_id_env+'erai_lhf_19890101_20091231_oafluxgrid.nc'
 initncdf, file
 lhf1=-1*read_ncdf('lhf',st1,en1,file=file,/nostr, box=box) & lhf1=grossemoyenne(lhf1, "xy", box=box,/nan) & lhf1=reform(lhf1)
@@ -192 +191 @@
 lhf4=-1*read_ncdf('lhf',st4,en4,file=file,/nostr, box=box) & lhf4=grossemoyenne(lhf4, "xy", box=box,/nan) & lhf4=reform(lhf4)
 
-file=tropflux_id_env+'erai_shf_19890101_20091231_oafluxgrid.nc'
+file=project_id_env+'erai_shf_19890101_20091231_oafluxgrid.nc'
 initncdf, file
 shf1=-1*read_ncdf('shf',st1,en1,file=file,/nostr, box=box) & shf1=grossemoyenne(shf1, "xy", box=box,/nan) & shf1=reform(shf1)
@@ -208 +207 @@
 net1=0 & net2=0 & net3=0 & net4=0
 
-file=tropflux_id_env+"TropFlux_19890101_20091231.nc"
+file=project_id_env+"TropFlux_19890101_20091231.nc"
 initncdf, file
 swr1=read_ncdf('swr',st1,en1,file=file,/nostr, box=box) & swr1=grossemoyenne(swr1, "xy",/nan, box=box) & swr1=reform(swr1)
@@ -233 +232 @@
 net3=swr3+lwr3+lhf3+shf3 & net4=swr4+lwr4+lhf4+shf4
 
-file=tropflux_id_env+"TropFlux_swr_19890101_20091231_NRT_v50.nc"
+file=project_id_env+"TropFlux_swr_19890101_20091231_NRT_v50.nc"
 initncdf, file
 olr1=read_ncdf("sw", st1-1, en1, file=file,/nostr, box=box) & olr1=grossemoyenne(olr1, "xy",/nan, box=box) & olr1=reform(olr1)
@@ -251 +250 @@
 net1=0 & net2=0 & net3=0 & net4=0 & neto_1=0 & neto_2=0 & neto_3=0 & neto_4=0
 
-file=tropflux_id_env+'swr_oafluxgrid_1985_2007.nc'
+file=project_id_env+'swr_oafluxgrid_1985_2007.nc'
 initncdf, file
 swr1=read_ncdf("swr", st1, en1, file=file,/nostr, box=box) & swr1=grossemoyenne(swr1, "xy",/nan, box=box) & swr1=reform(swr1)
@@ -258 +257 @@
 swr4=read_ncdf("swr", st4, en4, file=file,/nostr, box=box) & swr4=grossemoyenne(swr4, "xy",/nan, box=box) & swr4=reform(swr4)
 
-file=tropflux_id_env+'lwr_oafluxgrid_1985_2007.nc'
+file=project_id_env+'lwr_oafluxgrid_1985_2007.nc'
 initncdf, file
 lwr1=-1*read_ncdf("lwr", st1, en1, file=file,/nostr, box=box) & lwr1=grossemoyenne(lwr1, "xy",/nan, box=box) & lwr1=reform(lwr1)
@@ -265 +264 @@
 lwr4=-1*read_ncdf("lwr", st4, en4, file=file,/nostr, box=box) & lwr4=grossemoyenne(lwr4, "xy",/nan, box=box) & lwr4=reform(lwr4)
 
-file=tropflux_id_env+'lhf_oafluxgrid_1985_2009.nc'
+file=project_id_env+'lhf_oafluxgrid_1985_2009.nc'
 initncdf, file
 lhf1=-1*read_ncdf("lhf", st1, en1, file=file,/nostr, box=box) & lhf1=grossemoyenne(lhf1, "xy",/nan, box=box) & lhf1=reform(lhf1)
@@ -272 +271 @@
 lhf4=-1*read_ncdf("lhf", st4, en4, file=file,/nostr, box=box) & lhf4=grossemoyenne(lhf4, "xy",/nan, box=box) & lhf4=reform(lhf4)
 
-file=tropflux_id_env+'shf_oafluxgrid_1985_2009.nc'
+file=project_id_env+'shf_oafluxgrid_1985_2009.nc'
 initncdf, file
 shf1=-1*read_ncdf("shf", st1, en1, file=file,/nostr, box=box) & shf1=grossemoyenne(shf1, "xy",/nan, box=box) & shf1=reform(shf1)
@@ -289 +288 @@
 net1=0 & net2=0 & net3=0 & net4=0
 
-fi=tropflux_id_env+'swr_ncep2_oaflxgrid_19890101_20091231.nc'
+fi=project_id_env+'swr_ncep2_oaflxgrid_19890101_20091231.nc'
 initncdf, fi
 swr1=read_ncdf("swr", st1, en1, file=fi,/nostr, box=box) & swr1=grossemoyenne(swr1, "xy",/nan, box=box) & swr1=reform(swr1)
@@ -296 +295 @@
 swr4=read_ncdf("swr", st4, en4, file=fi,/nostr, box=box) & swr4=grossemoyenne(swr4, "xy",/nan, box=box) & swr4=reform(swr4)
 
-fi=tropflux_id_env+"NCEP2_flux_19890101_20090729.nc"
+fi=project_id_env+"NCEP2_flux_19890101_20090729.nc"
 initncdf, fi
 lwr1=-1*read_ncdf("lwr", st1, en1, file=fi,/nostr, box=box) & lwr1=grossemoyenne(lwr1, "xy",/nan, box=box) & lwr1=reform(lwr1)
@@ -303 +302 @@
 lwr4=-1*read_ncdf("lwr", st4, en4, file=fi,/nostr, box=box) & lwr4=grossemoyenne(lwr4, "xy",/nan, box=box) & lwr4=reform(lwr4)
 
-fi=tropflux_id_env+'lhf_ncep2_oafluxgrid_19890101_20091231.nc'
+fi=project_id_env+'lhf_ncep2_oafluxgrid_19890101_20091231.nc'
 initncdf, fi
 lhf1=-1*read_ncdf("lhf", st1, en1, file=fi,/nostr, box=box) & lhf1=grossemoyenne(lhf1, "xy",/nan, box=box) & lhf1=reform(lhf1)
@@ -310 +309 @@
 lhf4=-1*read_ncdf("lhf", st4, en4, file=fi,/nostr, box=box) & lhf4=grossemoyenne(lhf4, "xy",/nan, box=box) & lhf4=reform(lhf4)
 
-fi=tropflux_id_env+'shf_ncep2_oafluxgrid_19890101_20091231.nc'
+fi=project_id_env+'shf_ncep2_oafluxgrid_19890101_20091231.nc'
 initncdf, fi
 shf1=-1*read_ncdf("shf", st1, en1, file=fi,/nostr, box=box) & shf1=grossemoyenne(shf1, "xy",/nan, box=box) & shf1=reform(shf1)
@@ -327 +326 @@
 net1=0 & net2=0 & net3=0 & net4=0
 
-file=tropflux_id_env+"ncep1_flux_19890101_20091231.nc"
+file=project_id_env+"ncep1_flux_19890101_20091231.nc"
 initncdf, file
 swr1=read_ncdf("swr", st1, en1, file=file,/nostr, box=box) & swr1=grossemoyenne(swr1, "xy",/nan, box=box) & swr1=reform(swr1)
@@ -427 +426 @@
 
 closeps
-fig=tropflux_od_env+"coare_validation_net_1992_93_all_v11.ps"
+fig=project_od_env+"coare_validation_net_1992_93_all_v11.ps"
 spawn, 'mv '+psdir+'idl.ps '+fig
 spawn, 'gv '+fig