matrix transpose(void) const;
ex determinant(void) const;
ex trace(void) const;
- ex charpoly(const ex & lambda) const;
+ ex charpoly(const symbol & lambda) const;
matrix inverse(void) const;
matrix fraction_free_elim(const matrix & vars, const matrix & v) const;
matrix solve(const matrix & vars, const matrix & rhs) const;
matrix old_solve(const matrix & v) const; // FIXME: may be removed
protected:
- ex determinant_numeric(void) const;
- ex determinant_symbolic_minor(void) const;
- ex determinant_symbolic_perm(void) const;
+ ex determinant_minor(void) const;
int gauss_elimination(void);
- int fraction_free_elimination(void);
+ int division_free_elimination(void);
+ int fraction_free_elimination(bool det = false);
int pivot(unsigned ro, bool symbolic=true);
private: // FIXME: these should be obsoleted
void ffe_swap(unsigned r1, unsigned c1, unsigned r2 ,unsigned c2);
inline ex trace(const matrix & m)
{ return m.trace(); }
-inline ex charpoly(const matrix & m, const ex & lambda)
+inline ex charpoly(const matrix & m, const symbol & lambda)
{ return m.charpoly(lambda); }
inline matrix inverse(const matrix & m)
return static_cast<const matrix &>(*e.bp);
}
+extern ex lst_to_matrix(const ex &l);
+
#ifndef NO_NAMESPACE_GINAC
} // namespace GiNaC
#endif // ndef NO_NAMESPACE_GINAC