X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fconstant.h;h=8ca145cd4bfd848e9ade2f9478481bb99e471cda;hp=160b7ac61aa294febcb2051839dc214bf8a23b55;hb=23ec069cf5e221e0da2890208e69b317b7d27e03;hpb=591b85b0697370f2f5f25a29a1e94ff831a02c12 diff --git a/ginac/constant.h b/ginac/constant.h index 160b7ac6..8ca145cd 100644 --- a/ginac/constant.h +++ b/ginac/constant.h @@ -3,7 +3,7 @@ * Interface to GiNaC's constant types and some special constants. */ /* - * GiNaC Copyright (C) 1999-2001 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2007 Johannes Gutenberg University Mainz, Germany * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -17,7 +17,7 @@ * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ #ifndef __GINAC_CONSTANT_H__ @@ -29,7 +29,7 @@ namespace GiNaC { -typedef ex (*evalffunctype)(void); +typedef ex (*evalffunctype)(); /** This class holds constants, symbols with specific numerical value. Each * object of this class must either provide their own function to evaluate it @@ -41,59 +41,46 @@ class constant : public basic // member functions - // other ctors + // other constructors public: - constant(const std::string & initname, evalffunctype efun = 0, const std::string & texname = std::string()); - constant(const std::string & initname, const numeric & initnumber, const std::string & texname = std::string()); + constant(const std::string & initname, evalffunctype efun = 0, const std::string & texname = std::string(), unsigned domain = domain::complex); + constant(const std::string & initname, const numeric & initnumber, const std::string & texname = std::string(), unsigned domain = domain::complex); - // functions overriding virtual functions from bases classes + // functions overriding virtual functions from base classes public: - void print(const print_context & c, unsigned level = 0) const; - int degree(const ex & s) const; - int ldegree(const ex & s) const; - ex coeff(const ex & s, int n = 1) const; + bool info(unsigned inf) const; ex evalf(int level = 0) const; + bool is_polynomial(const ex & var) const; + ex conjugate() const; + ex real_part() const; + ex imag_part() const; protected: ex derivative(const symbol & s) const; bool is_equal_same_type(const basic & other) const; - unsigned calchash(void) const; - - // new virtual functions which can be overridden by derived classes - // none + unsigned calchash() const; // non-virtual functions in this class - // none - +protected: + void do_print(const print_context & c, unsigned level) const; + void do_print_tree(const print_tree & c, unsigned level) const; + void do_print_latex(const print_latex & c, unsigned level) const; + void do_print_python_repr(const print_python_repr & c, unsigned level) const; + // member variables - private: std::string name; ///< printname of this constant std::string TeX_name; ///< LaTeX name evalffunctype ef; - numeric *number; ///< numerical value this constant evalf()s to + ex number; ///< numerical value this constant evalf()s to unsigned serial; ///< unique serial number for comparison static unsigned next_serial; + unsigned domain; ///< numerical value this constant evalf()s to }; extern const constant Pi; extern const constant Catalan; extern const constant Euler; -// utility functions - -/** Return the constant object handled by an ex. Deprecated: use ex_to(). - * This is unsafe: you need to check the type first. */ -inline const constant &ex_to_constant(const ex &e) -{ - return static_cast(*e.bp); -} - -/** Specialization of is_exactly_a(obj) for constant objects. */ -template<> inline bool is_exactly_a(const basic & obj) -{ - return obj.tinfo()==TINFO_constant; -} - } // namespace GiNaC #endif // ndef __GINAC_CONSTANT_H__