X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fidx.cpp;h=26e91ff87f7444bfb40d6d3300389d6fc8214034;hp=a688c6d495efff99704309ac795d8fe0202efc8c;hb=8bcccf834ad41e94a1a4f3a0304c2945b228b4f4;hpb=a8507b8af1c08d9b27d98d57f95c7ca1a8671e27 diff --git a/ginac/idx.cpp b/ginac/idx.cpp index a688c6d4..26e91ff8 100644 --- a/ginac/idx.cpp +++ b/ginac/idx.cpp @@ -1,7 +1,8 @@ /** @file idx.cpp * - * Implementation of GiNaC's indices. - * + * Implementation of GiNaC's indices. */ + +/* * GiNaC Copyright (C) 1999 Johannes Gutenberg University Mainz, Germany * * This program is free software; you can redistribute it and/or modify @@ -21,8 +22,14 @@ #include -#include "ginac.h" +#include "idx.h" +#include "ex.h" +#include "lst.h" +#include "relational.h" #include "utils.h" +#include "debugmsg.h" + +namespace GiNaC { ////////// // default constructor, destructor, copy constructor assignment operator and helpers @@ -30,7 +37,7 @@ // public -idx::idx() : basic(TINFO_IDX), symbolic(true), covariant(false) +idx::idx() : basic(TINFO_idx), symbolic(true), covariant(false) { debugmsg("idx default constructor",LOGLEVEL_CONSTRUCT); serial=next_serial++; @@ -82,28 +89,28 @@ void idx::destroy(bool call_parent) // public -idx::idx(bool cov) : basic(TINFO_IDX), symbolic(true), covariant(cov) +idx::idx(bool cov) : basic(TINFO_idx), symbolic(true), covariant(cov) { debugmsg("idx constructor from bool",LOGLEVEL_CONSTRUCT); serial=next_serial++; name="index"+ToString(serial); } -idx::idx(string const & n, bool cov) : basic(TINFO_IDX), +idx::idx(string const & n, bool cov) : basic(TINFO_idx), symbolic(true), name(n), covariant(cov) { debugmsg("idx constructor from string,bool",LOGLEVEL_CONSTRUCT); serial=next_serial++; } -idx::idx(char const * n, bool cov) : basic(TINFO_IDX), +idx::idx(char const * n, bool cov) : basic(TINFO_idx), symbolic(true), name(n), covariant(cov) { debugmsg("idx constructor from char*,bool",LOGLEVEL_CONSTRUCT); serial=next_serial++; } -idx::idx(unsigned const v, bool cov) : basic(TINFO_IDX), +idx::idx(unsigned const v, bool cov) : basic(TINFO_idx), symbolic(false), value(v), covariant(cov) { debugmsg("idx constructor from unsigned,bool",LOGLEVEL_CONSTRUCT); @@ -439,6 +446,4 @@ ex subs_indices(ex const & e, exvector const & idxv_subs, return res; } - - - +} // namespace GiNaC