X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?a=blobdiff_plain;ds=sidebyside;f=ginac%2Ffderivative.h;h=c15cc66221197659c3fd7c7db994f909880739ce;hb=71118ab007969a09872193641469318c9dc4fbcc;hp=a9d416a2e658566a6d99f3aabd40cdd7f8c2d23c;hpb=6d225ee55693c0617d254e6fa283c00c71bd2919;p=ginac.git diff --git a/ginac/fderivative.h b/ginac/fderivative.h index a9d416a2..c15cc662 100644 --- a/ginac/fderivative.h +++ b/ginac/fderivative.h @@ -3,7 +3,7 @@ * Interface to abstract derivatives of functions. */ /* - * GiNaC Copyright (C) 1999-2004 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2009 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,18 +17,17 @@ * * 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_FDERIVATIVE_H__ -#define __GINAC_FDERIVATIVE_H__ - -#include +#ifndef GINAC_FDERIVATIVE_H +#define GINAC_FDERIVATIVE_H #include "function.h" -namespace GiNaC { +#include +namespace GiNaC { typedef std::multiset paramset; @@ -66,6 +65,8 @@ public: ex series(const relational & r, int order, unsigned options = 0) const; ex thiscontainer(const exvector & v) const; ex thiscontainer(std::auto_ptr vp) const; + void archive(archive_node& n) const; + void read_archive(const archive_node& n, lst& syms); protected: ex derivative(const symbol & s) const; bool is_equal_same_type(const basic & other) const; @@ -74,21 +75,15 @@ protected: // non-virtual functions in this class protected: void do_print(const print_context & c, unsigned level) const; + void do_print_csrc(const print_csrc & c, unsigned level) const; void do_print_tree(const print_tree & c, unsigned level) const; // member variables protected: paramset parameter_set; /**< Set of parameter numbers with respect to which to take the derivative */ }; - -// utility functions - -/** Specialization of is_exactly_a(obj) for derivatives. */ -template<> inline bool is_exactly_a(const basic & obj) -{ - return obj.tinfo()==TINFO_fderivative; -} +GINAC_DECLARE_UNARCHIVER(fderivative); } // namespace GiNaC -#endif // ndef __GINAC_DERIVATIVE_H__ +#endif // ndef GINAC_DERIVATIVE_H