* Implementation of GiNaC's color (SU(3) Lie algebra) objects. */
/*
- * GiNaC Copyright (C) 1999-2004 Johannes Gutenberg University Mainz, Germany
+ * GiNaC Copyright (C) 1999-2007 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
*
* 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
*/
#include <iostream>
GINAC_IMPLEMENT_REGISTERED_CLASS(color, indexed)
+const tinfo_static_t color::return_type_tinfo_static[256] = {{}};
+
GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(su3one, tensor,
print_func<print_dflt>(&su3one::do_print).
print_func<print_latex>(&su3one::do_print_latex))
color::color() : representation_label(0)
{
- tinfo_key = TINFO_color;
+ tinfo_key = &color::tinfo_static;
}
DEFAULT_CTOR(su3one)
* @see color_ONE */
color::color(const ex & b, unsigned char rl) : inherited(b), representation_label(rl)
{
- tinfo_key = TINFO_color;
+ tinfo_key = &color::tinfo_static;
}
/** Construct object with one color index. This constructor is for internal
* @see color_T */
color::color(const ex & b, const ex & i1, unsigned char rl) : inherited(b, i1), representation_label(rl)
{
- tinfo_key = TINFO_color;
+ tinfo_key = &color::tinfo_static;
}
color::color(unsigned char rl, const exvector & v, bool discardable) : inherited(not_symmetric(), v, discardable), representation_label(rl)
{
- tinfo_key = TINFO_color;
+ tinfo_key = &color::tinfo_static;
}
color::color(unsigned char rl, std::auto_ptr<exvector> vp) : inherited(not_symmetric(), vp), representation_label(rl)
{
- tinfo_key = TINFO_color;
+ tinfo_key = &color::tinfo_static;
}
//////////
return color_d(a, b, c) + I * color_f(a, b, c);
}
-/** Check whether a given tinfo key (as returned by return_type_tinfo()
- * is that of a color object with the specified representation label. */
-static bool is_color_tinfo(unsigned ti, unsigned char rl)
-{
- return ti == (TINFO_color + rl);
-}
-
/** Check whether a given tinfo key (as returned by return_type_tinfo()
* is that of a color object (with an arbitrary representation label). */
-static bool is_color_tinfo(unsigned ti)
+static bool is_color_tinfo(tinfo_t ti)
{
- return (ti & ~0xff) == TINFO_color;
+ p_int start_loc=(p_int)&color::return_type_tinfo_static;
+ return (p_int)ti>=start_loc && (p_int)ti<start_loc+256;
}
/** Extract representation label from tinfo key (as returned by
* return_type_tinfo()). */
-static unsigned char get_representation_label(unsigned ti)
+static unsigned char get_representation_label(tinfo_t ti)
{
- return ti & 0xff;
+ return (unsigned char)((p_int)ti-(p_int)&color::return_type_tinfo_static);
}
ex color_trace(const ex & e, const std::set<unsigned char> & rls)