index cafda13a8ecec1f7bac8b9ddf17909a721b0c186..ff510b314dde61623ef9bef397a99fcda6b9fc50 100644 (file)
@@ -3,7 +3,7 @@
*  These exams test solving small linear systems of symbolic equations. */

/*
- *  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
@@ -22,7 +22,7 @@

#include "exams.h"

-static unsigned exam_lsolve1(void)
+static unsigned exam_lsolve1()
{
// A trivial example.
unsigned result = 0;
@@ -34,13 +34,13 @@ static unsigned exam_lsolve1(void)
if (aux != 1) {
++result;
clog << "solution of 3*x+5==8 erroneously returned "
-                        << aux << endl;
+                    << aux << endl;
}

return result;
}

-static unsigned exam_lsolve2a(void)
+static unsigned exam_lsolve2a()
{
// An example from the Maple online help.
unsigned result = 0;
@@ -62,13 +62,13 @@ static unsigned exam_lsolve2a(void)
!normal(sol_y - (3-a*b)/(a+b)).is_zero()) {
++result;
clog << "solution of the system " << eqns << " for " << vars
-                        << " erroneously returned " << sol << endl;
+                    << " erroneously returned " << sol << endl;
}

return result;
}

-static unsigned exam_lsolve2b(void)
+static unsigned exam_lsolve2b()
{
// A boring example from Mathematica's online help.
unsigned result = 0;
@@ -90,13 +90,13 @@ static unsigned exam_lsolve2b(void)
(sol_y != numeric(-10,17))) {
++result;
clog << "solution of the system " << eqns << " for " << vars
-                        << " erroneously returned " << sol << endl;
+                    << " erroneously returned " << sol << endl;
}

return result;
}

-static unsigned exam_lsolve2c(void)
+static unsigned exam_lsolve2c()
{
// A more interesting example from the Maple online help.
unsigned result = 0;
@@ -118,13 +118,13 @@ static unsigned exam_lsolve2c(void)
(sol_y != numeric(-1,2))) {
++result;
clog << "solution of the system " << eqns << " for " << vars
-                        << " erroneously returned " << sol << endl;
+                    << " erroneously returned " << sol << endl;
}

return result;
}

-static unsigned exam_lsolve2S(void)
+static unsigned exam_lsolve2S()
{
// A degenerate example that went wrong in GiNaC 0.6.2.
unsigned result = 0;
@@ -146,13 +146,13 @@ static unsigned exam_lsolve2S(void)
(sol_y != t)) {
++result;
clog << "solution of the system " << eqns << " for " << vars
-                        << " erroneously returned " << sol << endl;
+                    << " erroneously returned " << sol << endl;
}

return result;
}

-static unsigned exam_lsolve3S(void)
+static unsigned exam_lsolve3S()
{
// A degenerate example that went wrong while trying to improve elimination
unsigned result = 0;
@@ -177,13 +177,13 @@ static unsigned exam_lsolve3S(void)
(sol_z != (b+c)/2)) {
++result;
clog << "solution of the system " << eqns << " for " << vars
-                        << " erroneously returned " << sol << endl;
+                    << " erroneously returned " << sol << endl;
}

return result;
}

-unsigned exam_lsolve(void)
+unsigned exam_lsolve()
{
unsigned result = 0;