embedded mathematics 源代码

function P = sym(P) % SYM -- built-in SYM, extended to matrix polynomials % % P = sym(P) % % Convert P.coef to type …

function Pinv = inv(P) % INV -- inverse of polynomial matrix % % Pinv = inv(P) % % I have chosen to invest all the p…

function yesno = isnumeric(P) % ISNUMERIC -- check whether matrix polynomial has numerical coefficients % % yesno = isn…

function yesno = isconstant(P) % ISCONSTANT -- check whether matrix polynomial is a constant matrix % % yesno = isconst…

function yesno = eq(P1,P2) % EQ -- check matrix polynomials for equality % % yesno = (P1 == P2) % yesno = eq(P1,…

Date: Wed, 15 Jan 1997 01:30:53 GMT Server: NCSA/1.4.2 Content-type: text/html Last-modified: Wed, 16 Mar 1994 18:10:00 GMT Conten…

function y = factorial(x) % FACTORIAL -- factorial function % % y = factorial(x) % % where % % factorial(n) = …

function b = binomial(m,n) % BINOMIAL -- binomial coefficient % % b = binomial(m,n) % % Calculates the binomial …

function yesno = isidentity(P) % ISIDENTITY -- check whether Laurent polynomial is identity matrix % % yesno = isidenti…

function M = moment(P,n) % MOMENT - compute moments of a matrix polynomial % % M = moment(P,n) % % The nth moment of…