- more logic on the trigonometric function stuff.

[ginac.git] / check / series_expansion.cpp

diff --git a/check/series_expansion.cpp b/check/series_expansion.cpp
index b8e80204606a52620e8b000f331583ed3f49f9df..5660e708db3ad01eb38ba64a73502c49fb94ec1b 100644 (file)
--- a/check/series_expansion.cpp
+++ b/check/series_expansion.cpp
@@ -137,6 +137,7 @@ static unsigned series4(void)
     unsigned result = 0;
     ex e, d;
     
+    // gamma(-1):
     e = gamma(2*x);
     d = pow(x+1,-1)*numeric(1,4) +
         pow(x+1,0)*(numeric(3,4) -
@@ -165,6 +166,7 @@ static unsigned series4(void)
         Order(pow(x+1,4));
     result += check_series(e, -1, d, 4);
     
+    // tan(Pi/2)
     e = tan(x*Pi/2);
     d = pow(x-1,-1)/Pi*(-2) +
         pow(x-1,1)*Pi/6 +