X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fcolor.h;h=cf262a451cfd58f8db4fcd173a984f23b80b92fc;hp=3af0c5c2cf7c81a5af3e4648ec65a49c58cb3790;hb=073bf40a73e419a3dbcb6dfa190947ce2cc3bdce;hpb=488cad4c124885230154720041bd51fa4d983a8b diff --git a/ginac/color.h b/ginac/color.h index 3af0c5c2..cf262a45 100644 --- a/ginac/color.h +++ b/ginac/color.h @@ -3,7 +3,7 @@ * Interface to GiNaC's color (SU(3) Lie algebra) objects. */ /* - * GiNaC Copyright (C) 1999-2003 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2011 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,29 +17,29 @@ * * 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_COLOR_H__ -#define __GINAC_COLOR_H__ +#ifndef GINAC_COLOR_H +#define GINAC_COLOR_H #include "indexed.h" #include "tensor.h" -namespace GiNaC { +#include +namespace GiNaC { /** This class holds a generator T_a or the unity element of the Lie algebra * of SU(3), as used for calculations in quantum chromodynamics. A * representation label (an unsigned 8-bit integer) is used to distinguish * elements from different Lie algebras (objects with different labels - * commute). These objects implement an abstract representation of the + * commutate). These objects implement an abstract representation of the * group, not a specific matrix representation. The indices used for color * objects should not have a variance. */ class color : public indexed { GINAC_DECLARE_REGISTERED_CLASS(color, indexed) - // other constructors public: color(const ex & b, unsigned char rl = 0); @@ -47,16 +47,18 @@ public: // internal constructors color(unsigned char rl, const exvector & v, bool discardable = false); - color(unsigned char rl, exvector * vp); // vp will be deleted + color(unsigned char rl, std::auto_ptr vp); + void archive(archive_node& n) const; + void read_archive(const archive_node& n, lst& sym_lst); // functions overriding virtual functions from base classes protected: ex eval_ncmul(const exvector & v) const; bool match_same_type(const basic & other) const; ex thiscontainer(const exvector & v) const; - ex thiscontainer(exvector * vp) const; + ex thiscontainer(std::auto_ptr vp) const; unsigned return_type() const { return return_types::noncommutative; } - unsigned return_type_tinfo() const { return TINFO_color + representation_label; } + return_type_t return_type_tinfo() const; // non-virtual functions in this class public: @@ -66,6 +68,7 @@ public: private: unsigned char representation_label; /**< Representation label to distinguish independent color matrices coming from separated fermion lines */ }; +GINAC_DECLARE_UNARCHIVER(color); /** This class represents the su(3) unity element. */ @@ -78,6 +81,7 @@ protected: void do_print(const print_context & c, unsigned level) const; void do_print_latex(const print_latex & c, unsigned level) const; }; +GINAC_DECLARE_UNARCHIVER(su3one); /** This class represents an su(3) generator. */ class su3t : public tensor @@ -93,6 +97,7 @@ protected: void do_print(const print_context & c, unsigned level) const; void do_print_latex(const print_latex & c, unsigned level) const; }; +GINAC_DECLARE_UNARCHIVER(su3t); /** This class represents the tensor of antisymmetric su(3) structure * constants. */ @@ -107,9 +112,11 @@ public: // non-virtual functions in this class protected: + unsigned return_type() const { return return_types::commutative; } void do_print(const print_context & c, unsigned level) const; void do_print_latex(const print_latex & c, unsigned level) const; }; +GINAC_DECLARE_UNARCHIVER(su3f); /** This class represents the tensor of symmetric su(3) structure constants. */ class su3d : public tensor @@ -123,19 +130,15 @@ public: // non-virtual functions in this class protected: + unsigned return_type() const { return return_types::commutative; } void do_print(const print_context & c, unsigned level) const; void do_print_latex(const print_latex & c, unsigned level) const; }; +GINAC_DECLARE_UNARCHIVER(su3d); // global functions -/** Specialization of is_exactly_a(obj) for color objects. */ -template<> inline bool is_exactly_a(const basic & obj) -{ - return obj.tinfo()==TINFO_color; -} - /** Create the su(3) unity element. This is an indexed object, although it * has no indices. * @@ -169,6 +172,18 @@ ex color_d(const ex & a, const ex & b, const ex & c); /** This returns the linear combination d.a.b.c+I*f.a.b.c. */ ex color_h(const ex & a, const ex & b, const ex & c); +/** Calculate color traces over the specified set of representation labels. + * + * @param e Expression to take the trace of + * @param rls Set of representation labels */ +ex color_trace(const ex & e, const std::set & rls); + +/** Calculate color traces over the specified list of representation labels. + * + * @param e Expression to take the trace of + * @param rll List of representation labels */ +ex color_trace(const ex & e, const lst & rll); + /** Calculate the trace of an expression containing color objects with a * specified representation label. * @@ -176,7 +191,6 @@ ex color_h(const ex & a, const ex & b, const ex & c); * @param rl Representation label */ ex color_trace(const ex & e, unsigned char rl = 0); - } // namespace GiNaC -#endif // ndef __GINAC_COLOR_H__ +#endif // ndef GINAC_COLOR_H