AssignVarargin(varargin,Prop,PClass)

function AssignVarargin(varargin,Prop,PClass)
% ASSIGNVARARGIN parses a parameter list.  Given a set of variable names,
% ASSIGNVARARGIN assigns the appropriate values to variables.
%
%    foo('green',5);
%
% and in foo, you call ASSIGNVARARGIN:
%
%    AssignVarargin({'Color','Charm','Strangeness'});
%
% ASSIGNVARARGIN will create a variable Color, with the value 'green', a
% variable Charm, with the value 5, and a variable Strangness, with the
% value NaN.
%
% See also varargout nargin nargout inputname function lists paren
%          CatOrSplitFiles CheckerboardPlot varargin nargin
%          assignin evalin
%
% Key words varargout nargin nargout inputname function lists paren
%          CatOrSplitFiles CheckerboardPlot parameter workspace
%          assign input output arguments

%
%
%
% It's not fancy, but it works

% Michael Robbins
% [e-mail]
% [e-mail]


for i=1:length(Prop)
    if i<=length(varargin)
        v = varargin{i};
    else
        v = NaN;
    end;
    assignin('caller',Prop{i},v);
end;