.BI has( expression ", " pattern )
\- returns "1" if the first expression contains the pattern as a subexpression, "0" otherwise
.br
+.BI integer_content( expression )
+\- integer content of a polynomial
+.br
.BI inverse( matrix )
\- inverse of a matrix
.br
return found;
}
+static ex f_integer_content(const exprseq &e)
+{
+ return e[0].integer_content();
+}
+
static ex f_inverse(const exprseq &e)
{
CHECK_ARG(0, matrix, inverse);
{"find", f_find, 2},
{"gcd", f_gcd, 2},
{"has", f_has, 2},
+ {"integer_content", f_integer_content, 1},
{"inverse", f_inverse, 1},
{"iprint", f_dummy, 0}, // for Tab-completion
{"is", f_is, 1},