lai/04.lai_ensemble_1.9.ncl
author Forrest Hoffman <forrest@climatemodeling.org>
Thu, 26 Mar 2009 14:02:21 -0400
changeset 1 4be95183fbcd
permissions -rw-r--r--
Modifications to scoring and graphics production for the final version of code for the C-LAMP paper in GCB.
     1 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"  
     2 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"  
     3 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"  
     4 
     5 begin 
     6 ;----------------------------------------------------------
     7   year_start = 2000
     8   year_end   = 2005
     9 ;----------------------------------------------------------
    10   diri  = "/fis/cgd/cseg/people/jeff/clamp_data/lai/ob/"
    11 
    12   diro  = "/fis/cgd/cseg/people/jeff/clamp_data/lai/ob/"
    13   filo1 = "LAI_"+year_start+"-"+year_end+"_MONS_1.9.nc"
    14   filo2 = "LAI_"+year_start+"-"+year_end+"_ANN_1.9.nc"
    15   c = addfile(diro+filo1,"c")
    16   d = addfile(diro+filo2,"c")
    17 
    18   nyear = year_end - year_start + 1
    19 
    20   files  = new((/nyear/),"string")
    21 
    22   do n = year_start,year_end
    23      i = n - year_start
    24      files(i)= diri + "LAI_" + n + "_monthly_1.9.nc"
    25   end do
    26   print (files)  
    27 
    28   file_list = addfiles(files,"r")
    29   ListSetType(file_list,"join")
    30   x = addfiles_GetVar(file_list, files, "LAI")
    31   printVarSummary (x)
    32   x@_FillValue = 1.e+36
    33 
    34   y = dim_avg_Wrap(x(time|:,lat|:,lon|:,case|:))
    35   printVarSummary (y)
    36   y@_FillValue = 1.e+36
    37  
    38   c->LAI  = y
    39 
    40   z = dim_avg_Wrap(y(lat|:,lon|:,time|:))
    41   printVarSummary (z)
    42   z@_FillValue = 1.e+36
    43   
    44   d->LAI  = z     
    45 end
    46