Ignore:
Timestamp:
08/25/11 13:02:20 (13 years ago)
Author:
pinsard
Message:

get rid of multistatement lines

File:
1 edited

Legend:

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

    r91 r94  
    179179;; reading data from mooring 
    180180 
    181     site=sitelist(n) & csite=site 
     181    site=sitelist(n)  
     182    csite=site 
    182183    print, csite 
    183184    x=x_site_location(site) 
    184185    y=y_site_location(site) 
    185186    if (y ge 0. and y le 30.) then y=y+360. 
    186     dx=0.5 & dy=0.5 & box=[y-dy, y+dy, x-dx, x+dx] 
     187    dx=0.5  
     188    dy=0.5  
     189    box=[y-dy, y+dy, x-dx, x+dx] 
    187190    read_variables_v2, csite,date1,date2,nsmooth, $ 
    188191         at, sw,rh,sst,wu,wv,ws,lh 
     
    220223     ncep1=tropflux 
    221224 
    222     ind=where(finite(q2m)) & q2m=q2m(ind) & uncr_q2m=uncr(ind)  & corr_q2m=corr(ind) 
    223     oafl=oafl(ind) & ncep=ncep(ind) & ncep1=ncep1(ind) 
     225    ind=where(finite(q2m))  
     226    q2m=q2m(ind)  
     227    uncr_q2m=uncr(ind)   
     228    corr_q2m=corr(ind) 
     229    oafl=oafl(ind)  
     230    ncep=ncep(ind)  
     231    ncep1=ncep1(ind) 
    224232    mean_tao=total(q2m,/nan)/n_elements(ind) 
    225233 
     
    247255lat=reform(ff(0,*)) 
    248256lon=reform(ff(1,*)) 
    249 cor_era=reform(ff(2,*))   & cor_erai=total(cor_era)/n_elements(cor_era) 
    250 bias_era=reform(ff(3,*))  & bias_erai=total(bias_era)/n_elements(bias_era) 
    251 std_era=reform(ff(4,*))   & std_erai=total(std_era)/n_elements(std_era) 
    252 rmsd_era=reform(ff(5,*))  & rmsd_erai=total(rmsd_era)/n_elements(rmsd_era) 
    253 mean_tao=reform(ff(6,*))  & mean_erai=bias_era+mean_tao 
     257cor_era=reform(ff(2,*))    
     258cor_erai=total(cor_era)/n_elements(cor_era) 
     259bias_era=reform(ff(3,*))   
     260bias_erai=total(bias_era)/n_elements(bias_era) 
     261std_era=reform(ff(4,*))    
     262std_erai=total(std_era)/n_elements(std_era) 
     263rmsd_era=reform(ff(5,*))   
     264rmsd_erai=total(rmsd_era)/n_elements(rmsd_era) 
     265mean_tao=reform(ff(6,*))   
     266mean_erai=bias_era+mean_tao 
    254267 
    255268print, '' 
     
    265278oplot, [11,21], [11,21] 
    266279ab=linfit(mean_tao, mean_erai,yfit=yfit) 
    267 a=float(ab(0)) & b=float(ab(1)) 
     280a=float(ab(0))  
     281b=float(ab(1)) 
    268282oplot, mean_tao, yfit, color=250, thick=2 
    269283 
     
    273287lat=reform(ff(0,*)) 
    274288lon=reform(ff(1,*)) 
    275 cor_tro=reform(ff(2,*))   & cor_trop=total(cor_tro)/n_elements(cor_tro) 
    276 bias_tro=reform(ff(3,*))  & bias_trop=total(bias_tro)/n_elements(bias_tro) 
    277 std_tro=reform(ff(4,*))   & std_trop=total(std_tro)/n_elements(std_tro) 
    278 rmsd_tro=reform(ff(5,*))  & rmsd_trop=total(rmsd_tro)/n_elements(rmsd_tro) 
    279 mean_tao=reform(ff(6,*))  & mean_trop=bias_tro+mean_tao 
     289cor_tro=reform(ff(2,*))    
     290cor_trop=total(cor_tro)/n_elements(cor_tro) 
     291bias_tro=reform(ff(3,*))   
     292bias_trop=total(bias_tro)/n_elements(bias_tro) 
     293std_tro=reform(ff(4,*))    
     294std_trop=total(std_tro)/n_elements(std_tro) 
     295rmsd_tro=reform(ff(5,*))   
     296rmsd_trop=total(rmsd_tro)/n_elements(rmsd_tro) 
     297mean_tao=reform(ff(6,*))   
     298mean_trop=bias_tro+mean_tao 
    280299 
    281300print, '' 
     
    292311 
    293312ab=linfit(mean_tao, mean_trop,yfit=yfit) 
    294 a=float(ab(0)) & b=float(ab(1)) 
     313a=float(ab(0))  
     314b=float(ab(1)) 
    295315oplot, mean_tao, yfit, color=250, thick=2 
    296316 
     
    300320lat=reform(ff(0,*)) 
    301321lon=reform(ff(1,*)) 
    302 cor_oaf=reform(ff(2,*))   & cor_oafl=total(cor_oaf)/n_elements(cor_oaf) 
    303 bias_oaf=reform(ff(3,*))  & bias_oafl=total(bias_oaf)/n_elements(bias_oaf) 
    304 std_oaf=reform(ff(4,*))   & std_oafl=total(std_oaf)/n_elements(std_oaf) 
    305 rmsd_oaf=reform(ff(5,*))  & rmsd_oafl=total(rmsd_oaf)/n_elements(rmsd_oaf) 
    306 mean_tao=reform(ff(6,*))  & mean_oafl=bias_oaf+mean_tao 
     322cor_oaf=reform(ff(2,*))    
     323cor_oafl=total(cor_oaf)/n_elements(cor_oaf) 
     324bias_oaf=reform(ff(3,*))   
     325bias_oafl=total(bias_oaf)/n_elements(bias_oaf) 
     326std_oaf=reform(ff(4,*))    
     327std_oafl=total(std_oaf)/n_elements(std_oaf) 
     328rmsd_oaf=reform(ff(5,*))   
     329rmsd_oafl=total(rmsd_oaf)/n_elements(rmsd_oaf) 
     330mean_tao=reform(ff(6,*))   
     331mean_oafl=bias_oaf+mean_tao 
    307332 
    308333print, '' 
     
    319344 
    320345ab=linfit(mean_tao, mean_oafl,yfit=yfit) 
    321 a=float(ab(0)) & b=float(ab(1)) 
     346a=float(ab(0))  
     347b=float(ab(1)) 
    322348oplot, mean_tao, yfit, color=250, thick=2 
    323349 
     
    328354lat=reform(ff(0,*)) 
    329355lon=reform(ff(1,*)) 
    330 cor_nce=reform(ff(2,*))   & cor_ncep=total(cor_nce)/n_elements(cor_nce) 
    331 bias_nce=reform(ff(3,*))  & bias_ncep=total(bias_nce)/n_elements(bias_nce) 
    332 std_nce=reform(ff(4,*))   & std_ncep=total(std_nce)/n_elements(std_nce) 
    333 rmsd_nce=reform(ff(5,*))  & rmsd_ncep=total(rmsd_nce)/n_elements(rmsd_nce) 
    334 mean_tao=reform(ff(6,*))  & mean_ncep=bias_nce+mean_tao 
     356cor_nce=reform(ff(2,*))    
     357cor_ncep=total(cor_nce)/n_elements(cor_nce) 
     358bias_nce=reform(ff(3,*))   
     359bias_ncep=total(bias_nce)/n_elements(bias_nce) 
     360std_nce=reform(ff(4,*))    
     361std_ncep=total(std_nce)/n_elements(std_nce) 
     362rmsd_nce=reform(ff(5,*))   
     363rmsd_ncep=total(rmsd_nce)/n_elements(rmsd_nce) 
     364mean_tao=reform(ff(6,*))   
     365mean_ncep=bias_nce+mean_tao 
    335366 
    336367print, '' 
     
    347378 
    348379ab=linfit(mean_tao, mean_ncep,yfit=yfit) 
    349 a=float(ab(0)) & b=float(ab(1)) 
     380a=float(ab(0))  
     381b=float(ab(1)) 
    350382oplot, mean_tao, yfit, color=250, thick=2 
    351383 
     
    355387lat=reform(ff(0,*)) 
    356388lon=reform(ff(1,*)) 
    357 cor_nce=reform(ff(2,*))   & cor_ncep=total(cor_nce)/n_elements(cor_nce) 
    358 bias_nce=reform(ff(3,*))  & bias_ncep=total(bias_nce)/n_elements(bias_nce) 
    359 std_nce=reform(ff(4,*))   & std_ncep=total(std_nce)/n_elements(std_nce) 
    360 rmsd_nce=reform(ff(5,*))  & rmsd_ncep=total(rmsd_nce)/n_elements(rmsd_nce) 
    361 mean_tao=reform(ff(6,*))  & mean_ncep=bias_nce+mean_tao 
     389cor_nce=reform(ff(2,*))    
     390cor_ncep=total(cor_nce)/n_elements(cor_nce) 
     391bias_nce=reform(ff(3,*))   
     392bias_ncep=total(bias_nce)/n_elements(bias_nce) 
     393std_nce=reform(ff(4,*))    
     394std_ncep=total(std_nce)/n_elements(std_nce) 
     395rmsd_nce=reform(ff(5,*))   
     396rmsd_ncep=total(rmsd_nce)/n_elements(rmsd_nce) 
     397mean_tao=reform(ff(6,*))   
     398mean_ncep=bias_nce+mean_tao 
    362399 
    363400print, '' 
     
    374411 
    375412ab=linfit(mean_tao, mean_ncep,yfit=yfit) 
    376 a=float(ab(0)) & b=float(ab(1)) 
     413a=float(ab(0))  
     414b=float(ab(1)) 
    377415oplot, mean_tao, yfit, color=250, thick=2 
    378416 
Note: See TracChangeset for help on using the changeset viewer.