* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
+#include <iostream>
+
#include "fderivative.h"
#include "print.h"
#include "archive.h"
-#include "debugmsg.h"
#include "utils.h"
namespace GiNaC {
GINAC_IMPLEMENT_REGISTERED_CLASS(fderivative, function)
//////////
-// default constructor, destructor, copy constructor assignment operator and helpers
+// default ctor, dtor, copy ctor, assignment operator and helpers
//////////
fderivative::fderivative()
{
- debugmsg("fderivative default constructor", LOGLEVEL_CONSTRUCT);
tinfo_key = TINFO_fderivative;
}
fderivative::fderivative(unsigned ser, unsigned param, const exvector & args) : function(ser, args)
{
- debugmsg("fderivative constructor from unsigned,unsigned,exvector", LOGLEVEL_CONSTRUCT);
parameter_set.insert(param);
tinfo_key = TINFO_fderivative;
}
fderivative::fderivative(unsigned ser, const paramset & params, const exvector & args) : function(ser, args), parameter_set(params)
{
- debugmsg("fderivative constructor from unsigned,paramset,exvector", LOGLEVEL_CONSTRUCT);
tinfo_key = TINFO_fderivative;
}
fderivative::fderivative(unsigned ser, const paramset & params, exvector * vp) : function(ser, vp), parameter_set(params)
{
- debugmsg("fderivative constructor from unsigned,paramset,exvector *", LOGLEVEL_CONSTRUCT);
tinfo_key = TINFO_fderivative;
}
fderivative::fderivative(const archive_node &n, const lst &sym_lst) : inherited(n, sym_lst)
{
- debugmsg("fderivative constructor from archive_node", LOGLEVEL_CONSTRUCT);
unsigned i = 0;
while (true) {
unsigned u;
parameter_set.insert(u);
else
break;
- i++;
+ ++i;
}
}
void fderivative::print(const print_context & c, unsigned level) const
{
- debugmsg("fderivative print", LOGLEVEL_PRINT);
-
if (is_a<print_tree>(c)) {
c.s << std::string(level, ' ') << class_name() << " "
int fderivative::compare_same_type(const basic & other) const
{
- GINAC_ASSERT(is_of_type(other, fderivative));
+ GINAC_ASSERT(is_a<fderivative>(other));
const fderivative & o = static_cast<const fderivative &>(other);
if (parameter_set != o.parameter_set)
bool fderivative::is_equal_same_type(const basic & other) const
{
- GINAC_ASSERT(is_of_type(other, fderivative));
+ GINAC_ASSERT(is_a<fderivative>(other));
const fderivative & o = static_cast<const fderivative &>(other);
if (parameter_set != o.parameter_set)
bool fderivative::match_same_type(const basic & other) const
{
- GINAC_ASSERT(is_of_type(other, fderivative));
+ GINAC_ASSERT(is_a<fderivative>(other));
const fderivative & o = static_cast<const fderivative &>(other);
return parameter_set == o.parameter_set;