Changeset 464 for trunk

Timestamp:

05/08/11 22:10:31 (13 years ago)

Author:

smasson

Message:

bugfix for attributes and interpolation from irregular grid

File:

• trunk/SRC/Interpolation/file_interp.pro (modified) (2 diffs)

trunk/SRC/Interpolation/file_interp.pro

@@ -68 +68 @@
       data = fromreg(method, temporary(data), inlon, inlat, outlon, outlat, WEIG = weig, ADDR = addr, _extra = ex)
     ENDIF ELSE BEGIN
-      data = fromirr(method, temporary(data), inlon, inlat, -1, outlon, outlat, -1, WEIG = weig, ADDR = addr)
+;      data = fromirr(method, temporary(data), inlon, inlat, -1, outlon, outlat, -1, WEIG = weig, ADDR = addr)
+      data = fromirr(method, temporary(data), inlon, inlat, mask, outlon, outlat, -1, WEIG = weig, ADDR = addr)
     ENDELSE
   ENDELSE 
@@ -494 +495 @@
           CASE 1 OF
             keyword_set(interp) AND strlowcase(name) EQ '_fillvalue':BEGIN
-              ncdf_attget, inid, i, '_fillvalue', tmp & outmiss[i] = tmp
+              ncdf_attget, inid, i, name, tmp & outmiss[i] = tmp
             END
             keyword_set(interp) AND strlowcase(name) EQ 'missing_value':BEGIN
-              ncdf_attget, inid, i, 'missing_value', tmp & outmiss[i] = tmp
+              ncdf_attget, inid, i, name, tmp & outmiss[i] = tmp
             END
             ELSE:dummy = ncdf_attcopy(inid, i, name, outid, outvarid[i])