view m-toolbox/classes/@smodel/det.m @ 20:d58813ab1b92
database-connection-manager
Update ltpda_uo.submit
author |
Daniele Nicolodi <nicolodi@science.unitn.it> |
date |
Mon, 05 Dec 2011 16:20:06 +0100 (2011-12-05) |
parents |
f0afece42f48 |
children |
|
line source
% DET evaluates the determinant of smodel objects.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% DESCRIPTION: DET evaluates the determinant of smodel objects.
%
% CALL: obj = det(mdl)
% obj = mdl.det()
%
% <a href="matlab:utils.helper.displayMethodInfo('smodel', 'det')">Parameters Description</a>
%
% VERSION: $Id: det.m,v 1.10 2011/04/08 08:56:28 hewitson Exp $
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function varargout = det(varargin)
% Settings
operatorName = 'det';
% Check if this is a call for parameters
if utils.helper.isinfocall(varargin{:})
varargout{1} = getInfo(varargin{3});
return
end
% Check if the method was called by another method
callerIsMethod = utils.helper.callerIsMethod;
% Collect input variable names
in_names = cell(size(varargin));
for ii = 1:nargin,in_names{ii} = inputname(ii);end
% Collect all smodels and plists
[as, smodel_invars, rest] = utils.helper.collect_objects(varargin(:), 'smodel', in_names);
pl = utils.helper.collect_objects(varargin(:), 'plist');
% Decide on a deep copy or a modify
mdls = copy(as, nargout);
% Combine plists
pl = parse(pl, getDefaultPlist());
% Apply the operator
mdls.op(operatorName);
if ~callerIsMethod
% Add history
mdls.addHistory(getInfo('None'), pl, smodel_invars, [mdls(:).hist]);
% Set name
mdls.name = [operatorName '(' mdls.name ')'];
end
% Set output
varargout{1} = mdls;
end
%--------------------------------------------------------------------------
% Get Info Object
%--------------------------------------------------------------------------
function ii = getInfo(varargin)
if nargin == 1 && strcmpi(varargin{1}, 'None')
sets = {};
pls = [];
else
sets = {'Default'};
pls = getDefaultPlist();
end
% Build info object
ii = minfo(mfilename, 'smodel', 'ltpda', utils.const.categories.op, '$Id: det.m,v 1.10 2011/04/08 08:56:28 hewitson Exp $', sets, pls);
ii.setArgsmin(1);
end
%--------------------------------------------------------------------------
% Get Default Plist
%--------------------------------------------------------------------------
function plout = getDefaultPlist()
persistent pl;
if ~exist('pl', 'var') || isempty(pl)
pl = buildplist();
end
plout = pl;
end
function pl = buildplist()
pl = plist.EMPTY_PLIST;
end