From 8a3a0aad0fe18304062335fdc934757855abd887 Mon Sep 17 00:00:00 2001 From: Richard Kreckel Date: Mon, 20 Dec 1999 20:06:12 +0000 Subject: [PATCH] - more logic on the trigonometric function stuff. - changed several occurences of numeric const & to const numeric &, which is the same, but doxygen kept being confused because declarations differed from implementations. --- check/inifcns_consist.cpp | 2 +- check/series_expansion.cpp | 2 ++ 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/check/inifcns_consist.cpp b/check/inifcns_consist.cpp index f48db0ab..650d69bb 100644 --- a/check/inifcns_consist.cpp +++ b/check/inifcns_consist.cpp @@ -220,7 +220,7 @@ static unsigned inifcns_consist_psi(void) { unsigned result = 0; symbol x; - ex e; + ex e, f; // We check psi(1) and psi(1/2) implicitly by calculating the curious // little identity gamma(1)'/gamma(1) - gamma(1/2)'/gamma(1/2) == 2*log(2). diff --git a/check/series_expansion.cpp b/check/series_expansion.cpp index b8e80204..5660e708 100644 --- 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 + -- 2.31.1