combineOpt(options,default_options)

% combineOpt Combines user options with default options structure
%
% result_Options = combineOpt (User_options, Default_options)
%
% The function takes the fields from Default_options and updates them with
% the value of the corresponding field in User_options. If such field in
% User_options does not exist the original value from Default_options
% remains. Fields specified by the user, but not existing in the default
% structure and simply copied.
%
% combineOpt ver 1								Last update: 06.11.2011

% Copyright 2003-2011   Andrey Popov,  [e-mail]

% This software is published under the BSD license.
%
% Redistribution and use in source and binary forms, with or without 
% modification, are permitted provided that the following conditions are 
% met:
% 
%     * Redistributions of source code must retain the above copyright 
%       notice, this list of conditions and the following disclaimer.
%     * Redistributions in binary form must reproduce the above copyright 
%       notice, this list of conditions and the following disclaimer in 
%       the documentation and/or other materials provided with the distribution
%       
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
% IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
% ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 
% LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 
% POSSIBILITY OF SUCH DAMAGE.

function result = combineOpt(options,default_options)

result = default_options;
    
Opt_Names = fieldnames(options);

try    
    for ind = 1:size(Opt_Names,1)
        Real_Field_Name = Opt_Names{ind};
        result.(Real_Field_Name) = options.(Real_Field_Name);
    end
catch
    error('combineOpt:struct','Problem in options structure');
end
end