X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=check%2Fexam_indexed.cpp;h=10eb3d01e0b65b5dba44a18f4013cd264c918490;hp=bbbbf4278f388718b29f580549a81f41fea0a441;hb=ba4692d78f4412b3b072e86c2b48e8e716e82fff;hpb=4dc267ddbec7fcc1ba15bf0d60d72a346c9efb26

diff --git a/check/exam_indexed.cpp b/check/exam_indexed.cpp
index bbbbf427..10eb3d01 100644
--- a/check/exam_indexed.cpp
+++ b/check/exam_indexed.cpp
@@ -307,6 +307,30 @@ static unsigned spinor_check(void)
 	return result;
 }
 
+static unsigned dummy_check(void)
+{
+	// check dummy index renaming
+
+	unsigned result = 0;
+
+	symbol p("p"), q("q");
+	idx i(symbol("i"), 3), j(symbol("j"), 3), n(symbol("n"), 3);
+	varidx mu(symbol("mu"), 4), nu(symbol("nu"), 4);
+	ex e;
+
+	e = indexed(p, i) * indexed(q, i) - indexed(p, j) * indexed(q, j);
+	result += check_equal_simplify(e, 0);
+
+	e = indexed(p, i) * indexed(p, i) * indexed(q, j) * indexed(q, j)
+	  - indexed(p, n) * indexed(p, n) * indexed(q, j) * indexed(q, j);
+	result += check_equal_simplify(e, 0);
+
+	e = indexed(p, mu, mu.toggle_variance()) - indexed(p, nu, nu.toggle_variance());
+	result += check_equal_simplify(e, 0);
+
+	return result;
+}
+
 unsigned exam_indexed(void)
 {
 	unsigned result = 0;
@@ -321,6 +345,7 @@ unsigned exam_indexed(void)
 	result += scalar_product_check();  cout << '.' << flush;
 	result += edyn_check();  cout << '.' << flush;
 	result += spinor_check(); cout << '.' << flush;
+	result += dummy_check(); cout << '.' << flush;
 	
 	if (!result) {
 		cout << " passed " << endl;