beta/01.co2_f.ncl
changeset 0 0c6405ab2ff4
equal deleted inserted replaced
-1:000000000000 0:0a48b6390d80
       
     1 ; ****************************************************
       
     2 ; combine scatter, histogram, global and zonal plots
       
     3 ; compute all correlation coef and M score
       
     4 ; ****************************************************
       
     5 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl.test"
       
     6 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl.test"
       
     7 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"
       
     8 ;************************************************
       
     9 
       
    10 ; Main code.
       
    11 begin
       
    12 
       
    13  dirm = "/fis/cgd/cseg/people/jeff/clamp_data/model/"
       
    14  film = "surf_co2.clamp.T42.20070208.nc"
       
    15  fm   = addfile (dirm+film,"r")
       
    16   
       
    17  surf_co2  = fm->surf_co2
       
    18  
       
    19  print (surf_co2(:,0,0)) 
       
    20 
       
    21  avg_co2_1990_2004 = avg(surf_co2(192:206,0,0))
       
    22 
       
    23  print (avg_co2_1990_2004)
       
    24 
       
    25 end