function list=saveexcept(info,varargin)
% pass whos as info

% revision history:
% 12/28/04 Mark D. Shattuck <mds> saveexcept.m

[NL,~]=size(info);

Nvar=length(varargin);

ilist=true(1,NL);

for nvar=1:Nvar
  tmp=strncmp(varargin{nvar},{info.name},length(varargin{nvar}));
  if(~isempty(tmp))
    ilist(tmp)=false;
  end
end

list={info(ilist).name};

