23 lines
488 B
Matlab
23 lines
488 B
Matlab
function t = ThermoPhase(r)
|
|
%THERMOPHASE Cantera ThermoPhase class constructor
|
|
%
|
|
if nargin == 1
|
|
if isa(r,'ThermoPhase')
|
|
% create a copy
|
|
t = r;
|
|
return
|
|
elseif isa(r,'XML_Node')
|
|
t.owner = 1;
|
|
hr = hndl(r);
|
|
t.tp_id = thermo_get(hr,0);
|
|
if t.tp_id < 0
|
|
error(geterr);
|
|
end
|
|
else
|
|
t.owner = 0;
|
|
t.tp_id = r;
|
|
end
|
|
t = class(t,'ThermoPhase');
|
|
else
|
|
error('wrong number of arguments');
|
|
end
|