X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fcolor.h;h=d43fa44fb506668ccbddac7dd5a7f4bb2142e35c;hp=04d7c5d9e88c106869d37c2e025c3b1fe5e7faa9;hb=f9880838cc42de5dfbedcbc181eaedf6c07bfc75;hpb=e58f5808a2d0fe6cb9d60370ede700d97a8bb702 diff --git a/ginac/color.h b/ginac/color.h index 04d7c5d9..d43fa44f 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-2001 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2020 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,50 +17,58 @@ * * 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); color(const ex & b, const ex & i1, unsigned char rl = 0); // 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, const exvector & v); + color(unsigned char rl, exvector && v); + void archive(archive_node& n) const override; + void read_archive(const archive_node& n, lst& sym_lst) override; // functions overriding virtual functions from base classes protected: - ex simplify_ncmul(const exvector & v) const; - ex thisexprseq(const exvector & v) const; - ex thisexprseq(exvector * vp) const; - unsigned return_type(void) const { return return_types::noncommutative; } - unsigned return_type_tinfo(void) const { return TINFO_color + representation_label; } + ex eval_ncmul(const exvector & v) const override; + bool match_same_type(const basic & other) const override; + ex thiscontainer(const exvector & v) const override; + ex thiscontainer(exvector && v) const override; + unsigned return_type() const override { return return_types::noncommutative; } + return_type_t return_type_tinfo() const override; + + // non-virtual functions in this class +public: + unsigned char get_representation_label() const {return representation_label;} // member variables 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. */ @@ -68,20 +76,28 @@ class su3one : public tensor { GINAC_DECLARE_REGISTERED_CLASS(su3one, tensor) - // functions overriding virtual functions from bases classes -public: - void print(const print_context & c, unsigned level = 0) const; + // non-virtual functions in this class +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 { GINAC_DECLARE_REGISTERED_CLASS(su3t, tensor) - // functions overriding virtual functions from bases classes + // functions overriding virtual functions from base classes public: - void print(const print_context & c, unsigned level = 0) const; + bool contract_with(exvector::iterator self, exvector::iterator other, exvector & v) const override; + + // non-virtual functions in this class +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. */ @@ -89,32 +105,41 @@ class su3f : public tensor { GINAC_DECLARE_REGISTERED_CLASS(su3f, tensor) - // functions overriding virtual functions from bases classes + // functions overriding virtual functions from base classes public: - void print(const print_context & c, unsigned level = 0) const; - ex eval_indexed(const basic & i) const; - bool contract_with(exvector::iterator self, exvector::iterator other, exvector & v) const; + ex eval_indexed(const basic & i) const override; + bool contract_with(exvector::iterator self, exvector::iterator other, exvector & v) const override; +protected: + unsigned return_type() const override { return return_types::commutative; } + + // non-virtual functions in this class +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(su3f); /** This class represents the tensor of symmetric su(3) structure constants. */ class su3d : public tensor { GINAC_DECLARE_REGISTERED_CLASS(su3d, tensor) - // functions overriding virtual functions from bases classes + // functions overriding virtual functions from base classes public: - void print(const print_context & c, unsigned level = 0) const; - ex eval_indexed(const basic & i) const; - bool contract_with(exvector::iterator self, exvector::iterator other, exvector & v) const; + ex eval_indexed(const basic & i) const override; + bool contract_with(exvector::iterator self, exvector::iterator other, exvector & v) const override; +protected: + unsigned return_type() const override { return return_types::commutative; } + + // non-virtual functions in this class +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(su3d); // global functions -inline const color &ex_to_color(const ex &e) -{ - return static_cast(*e.bp); -} - /** Create the su(3) unity element. This is an indexed object, although it * has no indices. @@ -149,7 +174,25 @@ 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. + * + * @param e Expression to take the trace of + * @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