matthiasm@8: function CPD = set_params(CPD, varargin)
matthiasm@8: % SET_PARAMS Set the parameters (fields) for a tabular_decision_node object
matthiasm@8: % CPD = set_params(CPD, name/value pairs)
matthiasm@8: %
matthiasm@8: % The following optional arguments can be specified in the form of name/value pairs:
matthiasm@8: %
matthiasm@8: % policy - the table containing the policy
matthiasm@8: %
matthiasm@8: % e.g., CPD = set_params(CPD, 'policy', T)
matthiasm@8: 
matthiasm@8: args = varargin;
matthiasm@8: nargs = length(args);
matthiasm@8: for i=1:2:nargs
matthiasm@8:   switch args{i},
matthiasm@8:    case 'policy',   CPD.CPT = args{i+1};
matthiasm@8:    otherwise,
matthiasm@8:     error(['invalid argument name ' args{i}]);
matthiasm@8:   end
matthiasm@8: end