X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?a=blobdiff_plain;ds=sidebyside;f=check%2Ftime_lw_E.cpp;h=6cfcd6720df22db44f60ab61b60b70a8056f936f;hb=a750bdfebab4f7ed3c2f69c2983c6820732521b8;hp=95a4fd4ae1616fed92eb4801c73380d7086e6fc7;hpb=af922d5eb36ed70e4a9e3ffaf4c24492cf89a1a6;p=ginac.git

diff --git a/check/time_lw_E.cpp b/check/time_lw_E.cpp
index 95a4fd4a..6cfcd672 100644
--- a/check/time_lw_E.cpp
+++ b/check/time_lw_E.cpp
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2000 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2001 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
@@ -32,7 +32,9 @@ static unsigned test(void)
 	for (int i=1; i<=10; ++i)
 		s += i*y*pow(t,i)/pow(y + abs(5-i)*t,i);
 	
-	if (s.nops()!=10) {
+	s = s.normal();
+	
+	if (s.subs(t==0)!=0) {
 		clog << "something very strange happened" << endl;
 		return 1;
 	}
@@ -46,8 +48,8 @@ unsigned time_lw_E(void)
 	timer rolex;
 	double time = .0;
 	
-	cout << "timing Lewis-Wester test E (sum of rational fcns)" << flush;
-	clog << "-------Lewis-Wester test E (sum of rational fcns)" << endl;
+	cout << "timing Lewis-Wester test E (normalized sum of rational fcns)" << flush;
+	clog << "-------Lewis-Wester test E (normalized sum of rational fcns)" << endl;
 	
 	rolex.start();
 	// correct for very small times:
@@ -63,7 +65,7 @@ unsigned time_lw_E(void)
 	} else {
 		cout << " failed ";
 	}
-	cout << int(100000*(time/count))*0.00001 << 's' << endl;
+	cout << int(1000*(time/count))*0.001 << 's' << endl;
 	
 	return result;
 }