function obj = set(obj, varargin)

prop_argin = varargin;
f_names = fieldnames(obj);

while length(prop_argin) >= 2
    prop_name = lower(prop_argin{1});
    prop_value = prop_argin{2};    
    prop_argin = prop_argin(3:end);
    if ismember(prop_name, f_names)        
        obj.(prop_name) = prop_value;
    else
        error('Unknown property name');
    end;
end;