Modifications to scoring and graphics production for the final version of code for the C-LAMP paper in GCB.
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 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"
7 ;************************************************
9 ;************************************************
10 ; read in data: observed
11 ;************************************************
12 diri = "/fis/cgd/cseg/people/jeff/clamp_data/co2/"
13 fili = "co2_globalView_222.nc"
14 g = addfile (diri+fili,"r")
23 lat_tmp@_FillValue = 1.e+36
26 if (.not. ismissing(lat_tmp(n))) then
27 indexes = ind(lat(n) .eq. lat .and. lon(n) .eq. lon)
28 if (dimsizes(indexes) .gt. 1) then
29 lat_tmp(indexes(1:)) = lat_tmp@_FillValue
35 indexes = ind(.not. ismissing(lat_tmp))
38 lat_new = lat(indexes)
39 lon_new = lon(indexes)
40 print (lat_new +"/"+lon_new)