X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=check%2Fexam_misc.cpp;h=c9872a93284bce8659586a99ba2afc4d52fc9bba;hp=3b2ff8eac6679bb9b3271b5ae1b3d599f55655bc;hb=5136cb28833944aedbd47e1f66cd4a103e6697b1;hpb=fcc1f605535081bfcee74dc1a154839e10b807ef

diff --git a/check/exam_misc.cpp b/check/exam_misc.cpp
index 3b2ff8ea..c9872a93 100644
--- a/check/exam_misc.cpp
+++ b/check/exam_misc.cpp
@@ -27,20 +27,17 @@
 static unsigned exam_expand_subs(void)
 {
 	unsigned result = 0;
-	symbol a1("a1");
 	symbol a[VECSIZE];
 	ex e, aux;
 	
-	a[1] = a1;
-	for (unsigned i=0; i<VECSIZE; ++i) {
+	for (unsigned i=0; i<VECSIZE; ++i)
 		e = e + a[i];
-	}
 	
 	// prepare aux so it will swallow anything but a1^2:
 	aux = -e + a[0] + a[1];
 	e = expand(subs(expand(pow(e, 2)), a[0] == aux));
 	
-	if (e != pow(a1,2)) {
+	if (e != pow(a[1],2)) {
 		clog << "Denny Fliegner's quick consistency check erroneously returned "
 		     << e << "." << endl;
 		++result;