* Lewis and Michael Wester. */
/*
- * GiNaC Copyright (C) 1999-2000 Johannes Gutenberg University Mainz, Germany
+ * GiNaC Copyright (C) 1999-2003 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
#include "times.h"
+static const bool do_test = true; // set to true in order to run this beast
+
static unsigned test1(void)
{
symbol a1("a1"), a2("a2"), a3("a3"), a4("a4"), a5("a5"), a6("a6");
double time = .0;
cout << "timing Lewis-Wester test O1 (three 15x15 dets)" << flush;
- clog << "-------Lewis-Wester test O1 (three 15x15 dets)" << endl;
-
- rolex.start();
- // correct for very small times:
- do {
- result = test1();
- ++count;
- } while ((time=rolex.read())<0.1 && !result);
+ clog << "-------Lewis-Wester test O1 (three 15x15 dets):" << endl;
- if (!result) {
- cout << " passed ";
- clog << "(no output)" << endl;
+ if (do_test) {
+ rolex.start();
+ // correct for very small times:
+ do {
+ result = test1();
+ ++count;
+ } while ((time=rolex.read())<0.1 && !result);
+
+ if (!result) {
+ cout << " passed ";
+ clog << "(no output)" << endl;
+ } else {
+ cout << " failed ";
+ }
+ cout << int(1000*(time/(3*count)))*0.001 << "s (average)" << endl;
} else {
- cout << " failed ";
+ cout << " disabled" << endl;
+ clog << "(no output)" << endl;
}
- cout << int(1000*(time/(3*count)))*0.001 << "s (average)" << endl;
return result;
}