X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?a=blobdiff_plain;f=ginac%2Findexed.h;h=919fc18e81f3026119a10fdf1bd3810ede99ae22;hb=97af29c12bb3074cfb4e674d71000f0712c51ba2;hp=97e3e1a71229f4f056f8919b81c0d0227690ff57;hpb=66c0f31c678e6c1938d637636b230ea376c157c1;p=ginac.git diff --git a/ginac/indexed.h b/ginac/indexed.h index 97e3e1a7..919fc18e 100644 --- a/ginac/indexed.h +++ b/ginac/indexed.h @@ -1,8 +1,9 @@ /** @file indexed.h * - * Interface to GiNaC's index carrying objects. - * - * GiNaC Copyright (C) 1999 Johannes Gutenberg University Mainz, Germany + * Interface to GiNaC's index carrying objects. */ + +/* + * GiNaC Copyright (C) 1999-2000 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 @@ -23,29 +24,36 @@ #define __GINAC_INDEXED_H__ #include -#include +#include "exprseq.h" + +#ifndef NO_NAMESPACE_GINAC +namespace GiNaC { +#endif // ndef NO_NAMESPACE_GINAC /** Base class for non-commutative indexed objects */ class indexed : public exprseq { + GINAC_DECLARE_REGISTERED_CLASS(indexed, exprseq) + // member functions // default constructor, destructor, copy constructor assignment operator and helpers public: indexed(); ~indexed(); - indexed(indexed const & other); - indexed const & operator=(indexed const & other); + indexed(const indexed & other); + const indexed & operator=(const indexed & other); protected: - void copy(indexed const & other); + void copy(const indexed & other); void destroy(bool call_parent); // other constructors public: - indexed(ex const & i1); - indexed(ex const & i1, ex const & i2); - indexed(ex const & i1, ex const & i2, ex const & i3); - indexed(exvector const & iv); + indexed(const ex & i1); + indexed(const ex & i1, const ex & i2); + indexed(const ex & i1, const ex & i2, const ex & i3); + indexed(const ex & i1, const ex & i2, const ex & i3, const ex & i4); + indexed(const exvector & iv); indexed(exvector * iv); // functions overriding virtual functions from base classes @@ -56,14 +64,14 @@ public: void print(ostream & os, unsigned upper_precedence=0) const; void printcsrc(ostream & os, unsigned type, unsigned upper_precedence) const; bool info(unsigned inf) const; - ex diff(symbol const & s) const; exvector get_indices(void) const; protected: - int compare_same_type(basic const & other) const; - bool is_equal_same_type(basic const & other) const; + ex derivative(const symbol & s) const; + int compare_same_type(const basic & other) const; + bool is_equal_same_type(const basic & other) const; unsigned return_type(void) const; unsigned return_type_tinfo(void) const; - ex thisexprseq(exvector const & v) const; + ex thisexprseq(const exvector & v) const; ex thisexprseq(exvector * vp) const; // new virtual functions which can be overridden by derived classes @@ -83,12 +91,16 @@ protected: // global constants extern const indexed some_indexed; -extern type_info const & typeid_indexed; +extern const type_info & typeid_indexed; -// macros +// utility functions +inline const indexed &ex_to_indexed(const ex &e) +{ + return static_cast(*e.bp); +} -#define ex_to_indexed(X) static_cast(*(X).bp) +#ifndef NO_NAMESPACE_GINAC +} // namespace GiNaC +#endif // ndef NO_NAMESPACE_GINAC #endif // ndef __GINAC_INDEXED_H__ - -