1 ;*************************************************
3 ;************************************************
4 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"
5 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"
6 ;************************************************
9 ;************************************************
11 ;************************************************
12 diri = "/fis/cgd/cseg/people/jeff/clamp/class/"
13 fili = "T42.clamp.surface-data.060412.nc"
14 f = addfile(diri+fili,"r")
27 x(j,i) = sum(y(:,j,i))