2528df0f75
These changes make it unnecessary to copy header files around during the build process, which tends to confuse IDEs and debuggers. The headers which comprise Cantera's external C++ interface are now in the 'include' directory. All of the samples and demos are now in the 'samples' subdirectory.
43 lines
No EOL
1.1 KiB
Matlab
Executable file
43 lines
No EOL
1.1 KiB
Matlab
Executable file
function nu_p = stoich_p(a,species,rxns)
|
|
% stoich_p Product stoichiometric coefficients.
|
|
%
|
|
% nu = stoich_p(a)
|
|
%
|
|
% Returns a sparse matrix of all product stoichiometric
|
|
% coefficients. The matrix element nu(k,i) is the
|
|
% stoichiometric coefficient of species k as a product in
|
|
% reaction i.
|
|
%
|
|
% nu = stoich_p(a, species, rxns)
|
|
%
|
|
% Returns a sparse matrix the same size as above, but
|
|
% containing only entries for the specified species and
|
|
% reactions. For example, stoich_p(a,3,[1 3 5 7]) returns a
|
|
% sparse matrix containing only the coefficients for species 3
|
|
% in reactions 1, 3, 5, and 7.
|
|
%
|
|
% See also: stoich_r, stoich_net.
|
|
%
|
|
nsp = nTotalSpecies(a);
|
|
nr =nReactions(a);
|
|
b = sparse(nsp,nr);
|
|
f = @kinetics_get;
|
|
if nargin == 1
|
|
kvals = 1:nsp;
|
|
ivals = 1:nr;
|
|
elseif nargin == 3
|
|
kvals = species;
|
|
ivals = rxns;
|
|
else
|
|
error('Syntax error. type ''help stoich_r'' for more information.')
|
|
end
|
|
|
|
for k = kvals
|
|
for i = ivals
|
|
nu = feval(f,a.id,6,i,k);
|
|
if nu ~= 0.0
|
|
b(k,i) = nu;
|
|
end
|
|
end
|
|
end
|
|
nu_p = b; |