- dirac_one() -> dirac_ONE()

[ginac.git] / check / exam_archive.cpp

diff --git a/check/exam_archive.cpp b/check/exam_archive.cpp
index af8f49051b1e3ff60a3f20ca581aebe27d7a3433..2b8862ccf480a8decd89fc7e295b7796049378e3 100644 (file)
--- a/check/exam_archive.cpp
+++ b/check/exam_archive.cpp
@@ -36,7 +36,7 @@ unsigned exam_archive(void)
 
        // This expression is complete nonsense but it contains every type of
        // GiNaC object
 
        // This expression is complete nonsense but it contains every type of
        // GiNaC object

-       e = -42 * x * pow(y, sin(y*Catalan)) * dirac_one()
+       e = -42 * x * pow(y, sin(y*Catalan)) * dirac_ONE()

            * epsilon_tensor(idx(fail(), 3), idx(0, 3), idx(y/2, 3))
          + lorentz_g(
              varidx(lst(x, -11*y, acos(2*x).series(x==3-5*I, 3)) * color_ONE()
            * epsilon_tensor(idx(fail(), 3), idx(0, 3), idx(y/2, 3))
          + lorentz_g(
              varidx(lst(x, -11*y, acos(2*x).series(x==3-5*I, 3)) * color_ONE()