From c029603c04ff63a6b171ff1f949d43c50413f49d Mon Sep 17 00:00:00 2001 From: Christian Bauer Date: Mon, 21 May 2001 22:45:48 +0000 Subject: [PATCH] updated for changes in Clifford/color classes --- check/exam_clifford.cpp | 2 +- check/exam_color.cpp | 2 ++ 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/check/exam_clifford.cpp b/check/exam_clifford.cpp index dadd9e16..bea0a219 100644 --- a/check/exam_clifford.cpp +++ b/check/exam_clifford.cpp @@ -154,7 +154,7 @@ static unsigned clifford_check3(void) // non-cyclicity of order D-4 of gamma5 * S_6 e = dirac_gamma5() * dirac_gamma(mu) * dirac_gamma(nu) * dirac_gamma(rho) * dirac_gamma(sig) * dirac_gamma(kap) * dirac_gamma(mu.toggle_variance()) + dim * dirac_gamma5() * dirac_gamma(nu) * dirac_gamma(rho) * dirac_gamma(sig) * dirac_gamma(kap); - e = dirac_trace(e); + e = dirac_trace(e).simplify_indexed(); e = (e / (dim - 4)).normal(); result += check_equal(e, 8 * I * eps0123(nu, rho, sig, kap)); diff --git a/check/exam_color.cpp b/check/exam_color.cpp index 2190db8e..0e31213c 100644 --- a/check/exam_color.cpp +++ b/check/exam_color.cpp @@ -101,6 +101,8 @@ static unsigned color_check2(void) result += check_equal_simplify(e, 16 * color_ONE() / 9); e = color_T(a) * color_T(b) * color_T(c) * color_T(c) * color_T(b) * color_T(a); result += check_equal_simplify(e, 64 * color_ONE() / 27); + e = color_T(a) * color_T(b) * color_T(c) * color_T(k) * color_T(a) * color_T(k) * color_T(c) * color_T(b); + result += check_equal_simplify(e, -color_ONE() / 162); return result; } -- 2.44.0