35 lines
739 B
Matlab
35 lines
739 B
Matlab
function d = setTolerances(d, component, rtol, atol, typ)
|
|
% SETTOLERANCES -
|
|
%
|
|
ityp = 0;
|
|
if nargin == 5
|
|
switch typ
|
|
case 'ts'
|
|
ityp = -1;
|
|
case 'time'
|
|
ityp = -1;
|
|
case 'ss'
|
|
ityp = 1;
|
|
case 'steady'
|
|
ityp = 1;
|
|
end
|
|
end
|
|
|
|
if strcmp(component,'default')
|
|
nc = nComponents(d);
|
|
for ii = 1:nc
|
|
domain_methods(d.dom_id, 52, ii, rtol, atol, ityp);
|
|
end
|
|
return
|
|
end
|
|
|
|
if iscell(component)
|
|
nc = length(component);
|
|
for ii = 1:nc
|
|
n = componentIndex(d, component{ii});
|
|
domain_methods(d.dom_id, 52, n, rtol, atol, ityp);
|
|
end
|
|
else
|
|
n = componentIndex(d, component);
|
|
domain_methods(d.dom_id, 52, n, rtol, atol, ityp);
|
|
end
|