function theResult = get_recvar(self);

%  theVar = get_recvar(nc);
%
%  get_recvar(nc) returns the record variable
%  of 'nc'.  
%

if nargin < 1, help(mfilename), return, end

vars = recvar(self);

for i = length(vars):-1:1;
   if ~iscoord(vars{i}), vars(i) = []; end
end

if nargout > 0
   theVar = cell(size(vars));
   theVar = vars;
else
   for i = 1:length(vars)
      disp(name(vars{i}))
   end
end
