mathlib-quadpack.c
1 //! @file mathlib-quadpack.c
2 //
3 //! @section copyright
4 //
5 // This file is part of VIF - vintage fortran compiler.
6 // Copyright 2020-2025 J. Marcel van der Veer <algol68g@xs4all.nl>.
7 //
8 //! @section license
9 //
10 // This program is free software; you can redistribute it and/or modify it
11 // under the terms of the gnu general public license as published by the
12 // free software foundation; either version 3 of the license, or
13 // (at your option) any later version.
14 //
15 // This program is distributed in the hope that it will be useful, but
16 // without any warranty; without even the implied warranty of merchantability
17 // or fitness for a particular purpose. See the GNU general public license for
18 // more details. you should have received a copy of the GNU general public
19 // license along with this program. If not, see <http://www.gnu.org/licenses/>.
20 //
21 //! @Synopsis
22 //
23 //! 73 subprograms from QUADPACK
24
25 // Compiled from Fortran source code by VIF.
26 // Selected subprograms are:
27 //
28 // DQAG DQAWC DQC25C DQK21 DQNG QAGI QAWCE QC25C QK15W QNC79
29 // DQAGE DQAWCE DQC25F DQK31 DQPSRT QAGIE QAWF QC25F QK21 QNG
30 // DQAGI DQAWF DQC25S DQK41 DQWGTC QAGP QAWFE QC25S QK31 QPDOC
31 // DQAGIE DQAWFE DQCHEB DQK51 DQWGTF QAGPE QAWO QCHEB QK41 QPSRT
32 // DQAGP DQAWO DQELG DQK61 DQWGTS QAGS QAWOE QELG QK51 QWGTC
33 // DQAGPE DQAWOE DQK15 DQMOMO QAG QAGSE QAWS QK15 QK61 QWGTF
34 // DQAGS DQAWS DQK15I DQNC79 QAGE QAWC QAWSE QK15I QMOMO QWGTS
35 // DQAGSE DQAWSE DQK15W
36
37 // QUADPACK is a FORTRAN 77 library for numerical integration of one-dimensional functions.
38 // It was included in the SLATEC Common Mathematical Library and is therefore in the public domain.
39 // The individual subprograms are also available on netlib.
40 //
41 // See also:
42 // R. Piessens, E. deDoncker-Kapenga, C. Uberhuber, D. Kahaner
43 // Quadpack: a Subroutine Package for Automatic Integration
44 // Springer Verlag, 1983. Series in Computational Mathematics v.1
45 // 515.43/Q1S 100394Z
46
47 // The license for QUADPACK Fortran source code is:
48 //
49 // The SLATEC Common Mathematical Library was developed at
50 // US government research laboratories and is in the public domain.
51 //
52 // Repository: http://www.netlib.org/slatec/
53 //
54 // The SLATEC common mathematical library is issued by the following
55 //
56 // Air Force Weapons Laboratory, Albuquerque
57 // Lawrence Livermore National Laboratory, Livermore
58 // Los Alamos National Laboratory, Los Alamos
59 // National Institute of Standards and Technology, Washington
60 // National Energy Research Supercomputer Center, Livermore
61 // Oak Ridge National Laboratory, Oak Ridge
62 // Sandia National Laboratories, Albuquerque
63 // Sandia National Laboratories, Livermore
64 //
65 // All questions concerning the distribution of the library should be
66 // directed to the NATIONAL ENERGY SOFTWARE CENTER, 9700 Cass Ave.,
67 // Argonne, Illinois 60439, and not to the authors of the subprograms.
68 //
69 // * * * * * Notice * * * * *
70 //
71 // This material was prepared as an account of work sponsored by the
72 // United States Government. Neither the United States, nor the
73 // Department of Energy, nor the Department of Defense, nor any of
74 // their employees, nor any of their contractors, subcontractors, or
75 // their employees, makes any warranty, expressed or implied, or
76 // assumes any legal liability or responsibility for the accuracy,
77 // completeness, or usefulness of any information, apparatus, product,
78 // or process disclosed, or represents that its use would not infringe
79 // upon privately owned rights.
80
81 /*
82 Generated by VIF - experimental VIntage Fortran compiler.
83 VIF release 1.2.12
84 */
119 static CALLS __calls[__ncalls] = {
120 {"dqage", 0}, // subroutine
121 {"dqag", 0}, // subroutine
122 {"dqagie", 0}, // subroutine
123 {"dqagi", 0}, // subroutine
124 {"dqagpe", 0}, // subroutine
125 {"dqagp", 0}, // subroutine
126 {"dqagse", 0}, // subroutine
127 {"dqags", 0}, // subroutine
128 {"dqawce", 0}, // subroutine
129 {"dqawc", 0}, // subroutine
130 {"dqawfe", 0}, // subroutine
131 {"dqawf", 0}, // subroutine
132 {"dqawoe", 0}, // subroutine
133 {"dqawo", 0}, // subroutine
134 {"dqawse", 0}, // subroutine
135 {"dqaws", 0}, // subroutine
136 {"dqc25c", 0}, // subroutine
137 {"dqc25f", 0}, // subroutine
138 {"dqc25s", 0}, // subroutine
139 {"dqcheb", 0}, // subroutine
140 {"dqelg", 0}, // subroutine
141 {"dqk15", 0}, // subroutine
142 {"dqk15i", 0}, // subroutine
143 {"dqk15w", 0}, // subroutine
144 {"dqk21", 0}, // subroutine
145 {"dqk31", 0}, // subroutine
146 {"dqk41", 0}, // subroutine
147 {"dqk51", 0}, // subroutine
148 {"dqk61", 0}, // subroutine
149 {"dqmomo", 0}, // subroutine
150 {"dqnc79", 0}, // subroutine
151 {"dqng", 0}, // subroutine
152 {"dqpsrt", 0}, // subroutine
153 {"dqwgtc", 0}, // real*8 function
154 {"dqwgtf", 0}, // real*8 function
155 {"dqwgts", 0}, // real*8 function
156 {"qage", 0}, // subroutine
157 {"qag", 0}, // subroutine
158 {"qagie", 0}, // subroutine
159 {"qagi", 0}, // subroutine
160 {"qagpe", 0}, // subroutine
161 {"qagp", 0}, // subroutine
162 {"qagse", 0}, // subroutine
163 {"qags", 0}, // subroutine
164 {"qawce", 0}, // subroutine
165 {"qawc", 0}, // subroutine
166 {"qawfe", 0}, // subroutine
167 {"qawf", 0}, // subroutine
168 {"qawoe", 0}, // subroutine
169 {"qawo", 0}, // subroutine
170 {"qawse", 0}, // subroutine
171 {"qaws", 0}, // subroutine
172 {"qc25c", 0}, // subroutine
173 {"qc25f", 0}, // subroutine
174 {"qc25s", 0}, // subroutine
175 {"qcheb", 0}, // subroutine
176 {"qelg", 0}, // subroutine
177 {"qk15", 0}, // subroutine
178 {"qk15i", 0}, // subroutine
179 {"qk15w", 0}, // subroutine
180 {"qk21", 0}, // subroutine
181 {"qk31", 0}, // subroutine
182 {"qk41", 0}, // subroutine
183 {"qk51", 0}, // subroutine
184 {"qk61", 0}, // subroutine
185 {"qmomo", 0}, // subroutine
186 {"qnc79", 0}, // subroutine
187 {"qng", 0}, // subroutine
188 {"qpdoc", 0}, // subroutine
189 {"qpsrt", 0}, // subroutine
190 {"qwgtc", 0}, // real*4 function
191 {"qwgtf", 0}, // real*4 function
192 {"qwgts", 0}, // real*4 function
193 {NULL, 0}
194 };
195
197 key_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_,
198 real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
200 key_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_,
201 int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
203 int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_, real_8
204 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
206 real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_
207 last_, int_4 _p_ iwork_, real_8 _p_ work_);
209 epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_
210 , real_8 _p_ alist_, real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, real_8 _p_ pts_, int_4 _p_ iord_, int_4
211 _p_ level_, int_4 _p_ ndin_, int_4 _p_ last_);
213 epsabs_, real_8 _p_ epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_
214 , int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
216 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_, real_8 _p_
217 blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
219 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_,
220 int_4 _p_ iwork_, real_8 _p_ work_);
222 epsrel_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_,
223 real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
225 epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_,
226 int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
228 _p_ limlst_, int_4 _p_ limit_, int_4 _p_ maxp1_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_
229 ier_, real_8 _p_ rslst_, real_8 _p_ erlst_, int_4 _p_ ierlst_, int_4 _p_ lst_, real_8 _p_ alist_, real_8 _p_ blist_,
230 real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_8 _p_ chebmo_);
232 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limlst_, int_4 _p_ lst_, int_4 _p_ leniw_,
233 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_8 _p_ work_);
235 epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_, int_4 _p_ icall_, int_4 _p_ maxp1_, real_8 _p_ result_, real_8 _p_
236 abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ last_, real_8 _p_ alist_, real_8 _p_ blist_, real_8 _p_ rlist_,
237 real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_8 _p_ chebmo_);
239 epsabs_, real_8 _p_ epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_
240 , int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
242 integr_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_
243 neval_, int_4 _p_ ier_, real_8 _p_ alist_, real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_,
244 int_4 _p_ last_);
246 integr_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_
247 ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
249 abserr_, int_4 _p_ krul_, int_4 _p_ neval_);
251 nrmom_, int_4 _p_ maxp1_, int_4 _p_ ksave_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, real_8 _p_
252 resabs_, real_8 _p_ resasc_, int_4 _p_ momcom_, real_8 _p_ chebmo_);
254 , real_8 _p_ beta_, real_8 _p_ ri_, real_8 _p_ rj_, real_8 _p_ rg_, real_8 _p_ rh_, real_8 _p_ result_, real_8 _p_
255 abserr_, real_8 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_);
258 int_4 _p_ nres_);
260 _p_ resabs_, real_8 _p_ resasc_);
262 result_, real_8 _p_ abserr_, real_8 _p_ resabs_, real_8 _p_ resasc_);
264 , int_4 _p_ kp_, real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_, real_8 _p_
265 resasc_);
267 _p_ resabs_, real_8 _p_ resasc_);
269 _p_ resabs_, real_8 _p_ resasc_);
271 _p_ resabs_, real_8 _p_ resasc_);
273 _p_ resabs_, real_8 _p_ resasc_);
275 _p_ resabs_, real_8 _p_ resasc_);
277 rh_, int_4 _p_ integr_);
279 ierr_, int_4 _p_ k_);
281 result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_);
283 int_4 _p_ iord_, int_4 _p_ nrmax_);
286 integr_);
288 integr_);
290 key_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_,
291 real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
293 key_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_,
294 int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
296 int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_, real_4
297 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
299 real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_
300 last_, int_4 _p_ iwork_, real_4 _p_ work_);
302 epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_
303 , real_4 _p_ alist_, real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, real_4 _p_ pts_, int_4 _p_ iord_, int_4
304 _p_ level_, int_4 _p_ ndin_, int_4 _p_ last_);
306 epsabs_, real_4 _p_ epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_
307 , int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
309 limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_, real_4 _p_ blist_,
310 real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
312 result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_,
313 int_4 _p_ iwork_, real_4 _p_ work_);
315 epsrel_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_,
316 real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
318 epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_,
319 int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
321 _p_ limlst_, int_4 _p_ limit_, int_4 _p_ maxp1_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_
322 ier_, real_4 _p_ rslst_, real_4 _p_ erlst_, int_4 _p_ ierlst_, int_4 _p_ lst_, real_4 _p_ alist_, real_4 _p_ blist_,
323 real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_4 _p_ chebmo_);
325 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limlst_, int_4 _p_ lst_, int_4 _p_ leniw_,
326 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_4 _p_ work_);
328 epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_, int_4 _p_ icall_, int_4 _p_ maxp1_, real_4 _p_ result_, real_4 _p_
329 abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ last_, real_4 _p_ alist_, real_4 _p_ blist_, real_4 _p_ rlist_,
330 real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_4 _p_ chebmo_);
332 epsabs_, real_4 _p_ epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_
333 , int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
335 integr_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_
336 neval_, int_4 _p_ ier_, real_4 _p_ alist_, real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_,
337 int_4 _p_ last_);
339 integr_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_
340 ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
342 abserr_, int_4 _p_ krul_, int_4 _p_ neval_);
344 nrmom_, int_4 _p_ maxp1_, int_4 _p_ ksave_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, real_4 _p_
345 resabs_, real_4 _p_ resasc_, int_4 _p_ momcom_, real_4 _p_ chebmo_);
347 real_4 _p_ beta_, real_4 _p_ ri_, real_4 _p_ rj_, real_4 _p_ rg_, real_4 _p_ rh_, real_4 _p_ result_, real_4 _p_
348 abserr_, real_4 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_);
351 int_4 _p_ nres_);
353 resabs_, real_4 _p_ resasc_);
355 result_, real_4 _p_ abserr_, real_4 _p_ resabs_, real_4 _p_ resasc_);
357 int_4 _p_ kp_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_, real_4 _p_
358 resasc_);
360 resabs_, real_4 _p_ resasc_);
362 resabs_, real_4 _p_ resasc_);
364 resabs_, real_4 _p_ resasc_);
366 resabs_, real_4 _p_ resasc_);
368 resabs_, real_4 _p_ resasc_);
370 rh_, int_4 _p_ integr_);
372 ierr_, int_4 _p_ k_);
374 result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_);
377 int_4 _p_ iord_, int_4 _p_ nrmax_);
380 integr_);
382 integr_);
383 int_4 _dqage (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_ key_,
384 int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_, real_8
385 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
386 { // ** body not listed **
568 }
569
570 int_4 _dqag (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_ key_,
571 real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_
572 last_, int_4 _p_ iwork_, real_8 _p_ work_)
573 { // ** body not listed **
596 }
597
598 int_4 _dqagie (real_8 (*_f)(), real_8 _p_ bound_, int_4 _p_ inf_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_
599 limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_, real_8 _p_ blist_,
600 real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
601 { // ** body not listed **
865 }
866
867 int_4 _dqagi (real_8 (*_f)(), real_8 _p_ bound_, int_4 _p_ inf_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, real_8 _p_
868 result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_,
869 int_4 _p_ iwork_, real_8 _p_ work_)
870 { // ** body not listed **
895 }
896
897 int_4 _dqagpe (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ npts2_, real_8 _p_ points_, real_8 _p_ epsabs_,
898 real_8 _p_ epsrel_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8
899 _p_ alist_, real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, real_8 _p_ pts_, int_4 _p_ iord_, int_4 _p_ level_
900 , int_4 _p_ ndin_, int_4 _p_ last_)
901 { // ** body not listed **
1245 }
1246
1247 int_4 _dqagp (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ npts2_, real_8 _p_ points_, real_8 _p_ epsabs_,
1248 real_8 _p_ epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_, int_4
1249 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_)
1250 { // ** body not listed **
1278 }
1279
1280 int_4 _dqagse (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_,
1281 real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_, real_8 _p_ blist_, real_8
1282 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
1283 { // ** body not listed **
1539 }
1540
1541 int_4 _dqags (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, real_8 _p_ result_,
1542 real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_
1543 iwork_, real_8 _p_ work_)
1544 { // ** body not listed **
1569 }
1570
1571 int_4 _dqawce (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ c_, real_8 _p_ epsabs_, real_8 _p_ epsrel_,
1572 int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_8 _p_ alist_, real_8
1573 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
1574 { // ** body not listed **
1707 }
1708
1709 int_4 _dqawc (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ c_, real_8 _p_ epsabs_, real_8 _p_ epsrel_,
1710 real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_
1711 last_, int_4 _p_ iwork_, real_8 _p_ work_)
1712 { // ** body not listed **
1737 }
1738
1739 int_4 _dqawfe (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ omega_, int_4 _p_ integr_, real_8 _p_ epsabs_, int_4 _p_
1740 limlst_, int_4 _p_ limit_, int_4 _p_ maxp1_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_,
1741 real_8 _p_ rslst_, real_8 _p_ erlst_, int_4 _p_ ierlst_, int_4 _p_ lst_, real_8 _p_ alist_, real_8 _p_ blist_, real_8
1742 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_8 _p_ chebmo_)
1743 { // ** body not listed **
1904 }
1905
1906 int_4 _dqawf (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ omega_, int_4 _p_ integr_, real_8 _p_ epsabs_, real_8 _p_
1907 result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limlst_, int_4 _p_ lst_, int_4 _p_ leniw_,
1908 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_8 _p_ work_)
1909 { // ** body not listed **
1939 }
1940
1941 int_4 _dqawoe (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ omega_, int_4 _p_ integr_, real_8 _p_ epsabs_,
1942 real_8 _p_ epsrel_, int_4 _p_ limit_, int_4 _p_ icall_, int_4 _p_ maxp1_, real_8 _p_ result_, real_8 _p_ abserr_, int_4
1943 _p_ neval_, int_4 _p_ ier_, int_4 _p_ last_, real_8 _p_ alist_, real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_
1944 , int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_8 _p_ chebmo_)
1945 { // ** body not listed **
2253 }
2254
2255 int_4 _dqawo (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ omega_, int_4 _p_ integr_, real_8 _p_ epsabs_,
2256 real_8 _p_ epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_, int_4
2257 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_)
2258 { // ** body not listed **
2286 }
2287
2288 int_4 _dqawse (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ alfa_, real_8 _p_ beta_, int_4 _p_ integr_,
2289 real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_,
2290 int_4 _p_ ier_, real_8 _p_ alist_, real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_
2291 last_)
2292 { // ** body not listed **
2438 }
2439
2440 int_4 _dqaws (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ alfa_, real_8 _p_ beta_, int_4 _p_ integr_,
2441 real_8 _p_ epsabs_, real_8 _p_ epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4
2442 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_)
2443 { // ** body not listed **
2468 }
2469
2470 int_4 _dqc25c (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ c_, real_8 _p_ result_, real_8 _p_ abserr_,
2471 int_4 _p_ krul_, int_4 _p_ neval_)
2472 { // ** body not listed **
2594 }
2595
2596 int_4 _dqc25f (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ omega_, int_4 _p_ integr_, int_4 _p_ nrmom_,
2597 int_4 _p_ maxp1_, int_4 _p_ ksave_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, real_8 _p_ resabs_,
2598 real_8 _p_ resasc_, int_4 _p_ momcom_, real_8 _p_ chebmo_)
2599 { // ** body not listed **
2820 }
2821
2822 int_4 _dqc25s (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ bl_, real_8 _p_ br_, real_8 _p_ alfa_, real_8
2823 _p_ beta_, real_8 _p_ ri_, real_8 _p_ rj_, real_8 _p_ rg_, real_8 _p_ rh_, real_8 _p_ result_, real_8 _p_ abserr_,
2824 real_8 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_)
2825 { // ** body not listed **
3068 }
3069
3070 int_4 _dqcheb (real_8 _p_ x_, real_8 _p_ fval_, real_8 _p_ cheb12_, real_8 _p_ cheb24_)
3071 { // ** body not listed **
3166 }
3167
3168 int_4 _dqelg (int_4 _p_ n_, real_8 _p_ epstab_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ res3la_, int_4 _p_
3169 nres_)
3170 { // ** body not listed **
3277 }
3278
3279 int_4 _dqk15 (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_,
3280 real_8 _p_ resasc_)
3281 { // ** body not listed **
3559 }
3560
3561 int_4 _dqk15i (real_8 (*_f)(), real_8 _p_ boun_, int_4 _p_ inf_, real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_,
3562 real_8 _p_ abserr_, real_8 _p_ resabs_, real_8 _p_ resasc_)
3563 { // ** body not listed **
3762 }
3763
3764 int_4 _dqk15w (real_8 (*_f)(), real_8 (*_w)(), real_8 _p_ p1_, real_8 _p_ p2_, real_8 _p_ p3_, real_8 _p_ p4_, int_4
3765 _p_ kp_, real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_, real_8 _p_ resasc_)
3766 { // ** body not listed **
3943 }
3944 int_4 _dqk21 (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_,
3945 real_8 _p_ resasc_)
3946 { // ** body not listed **
4301 }
4302
4303 int_4 _dqk31 (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_,
4304 real_8 _p_ resasc_)
4305 { // ** body not listed **
4805 }
4806
4807 int_4 _dqk41 (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_,
4808 real_8 _p_ resasc_)
4809 { // ** body not listed **
5442 }
5443
5444 int_4 _dqk51 (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_,
5445 real_8 _p_ resasc_)
5446 { // ** body not listed **
6224 }
6225
6226 int_4 _dqk61 (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ result_, real_8 _p_ abserr_, real_8 _p_ resabs_,
6227 real_8 _p_ resasc_)
6228 { // ** body not listed **
7139 }
7140
7141 int_4 _dqmomo (real_8 _p_ alfa_, real_8 _p_ beta_, real_8 _p_ ri_, real_8 _p_ rj_, real_8 _p_ rg_, real_8 _p_ rh_,
7142 int_4 _p_ integr_)
7143 { // ** body not listed **
7207 }
7208
7209 int_4 _dqnc79 (real_8 (*_fun)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_, int_4
7210 _p_ k_)
7211 { // ** body not listed **
7446 }
7447
7448 int_4 _dqng (real_8 (*_f)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, real_8 _p_ result_,
7449 real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_)
7450 { // ** body not listed **
8956 }
8957
8958 int_4 _dqpsrt (int_4 _p_ limit_, int_4 _p_ last_, int_4 _p_ maxerr_, real_8 _p_ ermax_, real_8 _p_ elist_, int_4 _p_
8959 iord_, int_4 _p_ nrmax_)
8960 { // ** body not listed **
9025 }
9026
9027 real_8 _dqwgtc (real_8 _p_ x_, real_8 _p_ c_, real_8 _p_ p2_, real_8 _p_ p3_, real_8 _p_ p4_, int_4 _p_ kp_)
9028 { // ** body not listed **
9033 }
9034
9035 real_8 _dqwgtf (real_8 _p_ x_, real_8 _p_ omega_, real_8 _p_ p2_, real_8 _p_ p3_, real_8 _p_ p4_, int_4 _p_ integr_)
9036 { // ** body not listed **
9053 }
9054
9055 real_8 _dqwgts (real_8 _p_ x_, real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ alfa_, real_8 _p_ beta_, int_4 _p_ integr_)
9056 { // ** body not listed **
9080 }
9081
9082 int_4 _qage (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_ key_,
9083 int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_, real_4
9084 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
9085 { // ** body not listed **
9267 }
9268
9269 int_4 _qag (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_ key_,
9270 real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_
9271 last_, int_4 _p_ iwork_, real_4 _p_ work_)
9272 { // ** body not listed **
9295 }
9296
9297 int_4 _qagie (real_4 (*_f)(), real_4 _p_ bound_, int_4 _p_ inf_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_
9298 limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_, real_4 _p_ blist_,
9299 real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
9300 { // ** body not listed **
9564 }
9565
9566 int_4 _qagi (real_4 (*_f)(), real_4 _p_ bound_, int_4 _p_ inf_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, real_4 _p_
9567 result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_,
9568 int_4 _p_ iwork_, real_4 _p_ work_)
9569 { // ** body not listed **
9594 }
9595
9596 int_4 _qagpe (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ npts2_, real_4 _p_ points_, real_4 _p_ epsabs_,
9597 real_4 _p_ epsrel_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4
9598 _p_ alist_, real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, real_4 _p_ pts_, int_4 _p_ iord_, int_4 _p_ level_
9599 , int_4 _p_ ndin_, int_4 _p_ last_)
9600 { // ** body not listed **
9944 }
9945
9946 int_4 _qagp (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ npts2_, real_4 _p_ points_, real_4 _p_ epsabs_,
9947 real_4 _p_ epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_, int_4
9948 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_)
9949 { // ** body not listed **
9977 }
9978
9979 int_4 _qagse (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_,
9980 real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_, real_4 _p_ blist_, real_4
9981 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
9982 { // ** body not listed **
10238 }
10239
10240 int_4 _qags (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, real_4 _p_ result_,
10241 real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_
10242 iwork_, real_4 _p_ work_)
10243 { // ** body not listed **
10268 }
10269
10270 int_4 _qawce (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ epsabs_, real_4 _p_ epsrel_,
10271 int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, real_4 _p_ alist_, real_4
10272 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
10273 { // ** body not listed **
10406 }
10407
10408 int_4 _qawc (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ epsabs_, real_4 _p_ epsrel_,
10409 real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_
10410 last_, int_4 _p_ iwork_, real_4 _p_ work_)
10411 { // ** body not listed **
10436 }
10437
10438 int_4 _qawfe (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ omega_, int_4 _p_ integr_, real_4 _p_ epsabs_, int_4 _p_
10439 limlst_, int_4 _p_ limit_, int_4 _p_ maxp1_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_,
10440 real_4 _p_ rslst_, real_4 _p_ erlst_, int_4 _p_ ierlst_, int_4 _p_ lst_, real_4 _p_ alist_, real_4 _p_ blist_, real_4
10441 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_4 _p_ chebmo_)
10442 { // ** body not listed **
10601 }
10602
10603 int_4 _qawf (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ omega_, int_4 _p_ integr_, real_4 _p_ epsabs_, real_4 _p_
10604 result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ limlst_, int_4 _p_ lst_, int_4 _p_ leniw_,
10605 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_4 _p_ work_)
10606 { // ** body not listed **
10636 }
10637
10638 int_4 _qawoe (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ omega_, int_4 _p_ integr_, real_4 _p_ epsabs_,
10639 real_4 _p_ epsrel_, int_4 _p_ limit_, int_4 _p_ icall_, int_4 _p_ maxp1_, real_4 _p_ result_, real_4 _p_ abserr_, int_4
10640 _p_ neval_, int_4 _p_ ier_, int_4 _p_ last_, real_4 _p_ alist_, real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_
10641 , int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_4 _p_ chebmo_)
10642 { // ** body not listed **
10950 }
10951
10952 int_4 _qawo (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ omega_, int_4 _p_ integr_, real_4 _p_ epsabs_,
10953 real_4 _p_ epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4 _p_ leniw_, int_4
10954 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_)
10955 { // ** body not listed **
10983 }
10984
10985 int_4 _qawse (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ alfa_, real_4 _p_ beta_, int_4 _p_ integr_,
10986 real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_,
10987 int_4 _p_ ier_, real_4 _p_ alist_, real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_
10988 last_)
10989 { // ** body not listed **
11133 }
11134
11135 int_4 _qaws (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ alfa_, real_4 _p_ beta_, int_4 _p_ integr_,
11136 real_4 _p_ epsabs_, real_4 _p_ epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_, int_4
11137 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_)
11138 { // ** body not listed **
11163 }
11164
11165 int_4 _qc25c (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ result_, real_4 _p_ abserr_,
11166 int_4 _p_ krul_, int_4 _p_ neval_)
11167 { // ** body not listed **
11289 }
11290
11291 int_4 _qc25f (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ omega_, int_4 _p_ integr_, int_4 _p_ nrmom_,
11292 int_4 _p_ maxp1_, int_4 _p_ ksave_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, real_4 _p_ resabs_,
11293 real_4 _p_ resasc_, int_4 _p_ momcom_, real_4 _p_ chebmo_)
11294 { // ** body not listed **
11515 }
11516
11517 int_4 _qc25s (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ bl_, real_4 _p_ br_, real_4 _p_ alfa_, real_4
11518 _p_ beta_, real_4 _p_ ri_, real_4 _p_ rj_, real_4 _p_ rg_, real_4 _p_ rh_, real_4 _p_ result_, real_4 _p_ abserr_,
11519 real_4 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_)
11520 { // ** body not listed **
11763 }
11764
11765 int_4 _qcheb (real_4 _p_ x_, real_4 _p_ fval_, real_4 _p_ cheb12_, real_4 _p_ cheb24_)
11766 { // ** body not listed **
11861 }
11862
11863 int_4 _qelg (int_4 _p_ n_, real_4 _p_ epstab_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ res3la_, int_4 _p_
11864 nres_)
11865 { // ** body not listed **
11972 }
11973
11974 int_4 _qk15 (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_,
11975 real_4 _p_ resasc_)
11976 { // ** body not listed **
12150 }
12151
12152 int_4 _qk15i (real_4 (*_f)(), real_4 _p_ boun_, int_4 _p_ inf_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_,
12153 real_4 _p_ abserr_, real_4 _p_ resabs_, real_4 _p_ resasc_)
12154 { // ** body not listed **
12353 }
12354
12355 int_4 _qk15w (real_4 (*_f)(), real_4 (*_w)(), real_4 _p_ p1_, real_4 _p_ p2_, real_4 _p_ p3_, real_4 _p_ p4_, int_4 _p_
12356 kp_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_, real_4 _p_ resasc_)
12357 { // ** body not listed **
12534 }
12535 int_4 _qk21 (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_,
12536 real_4 _p_ resasc_)
12537 { // ** body not listed **
12746 }
12747
12748 int_4 _qk31 (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_,
12749 real_4 _p_ resasc_)
12750 { // ** body not listed **
13024 }
13025
13026 int_4 _qk41 (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_,
13027 real_4 _p_ resasc_)
13028 { // ** body not listed **
13362 }
13363
13364 int_4 _qk51 (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_,
13365 real_4 _p_ resasc_)
13366 { // ** body not listed **
13777 }
13778
13779 int_4 _qk61 (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ result_, real_4 _p_ abserr_, real_4 _p_ resabs_,
13780 real_4 _p_ resasc_)
13781 { // ** body not listed **
14270 }
14271
14272 int_4 _qmomo (real_4 _p_ alfa_, real_4 _p_ beta_, real_4 _p_ ri_, real_4 _p_ rj_, real_4 _p_ rg_, real_4 _p_ rh_, int_4
14273 _p_ integr_)
14274 { // ** body not listed **
14338 }
14339
14340 int_4 _qnc79 (real_4 (*_fun)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_, int_4
14341 _p_ k_)
14342 { // ** body not listed **
14577 }
14578
14579 int_4 _qng (real_4 (*_f)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, real_4 _p_ result_,
14580 real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_)
14581 { // ** body not listed **
15390 }
15391
15392 int_4 _qpdoc (void)
15393 { // ** body not listed **
15396 }
15397
15398 int_4 _qpsrt (int_4 _p_ limit_, int_4 _p_ last_, int_4 _p_ maxerr_, real_4 _p_ ermax_, real_4 _p_ elist_, int_4 _p_
15399 iord_, int_4 _p_ nrmax_)
15400 { // ** body not listed **
15465 }
15466
15467 real_4 _qwgtc (real_4 _p_ x_, real_4 _p_ c_, real_4 _p_ p2_, real_4 _p_ p3_, real_4 _p_ p4_, int_4 _p_ kp_)
15468 { // ** body not listed **
15473 }
15474
15475 real_4 _qwgtf (real_4 _p_ x_, real_4 _p_ omega_, real_4 _p_ p2_, real_4 _p_ p3_, real_4 _p_ p4_, int_4 _p_ integr_)
15476 { // ** body not listed **
15493 }
15494
15495 real_4 _qwgts (real_4 _p_ x_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ alfa_, real_4 _p_ beta_, int_4 _p_ integr_)
15496 { // ** body not listed **
15520 }
15521
|
© 2002-2025 J.M. van der Veer (jmvdveer@xs4all.nl)
|
