X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fcolor.h;h=4dbfc3d40baa9c698ea370e73e6814c517758303;hp=e7ad06184574d55ac9d79906fa5b1300ceb40666;hb=8cffcdf13d817a47f217f1a1043317d95969e070;hpb=68fdf425abf14d016d5f95ee7b9d06a19a3c5926 diff --git a/ginac/color.h b/ginac/color.h index e7ad0618..4dbfc3d4 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-2019 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,46 +17,48 @@ * * 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 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; - unsigned return_type() const { return return_types::noncommutative; } - unsigned return_type_tinfo() 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: @@ -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. */ @@ -73,10 +76,12 @@ class su3one : public tensor { GINAC_DECLARE_REGISTERED_CLASS(su3one, tensor) - // functions overriding virtual functions from base 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 @@ -85,9 +90,14 @@ class su3t : public tensor // 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; + 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. */ @@ -97,10 +107,17 @@ class su3f : public tensor // 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 @@ -109,20 +126,21 @@ class su3d : public tensor // 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 -/** 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. * @@ -156,6 +174,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. * @@ -163,7 +193,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