Hi.
I'm having a problem with using Gdelta to compute the Gauss-Bonnet term.
While the command
Gdelta[-a1, -a2, -a3, -a4, b1, b2, b3, b4] RiemannCD[a1,
a2, -b1, -b2] RiemannCD[a3, a4, -b3, -b4] // CollectTensors
produces the Gauss-Bonnet term with Riemann^2:Ricci^2:RicciScalar^2 in the correct ratio
4:(-16):4, the seemingly identical command
Gdelta[-a1, -b1, -a2, -b2, c1, d1, c2, d2] RiemannCD[a1,
b1, -c1, -d1] RiemannCD[a2, b2, -c2, -d2] // CollectTensors
produces the the curvature squared terms in the incorrect ratio (-4):8:(-4).
(The preamble, before issuing the above two commands, in my Mathematica notebook is
Quit
<< xAct`xTensor`
<< xAct`xTras`;
DefManifold[M,
dim, {a, b, c, d, a1, b1, c1, d1, a2, b2, c2, d2, a3, b3, a4, b4}];
DefMetric[-1, g[-a, -b], CD, {";", "\[EmptyDownTriangle]"}];
)
Best,
Chris