* Here we test GiNaC's color objects (su(3) Lie algebra). */
/*
- * GiNaC Copyright (C) 1999-2008 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
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
-#include <iostream>
#include "ginac.h"
-using namespace std;
using namespace GiNaC;
+#include <iostream>
+using namespace std;
+
static unsigned check_equal(const ex &e1, const ex &e2)
{
ex e = e1 - e2;
for (int i=1; i<9; i++)
for (int j=1; j<9; j++)
for (int k=1; k<9; k++)
- sum += e.subs(lst(a == i, b == j, c == k));
+ sum += e.subs(lst{a == i, b == j, c == k});
if (!sum.is_equal(numeric(-32,3))) {
clog << "numeric contraction of " << e << " erroneously returned "
<< sum << " instead of -32/3" << endl;
result += check_equal(color_trace(e, 0), color_ONE(1) / 3);
result += check_equal(color_trace(e, 1), color_ONE(0) / 3);
result += check_equal(color_trace(e, 2), e);
- result += check_equal(color_trace(e, lst(0, 1)), 1);
+ result += check_equal(color_trace(e, lst{0, 1}), 1);
e = color_T(a, 0) * color_T(a, 1) * color_T(b, 0) * color_T(b, 1);
result += check_equal_simplify(color_trace(e, 0), 2 * color_ONE(1) / 3);
result += check_equal_simplify(color_trace(e, 1), 2 * color_ONE(0) / 3);
result += check_equal_simplify(color_trace(e, 2), e);
- result += check_equal_simplify(color_trace(e, lst(0, 1)), 2);
+ result += check_equal_simplify(color_trace(e, lst{0, 1}), 2);
return result;
}