1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68
|
/* Copyright 2023 Yann ORLAREY
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#include <algorithm>
#include <functional>
#include <random>
#include "check.hh"
#include "interval_algebra.hh"
#include "interval_def.hh"
namespace itv {
//------------------------------------------------------------------------------------------
// Interval Acosh
// interval Acosh(const interval& x);
// void testAcosh();
static const interval domain(1, HUGE_VAL);
interval interval_algebra::Acosh(const interval& x)
{
interval i = intersection(domain, x);
if (i.isEmpty()) {
return empty();
}
// the min slope is attained at the highest bound of the interval
// we thus compute the gap between f(hi) and f(hi-ε), to remain in the interval
int precision = exactPrecisionUnary(std::acosh, x.hi(), -std::pow(2, x.lsb()));
if ((precision == INT_MIN) || taylor_lsb) {
precision = floor(x.lsb() - (double)std::log2(x.hi() * x.hi() - 1) / 2);
}
return {std::acosh(i.lo()), std::acosh(i.hi()), precision};
}
void interval_algebra::testAcosh()
{
analyzeUnaryMethod(10, 1000, "acosh", interval(950, 1000, 0), std::acosh,
&interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(950, 1000, -5), std::acosh,
&interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(950, 1000, -10), std::acosh,
&interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(950, 1000, -15), std::acosh,
&interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(950, 1000, -20), std::acosh,
&interval_algebra::Acosh);
/* analyzeUnaryMethod(10, 1000, "acosh", interval(0, 10, 0), acosh, &interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(0, 10, -5), acosh, &interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(0, 10, -10), acosh, &interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(0, 10, -15), acosh, &interval_algebra::Acosh);
analyzeUnaryMethod(10, 1000, "acosh", interval(0, 10, -20), acosh, &interval_algebra::Acosh);*/
}
} // namespace itv
|