Dear NCL,
I was trying to use the SrcMask2D function to do the regridding from 1KM to
3 armin based on the joined Daymet data,
Is that possible to update the example for using SrcMask2D function?
Actually I tried to create a mask grid from the 1KM resolution Daymet
(which I think it will be best in resolution), however, I got errors:
(0) write_grid_description: source lat dims = (2082,1551)
(0) write_grid_description: source lon dims = (2082,1551)
(0) write_grid_description: source grid type is 'curvilinear'
fatal:Eq: Dimension size, for dimension number 0, of operands does not
match, can't continue
fatal:["Execute.c":7556]:Execute: Error occurred at or near line 943 in
file $NCARG_ROOT/lib/ncarg/nclscripts/esmf/ESMF_regridding.ncl
fatal:["Execute.c":7556]:Execute: Error occurred at or near line 2543 in
file $NCARG_ROOT/lib/ncarg/nclscripts/esmf/ESMF_regridding.ncl
fatal:["Execute.c":7556]:Execute: Error occurred at or near line 2654 in
file $NCARG_ROOT/lib/ncarg/nclscripts/esmf/ESMF_regridding.ncl
fatal:["Execute.c":7556]:Execute: Error occurred at or near line 110 in
file daymet_1KM-3MIN.ncl
fatal:Variable (var_regrid) is undefined
fatal:["Execute.c":7556]:Execute: Error occurred at or near line 111 in
file daymet_1KM-3MIN.ncl
fatal:Variable (var_regrid) is undefined, can not assign attribute
(grid_mapping)
fatal:["Execute.c":7556]:Execute: Error occurred at or near line 112 in
file daymet_1KM-3MIN.ncl
fatal:Variable (var_regrid) is undefined
fatal:["Execute.c":7556]:Execute: Error occurred at or near line 113 in
file daymet_1KM-3MIN.ncl
However if I remove this code:
Opt@SrcMask2D      = where(.not.ismissing(var),1,0)
The script runs fine.
I've already uploaded my data onto the ftp(previous message) and my script
is as follows:
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/wrf/WRFUserARW.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/esmf/ESMF_regridding.ncl"
;======================================================================
; The main code
;======================================================================
vname = "prcp"
year  =  1980
print("start to process the year of "+ year + " for variable " + vname)
;---Input file (Daymet joined tile) ;NE_all_1980_correct_$vname$ .nc
    srcDirName  = "/data/ecr/yangping/DAYMET/Grid/1KM/011213/"
    srcFileName = vname + ".NE." + year +".nc"
    srcPathName = srcDirName+srcFileName
    sfile       = addfile(srcPathName,"r")
;---Set the destination file name
    dstDirName  = "/data/ecr/yangping/DAYMET/Grid/Intermediate/"
    system("/bin/mkdir -p "+ dstDirName)
    dstFileName = str_upper(vname)+"."+year+"_1KM.esmf.nc"
    dstPathName = dstDirName+dstFileName
    setfileoption("nc","Format","LargeFile")
    outDirName = "/data/ecr/yangping/DAYMET/Grid/3MIN/"
    outFileName =  vname +  ".3MIN.lonlat." + year+".nc"
    outPathName = outDirName + outFileName
    system("/bin/rm -f "+outPathName)     ; delete any pre-existing file
    out=addfile(outPathName,"c")
;--- ESMF regrid method: "conserve", "bilinear", "patch"
     method      = "conserve"
;===================================================
;---Options
    Opt                = True
    Opt@SrcTitle       = "Daymet Joined Grid "+year+" to rectlinear"   ;
optional
    Opt@WgtFileName    = dstDirName +  "Daymet_to_Rect.Wgt.nc"
    Opt@ForceOverwrite = True
  ;;Opt@PrintTimings   = True
;---Get the source file Daymet lat/lon grid
    lat2d = sfile->lat
    lon2d = sfile->lon
    dim2d = dimsizes(lat2d)
    nlat  = dim2d(0)
    nlon  = dim2d(1)
    print(nlat)
    print(nlon)
;---Get the Daymet source variable
    var   = sfile->$vname$         ; (time, y, x)=>(365,232,221)
    printVarSummary(var)
   ;Opt@SrcGridType  = "curvilinear"
    Opt@SrcGridLat   = lat2d
    Opt@SrcGridLon   = lon2d
    Opt@SrcMask2D      = where(.not.ismissing(var),1,0)
;---Create the destination lat/lon grid
    dll=0.05  ;3MIN
    latrange=abs(max(lat2d)-min(lat2d))
    lonrange=abs(max(lon2d)-min(lon2d))
    kpts_lat= toint(latrange/dll)+1
    kpts_lon= toint(lonrange/dll)+1
    lat = fspan( min(lat2d),max(lat2d), kpts_lat )
    lon = fspan( min(lon2d),max(lon2d), kpts_lon )
    newlon = fspan(-84.025,-64.875,384)
    newlat = fspan(34.875,50.125,306)
    Opt@Debug = True
    Opt@DstGridType  = "rectilinear"
    ;Opt@DstGridLat   = lat
    Opt@DstGridLat   = newlat
    ;Opt@DstGridLon   = lon
    Opt@DstGridLon   = newlon
    Opt@CopyVarCoords= True                     ; default for 6.1.0
    Opt@InterpMethod = method
    Opt@SrcRegional  = True
    Opt@DstRegional  = True
    var_regrid = ESMF_regrid(var,Opt)     ; Do the regridding for 'var'
    printVarSummary(var_regrid)
    var_regrid@grid_mapping = "lonlat" ;
    out->$vname$=var_regrid                  ;output the regridding result
I was using the original 1KM Daymet data as a mask by using the SrcMask2D
function, Is this a correct way to do this? Any suggestions or comments
will be appreciated.
Thanks,
Ping
_______________________________________________
ncl-talk mailing list
List instructions, subscriber options, unsubscribe:
http://mailman.ucar.edu/mailman/listinfo/ncl-talk
Received on Tue Apr 23 15:01:53 2013
This archive was generated by hypermail 2.1.8 : Fri Apr 26 2013 - 17:10:26 MDT