* Here we test GiNaC's Clifford algebra objects. */
/*
- * GiNaC Copyright (C) 1999-2003 Johannes Gutenberg University Mainz, Germany
+ * GiNaC Copyright (C) 1999-2004 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
ex e;
e = dirac_gamma(mu) * dirac_gamma(nu) + dirac_gamma(nu) * dirac_gamma(mu);
- result += check_equal(canonicalize_clifford(e), 2*lorentz_g(mu, nu));
+ result += check_equal(canonicalize_clifford(e), 2*dirac_ONE()*lorentz_g(mu, nu));
e = (dirac_gamma(mu) * dirac_gamma(nu) * dirac_gamma(lam)
+ dirac_gamma(nu) * dirac_gamma(lam) * dirac_gamma(mu)