* Added exams

* Modified antipode-benchmark

diff --git a/check/exam_pseries.cpp b/check/exam_pseries.cpp
index 0bffc11950a79114a2ccab163be956516f53949e..28a6150ff52c0242f6c7a27d34fe7795d75b78a0 100644 (file)
--- a/check/exam_pseries.cpp
+++ b/check/exam_pseries.cpp
@@ -105,6 +105,10 @@ static unsigned exam_series1(void)
        result += check_series(e, 0, d, 1);
        result += check_series(e, 0, d, 2);
        
+       e = pow(x, 8) * pow(pow(x,3)+ pow(x + pow(x,3), 2), -2);
+       d = pow(x, 4) - 2*pow(x, 5) + Order(pow(x, 6));
+       result += check_series(e, 0, d, 6);
+       
        return result;
 }
 

diff --git a/check/time_antipode.cpp b/check/time_antipode.cpp
index e861b23c17387172ffbe04528d4ee396801e12ed..be8dc4d69a5eeb9cc1b853f24c9ee53a7d0568e0 100644 (file)
--- a/check/time_antipode.cpp
+++ b/check/time_antipode.cpp
@@ -455,7 +455,7 @@ static unsigned test_tree(const node tree_generator(unsigned))
        // ...the sum, when evaluated and reexpanded, is the antipode...
        ex result = 0;
        for (vector<node>::iterator i=counter.begin(); i!=counter.end(); ++i)
-               result = (result+i->evaluate(x,vertices)).series(x==0,vertices).expand();
+               result = (result+i->evaluate(x,vertices-1)).series(x==0,vertices-1).expand();
        
        // ...and has the nice property that in each term all the Eulers cancel:
        if (result.has(Euler)) {