profilesMatlabProcessing/profiles_misc/ncgetFillVal.m

function [FillVal]=ncgetFillVal(ncid,varname);
% [FillVal]=ncgetFillVal(ncid,varname)
%           return the missing_value or _FillValue of varname

global useNativeMatlabNetcdf; 
if isempty(useNativeMatlabNetcdf); useNativeMatlabNetcdf = ~isempty(which('netcdf.open')); end;

FillVal=[];
if useNativeMatlabNetcdf;
    varid = netcdf.inqVarID(ncid,varname);
    [varname,xtype,dimids,natts] = netcdf.inqVar(ncid,varid);
    [atts]=ncatts(ncid,varid);
    if any(ismember(atts,'missing_value'))
        FillVal = netcdf.getAtt(ncid,varid,'missing_value');
    elseif any(ismember(atts,'_FillValue'))
        FillVal = netcdf.getAtt(ncid,varid,'_FillValue');
    end
    if strcmp(xtype,'single') | strcmp(xtype,'double')
        FillVal=double(FillVal);
    end
else
    FillVal = ncid{varname}.missing_value(:);
    if isempty(FillVal);
        FillVal = ncid{varname}.FillValue_(:);
    end
end

1	function [FillVal]=ncgetFillVal(ncid,varname);
2	% [FillVal]=ncgetFillVal(ncid,varname)
3	% return the missing_value or _FillValue of varname
4
5	global useNativeMatlabNetcdf;
6	if isempty(useNativeMatlabNetcdf); useNativeMatlabNetcdf = ~isempty(which('netcdf.open')); end;
7
8	FillVal=[];
9	if useNativeMatlabNetcdf;
10	varid = netcdf.inqVarID(ncid,varname);
11	[varname,xtype,dimids,natts] = netcdf.inqVar(ncid,varid);
12	[atts]=ncatts(ncid,varid);
13	if any(ismember(atts,'missing_value'))
14	FillVal = netcdf.getAtt(ncid,varid,'missing_value');
15	elseif any(ismember(atts,'_FillValue'))
16	FillVal = netcdf.getAtt(ncid,varid,'_FillValue');
17	end
18	if strcmp(xtype,'single') \| strcmp(xtype,'double')
19	FillVal=double(FillVal);
20	end
21	else
22	FillVal = ncid{varname}.missing_value(:);
23	if isempty(FillVal);
24	FillVal = ncid{varname}.FillValue_(:);
25	end
26	end
27