Mercurial > octave
annotate liboctave/numeric/Quad.h @ 33658:b1d6e40ac737 stable tip
NEWS.9.md: Fix typo and minor formatting changes.
* etc/NEWS.9.md: Fix typo. Adjust whitespace. Use markdown syntax for code
snippets.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Wed, 05 Jun 2024 11:27:35 +0200 |
parents | 2e484f9f1f18 |
children | 4b601ca024d5 |
rev | line source |
---|---|
27923
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
1 //////////////////////////////////////////////////////////////////////// |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
2 // |
32632
2e484f9f1f18
maint: update Octave Project Developers copyright for the new year
John W. Eaton <jwe@octave.org>
parents:
31855
diff
changeset
|
3 // Copyright (C) 1993-2024 The Octave Project Developers |
27923
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
4 // |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
5 // See the file COPYRIGHT.md in the top-level directory of this |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
6 // distribution or <https://octave.org/copyright/>. |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
7 // |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
8 // This file is part of Octave. |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
9 // |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
10 // Octave is free software: you can redistribute it and/or modify it |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
11 // under the terms of the GNU General Public License as published by |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
12 // the Free Software Foundation, either version 3 of the License, or |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
13 // (at your option) any later version. |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
14 // |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
15 // Octave is distributed in the hope that it will be useful, but |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
16 // WITHOUT ANY WARRANTY; without even the implied warranty of |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
18 // GNU General Public License for more details. |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
19 // |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
20 // You should have received a copy of the GNU General Public License |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
21 // along with Octave; see the file COPYING. If not, see |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
22 // <https://www.gnu.org/licenses/>. |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
23 // |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
24 //////////////////////////////////////////////////////////////////////// |
3 | 25 |
20791
f7084eae3318
maint: Use Octave coding conventions for #if statements.
Rik <rik@octave.org>
parents:
19697
diff
changeset
|
26 #if ! defined (octave_Quad_h) |
382 | 27 #define octave_Quad_h 1 |
28 | |
21244
1473547f50f5
include octave-config.h in public header files
John W. Eaton <jwe@octave.org>
parents:
21218
diff
changeset
|
29 #include "octave-config.h" |
1473547f50f5
include octave-config.h in public header files
John W. Eaton <jwe@octave.org>
parents:
21218
diff
changeset
|
30 |
1296 | 31 #include "dColVector.h" |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
32 #include "fColVector.h" |
3 | 33 |
34 typedef double (*integrand_fcn) (double x); | |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
35 typedef float (*float_integrand_fcn) (float x); |
3 | 36 |
3998 | 37 #include "Quad-opts.h" |
289 | 38 |
1859 | 39 class |
6108 | 40 OCTAVE_API |
1859 | 41 Quad : public Quad_options |
3 | 42 { |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
43 public: |
3 | 44 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
45 Quad () = delete; |
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
46 |
1859 | 47 Quad (integrand_fcn fcn) |
30101
6e5e6ce2e705
maint: use "m_" prefix for member variables in class Quad.
Rik <rik@octave.org>
parents:
30082
diff
changeset
|
48 : Quad_options (), m_f (fcn), m_ff () { } |
1859 | 49 |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
50 Quad (float_integrand_fcn fcn) |
30101
6e5e6ce2e705
maint: use "m_" prefix for member variables in class Quad.
Rik <rik@octave.org>
parents:
30082
diff
changeset
|
51 : Quad_options (), m_f (), m_ff (fcn) { } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
52 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
53 OCTAVE_DEFAULT_COPY_MOVE (Quad) |
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
54 |
31771
21f9b34eb893
maint: Eliminate "(void)" in C++ function prototypes/declarations.
Rik <rik@octave.org>
parents:
31706
diff
changeset
|
55 virtual ~Quad () = default; |
2424 | 56 |
31771
21f9b34eb893
maint: Eliminate "(void)" in C++ function prototypes/declarations.
Rik <rik@octave.org>
parents:
31706
diff
changeset
|
57 virtual double integrate () |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
58 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
59 octave_idx_type ier, neval; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
60 double abserr; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
61 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
62 } |
3 | 63 |
31771
21f9b34eb893
maint: Eliminate "(void)" in C++ function prototypes/declarations.
Rik <rik@octave.org>
parents:
31706
diff
changeset
|
64 virtual float float_integrate () |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
65 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
66 octave_idx_type ier, neval; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
67 float abserr; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
68 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
69 } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
70 |
5275 | 71 virtual double integrate (octave_idx_type& ier) |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
72 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
73 octave_idx_type neval; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
74 double abserr; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
75 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
76 } |
1528 | 77 |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
78 virtual float float_integrate (octave_idx_type& ier) |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
79 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
80 octave_idx_type neval; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
81 float abserr; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
82 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
83 } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
84 |
5275 | 85 virtual double integrate (octave_idx_type& ier, octave_idx_type& neval) |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
86 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
87 double abserr; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
88 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
89 } |
1528 | 90 |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
91 virtual float float_integrate (octave_idx_type& ier, octave_idx_type& neval) |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
92 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
93 float abserr; |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
94 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
95 } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
96 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
97 virtual double integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
98 double& abserr) |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
99 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
100 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
101 } |
3511 | 102 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
103 virtual float float_integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
104 float& abserr) |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
105 { |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
106 return do_integrate (ier, neval, abserr); |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
107 } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
108 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
109 virtual double do_integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
110 double& abserr) = 0; |
3 | 111 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
112 virtual float do_integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
113 float& abserr) = 0; |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
114 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
115 protected: |
3 | 116 |
30101
6e5e6ce2e705
maint: use "m_" prefix for member variables in class Quad.
Rik <rik@octave.org>
parents:
30082
diff
changeset
|
117 integrand_fcn m_f; |
6e5e6ce2e705
maint: use "m_" prefix for member variables in class Quad.
Rik <rik@octave.org>
parents:
30082
diff
changeset
|
118 float_integrand_fcn m_ff; |
3 | 119 }; |
120 | |
1859 | 121 class |
6108 | 122 OCTAVE_API |
1859 | 123 DefQuad : public Quad |
3 | 124 { |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
125 public: |
3 | 126 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
127 DefQuad () = delete; |
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
128 |
1859 | 129 DefQuad (integrand_fcn fcn) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
130 : Quad (fcn), m_lower_limit (0.0), m_upper_limit (1.0), m_singularities () |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
131 { } |
1528 | 132 |
1859 | 133 DefQuad (integrand_fcn fcn, double ll, double ul) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
134 : Quad (fcn), m_lower_limit (ll), m_upper_limit (ul), m_singularities () |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
135 { } |
1528 | 136 |
137 DefQuad (integrand_fcn fcn, double ll, double ul, | |
10312
cbc402e64d83
untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents:
10158
diff
changeset
|
138 const ColumnVector& sing) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
139 : Quad (fcn), m_lower_limit (ll), m_upper_limit (ul), |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
140 m_singularities (sing) { } |
1528 | 141 |
1859 | 142 DefQuad (integrand_fcn fcn, const ColumnVector& sing) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
143 : Quad (fcn), m_lower_limit (0.0), m_upper_limit (1.0), |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
144 m_singularities (sing) { } |
1528 | 145 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
146 OCTAVE_DEFAULT_COPY_MOVE_DELETE (DefQuad) |
2424 | 147 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
148 double do_integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
149 double& abserr); |
3 | 150 |
21137
623fc7d08cc6
maint: Clean up compile warnings in liboctave from cset 7cac4e7458f2.
Rik <rik@octave.org>
parents:
20791
diff
changeset
|
151 OCTAVE_NORETURN float do_integrate (octave_idx_type& ier, |
623fc7d08cc6
maint: Clean up compile warnings in liboctave from cset 7cac4e7458f2.
Rik <rik@octave.org>
parents:
20791
diff
changeset
|
152 octave_idx_type& neval, float& abserr); |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
153 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
154 private: |
3 | 155 |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
156 double m_lower_limit; |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
157 double m_upper_limit; |
3 | 158 |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
159 ColumnVector m_singularities; |
3 | 160 }; |
161 | |
1859 | 162 class |
6108 | 163 OCTAVE_API |
1859 | 164 IndefQuad : public Quad |
3 | 165 { |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
166 public: |
3 | 167 |
168 enum IntegralType { bound_to_inf, neg_inf_to_bound, doubly_infinite }; | |
169 | |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
170 IndefQuad () = delete; |
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
171 |
1859 | 172 IndefQuad (integrand_fcn fcn) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
173 : Quad (fcn), m_bound (0.0), m_type (bound_to_inf) { } |
1528 | 174 |
1859 | 175 IndefQuad (integrand_fcn fcn, double b, IntegralType t) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
176 : Quad (fcn), m_bound (b), m_type (t) { } |
1528 | 177 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
178 OCTAVE_DEFAULT_COPY_MOVE_DELETE (IndefQuad) |
2424 | 179 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
180 double do_integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
181 double& abserr); |
3 | 182 |
22402
4caa7b28d183
maint: Style check C++ code in liboctave/
Rik <rik@octave.org>
parents:
22323
diff
changeset
|
183 OCTAVE_NORETURN float do_integrate (octave_idx_type& ier, |
4caa7b28d183
maint: Style check C++ code in liboctave/
Rik <rik@octave.org>
parents:
22323
diff
changeset
|
184 octave_idx_type& neval, float& abserr); |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
185 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
186 private: |
3 | 187 |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
188 double m_bound; |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
189 IntegralType m_type; |
3 | 190 }; |
191 | |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
192 class |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
193 OCTAVE_API |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
194 FloatDefQuad : public Quad |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
195 { |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
196 public: |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
197 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
198 FloatDefQuad () = delete; |
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
199 |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
200 FloatDefQuad (float_integrand_fcn fcn) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
201 : Quad (fcn), m_lower_limit (0.0), m_upper_limit (1.0), m_singularities () |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
202 { } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
203 |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
204 FloatDefQuad (float_integrand_fcn fcn, float ll, float ul) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
205 : Quad (fcn), m_lower_limit (ll), m_upper_limit (ul), m_singularities () |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
206 { } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
207 |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
208 FloatDefQuad (float_integrand_fcn fcn, float ll, float ul, |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
209 const FloatColumnVector& sing) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
210 : Quad (fcn), m_lower_limit (ll), m_upper_limit (ul), |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
211 m_singularities (sing) { } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
212 |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
213 FloatDefQuad (float_integrand_fcn fcn, const FloatColumnVector& sing) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
214 : Quad (fcn), m_lower_limit (0.0), m_upper_limit (1.0), |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
215 m_singularities (sing) { } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
216 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
217 OCTAVE_DEFAULT_COPY_MOVE_DELETE (FloatDefQuad) |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
218 |
21137
623fc7d08cc6
maint: Clean up compile warnings in liboctave from cset 7cac4e7458f2.
Rik <rik@octave.org>
parents:
20791
diff
changeset
|
219 OCTAVE_NORETURN double do_integrate (octave_idx_type& ier, |
623fc7d08cc6
maint: Clean up compile warnings in liboctave from cset 7cac4e7458f2.
Rik <rik@octave.org>
parents:
20791
diff
changeset
|
220 octave_idx_type& neval, double& abserr); |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
221 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
222 float do_integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
223 float& abserr); |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
224 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
225 private: |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
226 |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
227 float m_lower_limit; |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
228 float m_upper_limit; |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
229 |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
230 FloatColumnVector m_singularities; |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
231 }; |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
232 |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
233 class |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
234 OCTAVE_API |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
235 FloatIndefQuad : public Quad |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
236 { |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
237 public: |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
238 |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
239 enum IntegralType { bound_to_inf, neg_inf_to_bound, doubly_infinite }; |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
240 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
241 FloatIndefQuad () = delete; |
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
242 |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
243 FloatIndefQuad (float_integrand_fcn fcn) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
244 : Quad (fcn), m_bound (0.0), m_type (bound_to_inf) { } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
245 |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
246 FloatIndefQuad (float_integrand_fcn fcn, double b, IntegralType t) |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
247 : Quad (fcn), m_bound (b), m_type (t) { } |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
248 |
31855
1daf8bfceac3
default or disable more ctors, dtors, and assignment ops
John W. Eaton <jwe@octave.org>
parents:
31771
diff
changeset
|
249 OCTAVE_DEFAULT_COPY_MOVE_DELETE (FloatIndefQuad) |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
250 |
21137
623fc7d08cc6
maint: Clean up compile warnings in liboctave from cset 7cac4e7458f2.
Rik <rik@octave.org>
parents:
20791
diff
changeset
|
251 OCTAVE_NORETURN double do_integrate (octave_idx_type& ier, |
623fc7d08cc6
maint: Clean up compile warnings in liboctave from cset 7cac4e7458f2.
Rik <rik@octave.org>
parents:
20791
diff
changeset
|
252 octave_idx_type& neval, double& abserr); |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
253 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
254 float do_integrate (octave_idx_type& ier, octave_idx_type& neval, |
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
255 float& abserr); |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
256 |
17769
49a5a4be04a1
maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents:
17744
diff
changeset
|
257 private: |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
258 |
30082
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
259 float m_bound; |
1788b9f6db6a
maint: use "m_" prefix for member variables in file 'Quad.h'.
Rik <rik@octave.org>
parents:
29358
diff
changeset
|
260 IntegralType m_type; |
7805
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
261 }; |
62affb34e648
Make quad work with single precision
David Bateman <dbateman@free.fr>
parents:
7231
diff
changeset
|
262 |
3 | 263 #endif |