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"
9 diri = "/fis/cgd/cseg/people/jeff/clamp_data/"
10 fili = "MOD15A2_GEO_2000001.nc"
11 a = addfile(diri+fili,"r")
13 y = a->Lai_0_05deg ; byte
14 y@_FillValue = inttobyte(253)
15 y@_FillValue = inttobyte(255)
19 x@_FillValue = 1.e+36 ; new fill
21 lat = latGlobeFo(nlat, "lat", "latitude", "degrees_north")
22 lat = (/ lat(::-1) /) ; make N->S
23 lon = lonGlobeFo(mlon, "lon", "longitude", "degrees_east")
24 lon = (/ lon - 180. /) ; subtract 180 from all values
25 lon&lon = lon ; update coordinates
37 iy = new (dimsizes(y), "integer", -999)
45 print(y(:,{130})+" "+ iy(:,{130})+" "+x(:,{130}))
49 ; diro = "/fis/cgd/cseg/people/jeff/clamp_data/"
50 ; filo = "LAI_2000001_2.nc"
51 ; c = addfile(diro+filo,"c")