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
69
70
|
/* 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 division
interval interval_algebra::Div(const interval& x, const interval& y)
{
interval D = Mul(x, Inv(y));
return D;
}
double div(double x, double y)
{
return x / y;
}
void interval_algebra::testDiv()
{
// lots of experiments because of the quadratic size of the input
analyzeBinaryMethod(10, 5000000, "Div", interval(-100, 100, -15), interval(0.001, 1000, -15),
div, &interval_algebra::Div);
analyzeBinaryMethod(10, 5000000, "Div", interval(-100, 100, -15), interval(-1000, -0.001, -15),
div, &interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, 0), interval(0, 10, 0), div,
&interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, -5), interval(0, 10, 0), div,
&interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, -10), interval(0, 10, 0), div,
&interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, -15), interval(0, 10, 0), div,
&interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, 0), interval(0, 10, -10), div,
&interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, -5), interval(0, 10, -10), div,
&interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, -10), interval(0, 10, -10), div,
&interval_algebra::Div);
analyzeBinaryMethod(10, 500000, "div", interval(0, 10, -15), interval(0, 10, -10), div,
&interval_algebra::Div);
// check("test algebra Div", Div(interval(-2, 3), interval(1, 10)), interval(-2, 3));
// check("test algebra Div", Div(interval(-2, 3), interval(-1, 10)), interval(-HUGE_VAL,
// +HUGE_VAL)); check("test algebra Div", Div(interval(-2, 3), interval(-0.1, -0.01)),
// interval(-300, 200)); check("test algebra Div", Div(interval(0), interval(0)),
// interval(0)); check("test algebra Div", Div(interval(0, 1), interval(0, 1)), interval(0,
// +HUGE_VAL));
}
} // namespace itv
|
