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.1.7
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 };
196 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_,
197 real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
199 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_,
200 int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
202 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
203 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
205 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_
206 last_, int_4 _p_ iwork_, real_8 _p_ work_);
208 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_
209 , 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
210 _p_ level_, int_4 _p_ ndin_, int_4 _p_ last_);
212 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_
213 , int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
215 _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_
216 blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
218 _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_,
219 int_4 _p_ iwork_, real_8 _p_ work_);
221 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_,
222 real_8 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
224 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_,
225 int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
227 _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_
228 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_,
229 real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_8 _p_ chebmo_);
231 _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_,
232 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_8 _p_ work_);
234 epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_, int_4 _p_ icall_, int_4 _p_ maxp1_, real_8 _p_ result_, real_8 _p_
235 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_,
236 real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_8 _p_ chebmo_);
238 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_
239 , int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
241 integr_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_
242 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_,
243 int_4 _p_ last_);
245 integr_, real_8 _p_ epsabs_, real_8 _p_ epsrel_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_
246 ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_);
248 abserr_, int_4 _p_ krul_, int_4 _p_ neval_);
250 nrmom_, int_4 _p_ maxp1_, int_4 _p_ ksave_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, real_8 _p_
251 resabs_, real_8 _p_ resasc_, int_4 _p_ momcom_, real_8 _p_ chebmo_);
253 , 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_
254 abserr_, real_8 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_);
257 int_4 _p_ nres_);
259 _p_ resabs_, real_8 _p_ resasc_);
261 result_, real_8 _p_ abserr_, real_8 _p_ resabs_, real_8 _p_ resasc_);
263 , 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_
264 resasc_);
266 _p_ resabs_, real_8 _p_ resasc_);
268 _p_ resabs_, real_8 _p_ resasc_);
270 _p_ resabs_, real_8 _p_ resasc_);
272 _p_ resabs_, real_8 _p_ resasc_);
274 _p_ resabs_, real_8 _p_ resasc_);
276 rh_, int_4 _p_ integr_);
278 ierr_, int_4 _p_ k_);
280 result_, real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_);
282 int_4 _p_ iord_, int_4 _p_ nrmax_);
285 integr_);
287 integr_);
289 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_,
290 real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
292 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_,
293 int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
295 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
296 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
298 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_
299 last_, int_4 _p_ iwork_, real_4 _p_ work_);
301 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_
302 , 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
303 _p_ level_, int_4 _p_ ndin_, int_4 _p_ last_);
305 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_
306 , int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
308 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_,
309 real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
311 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_,
312 int_4 _p_ iwork_, real_4 _p_ work_);
314 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_,
315 real_4 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_);
317 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_,
318 int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
320 _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_
321 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_,
322 real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_4 _p_ chebmo_);
324 _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_,
325 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_4 _p_ work_);
327 epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_, int_4 _p_ icall_, int_4 _p_ maxp1_, real_4 _p_ result_, real_4 _p_
328 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_,
329 real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_4 _p_ chebmo_);
331 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_
332 , int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
334 integr_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_
335 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_,
336 int_4 _p_ last_);
338 integr_, real_4 _p_ epsabs_, real_4 _p_ epsrel_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_
339 ier_, int_4 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_);
341 abserr_, int_4 _p_ krul_, int_4 _p_ neval_);
343 nrmom_, int_4 _p_ maxp1_, int_4 _p_ ksave_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, real_4 _p_
344 resabs_, real_4 _p_ resasc_, int_4 _p_ momcom_, real_4 _p_ chebmo_);
346 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_
347 abserr_, real_4 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_);
350 int_4 _p_ nres_);
352 resabs_, real_4 _p_ resasc_);
354 result_, real_4 _p_ abserr_, real_4 _p_ resabs_, real_4 _p_ resasc_);
356 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_
357 resasc_);
359 resabs_, real_4 _p_ resasc_);
361 resabs_, real_4 _p_ resasc_);
363 resabs_, real_4 _p_ resasc_);
365 resabs_, real_4 _p_ resasc_);
367 resabs_, real_4 _p_ resasc_);
369 rh_, int_4 _p_ integr_);
371 ierr_, int_4 _p_ k_);
373 result_, real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_);
376 int_4 _p_ iord_, int_4 _p_ nrmax_);
379 integr_);
381 integr_);
382 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_,
383 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
384 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
385 { // ** body not listed **
567 }
568 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_,
569 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_
570 last_, int_4 _p_ iwork_, real_8 _p_ work_)
571 { // ** body not listed **
594 }
595 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_
596 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_,
597 real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
598 { // ** body not listed **
862 }
863 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_
864 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_,
865 int_4 _p_ iwork_, real_8 _p_ work_)
866 { // ** body not listed **
891 }
892 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_,
893 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
894 _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_
895 , int_4 _p_ ndin_, int_4 _p_ last_)
896 { // ** body not listed **
1240 }
1241 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_,
1242 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
1243 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_)
1244 { // ** body not listed **
1272 }
1273 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_,
1274 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
1275 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
1276 { // ** body not listed **
1532 }
1533 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_,
1534 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_
1535 iwork_, real_8 _p_ work_)
1536 { // ** body not listed **
1561 }
1562 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_,
1563 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
1564 _p_ blist_, real_8 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
1565 { // ** body not listed **
1698 }
1699 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_,
1700 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_
1701 last_, int_4 _p_ iwork_, real_8 _p_ work_)
1702 { // ** body not listed **
1727 }
1728 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_
1729 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_,
1730 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
1731 _p_ rlist_, real_8 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_8 _p_ chebmo_)
1732 { // ** body not listed **
1893 }
1894 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_
1895 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_,
1896 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_8 _p_ work_)
1897 { // ** body not listed **
1927 }
1928 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_,
1929 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
1930 _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_
1931 , int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_8 _p_ chebmo_)
1932 { // ** body not listed **
2240 }
2241 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_,
2242 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
2243 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_)
2244 { // ** body not listed **
2272 }
2273 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_,
2274 real_8 _p_ epsabs_, real_8 _p_ epsrel_, int_4 _p_ limit_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_,
2275 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_
2276 last_)
2277 { // ** body not listed **
2423 }
2424 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_,
2425 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
2426 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_8 _p_ work_)
2427 { // ** body not listed **
2452 }
2453 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_,
2454 int_4 _p_ krul_, int_4 _p_ neval_)
2455 { // ** body not listed **
2577 }
2578 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_,
2579 int_4 _p_ maxp1_, int_4 _p_ ksave_, real_8 _p_ result_, real_8 _p_ abserr_, int_4 _p_ neval_, real_8 _p_ resabs_,
2580 real_8 _p_ resasc_, int_4 _p_ momcom_, real_8 _p_ chebmo_)
2581 { // ** body not listed **
2802 }
2803 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
2804 _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_,
2805 real_8 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_)
2806 { // ** body not listed **
3049 }
3050 int_4 _dqcheb (real_8 _p_ x_, real_8 _p_ fval_, real_8 _p_ cheb12_, real_8 _p_ cheb24_)
3051 { // ** body not listed **
3146 }
3147 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_
3148 nres_)
3149 { // ** body not listed **
3256 }
3257 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_,
3258 real_8 _p_ resasc_)
3259 { // ** body not listed **
3537 }
3538 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_,
3539 real_8 _p_ abserr_, real_8 _p_ resabs_, real_8 _p_ resasc_)
3540 { // ** body not listed **
3739 }
3740 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
3741 _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_)
3742 { // ** body not listed **
3919 }
3920 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_,
3921 real_8 _p_ resasc_)
3922 { // ** body not listed **
4277 }
4278 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_,
4279 real_8 _p_ resasc_)
4280 { // ** body not listed **
4780 }
4781 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_,
4782 real_8 _p_ resasc_)
4783 { // ** body not listed **
5416 }
5417 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_,
5418 real_8 _p_ resasc_)
5419 { // ** body not listed **
6197 }
6198 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_,
6199 real_8 _p_ resasc_)
6200 { // ** body not listed **
7111 }
7112 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_,
7113 int_4 _p_ integr_)
7114 { // ** body not listed **
7178 }
7179 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
7180 _p_ k_)
7181 { // ** body not listed **
7416 }
7417 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_,
7418 real_8 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_)
7419 { // ** body not listed **
8925 }
8926 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_
8927 iord_, int_4 _p_ nrmax_)
8928 { // ** body not listed **
8993 }
8994 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_)
8995 { // ** body not listed **
9000 }
9001 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_)
9002 { // ** body not listed **
9019 }
9020 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_)
9021 { // ** body not listed **
9045 }
9046 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_,
9047 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
9048 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
9049 { // ** body not listed **
9231 }
9232 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_,
9233 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_
9234 last_, int_4 _p_ iwork_, real_4 _p_ work_)
9235 { // ** body not listed **
9258 }
9259 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_
9260 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_,
9261 real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
9262 { // ** body not listed **
9526 }
9527 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_
9528 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_,
9529 int_4 _p_ iwork_, real_4 _p_ work_)
9530 { // ** body not listed **
9555 }
9556 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_,
9557 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
9558 _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_
9559 , int_4 _p_ ndin_, int_4 _p_ last_)
9560 { // ** body not listed **
9904 }
9905 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_,
9906 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
9907 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_)
9908 { // ** body not listed **
9936 }
9937 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_,
9938 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
9939 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
9940 { // ** body not listed **
10196 }
10197 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_,
10198 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_
10199 iwork_, real_4 _p_ work_)
10200 { // ** body not listed **
10225 }
10226 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_,
10227 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
10228 _p_ blist_, real_4 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ last_)
10229 { // ** body not listed **
10362 }
10363 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_,
10364 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_
10365 last_, int_4 _p_ iwork_, real_4 _p_ work_)
10366 { // ** body not listed **
10391 }
10392 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_
10393 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_,
10394 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
10395 _p_ rlist_, real_4 _p_ elist_, int_4 _p_ iord_, int_4 _p_ nnlog_, real_4 _p_ chebmo_)
10396 { // ** body not listed **
10555 }
10556 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_
10557 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_,
10558 int_4 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ iwork_, real_4 _p_ work_)
10559 { // ** body not listed **
10589 }
10590 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_,
10591 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
10592 _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_
10593 , int_4 _p_ iord_, int_4 _p_ nnlog_, int_4 _p_ momcom_, real_4 _p_ chebmo_)
10594 { // ** body not listed **
10902 }
10903 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_,
10904 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
10905 _p_ maxp1_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_)
10906 { // ** body not listed **
10934 }
10935 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_,
10936 real_4 _p_ epsabs_, real_4 _p_ epsrel_, int_4 _p_ limit_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_,
10937 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_
10938 last_)
10939 { // ** body not listed **
11083 }
11084 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_,
11085 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
11086 _p_ limit_, int_4 _p_ lenw_, int_4 _p_ last_, int_4 _p_ iwork_, real_4 _p_ work_)
11087 { // ** body not listed **
11112 }
11113 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_,
11114 int_4 _p_ krul_, int_4 _p_ neval_)
11115 { // ** body not listed **
11237 }
11238 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_,
11239 int_4 _p_ maxp1_, int_4 _p_ ksave_, real_4 _p_ result_, real_4 _p_ abserr_, int_4 _p_ neval_, real_4 _p_ resabs_,
11240 real_4 _p_ resasc_, int_4 _p_ momcom_, real_4 _p_ chebmo_)
11241 { // ** body not listed **
11462 }
11463 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
11464 _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_,
11465 real_4 _p_ resasc_, int_4 _p_ integr_, int_4 _p_ nev_)
11466 { // ** body not listed **
11709 }
11710 int_4 _qcheb (real_4 _p_ x_, real_4 _p_ fval_, real_4 _p_ cheb12_, real_4 _p_ cheb24_)
11711 { // ** body not listed **
11806 }
11807 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_
11808 nres_)
11809 { // ** body not listed **
11916 }
11917 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_,
11918 real_4 _p_ resasc_)
11919 { // ** body not listed **
12093 }
12094 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_,
12095 real_4 _p_ abserr_, real_4 _p_ resabs_, real_4 _p_ resasc_)
12096 { // ** body not listed **
12295 }
12296 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_
12297 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_)
12298 { // ** body not listed **
12475 }
12476 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_,
12477 real_4 _p_ resasc_)
12478 { // ** body not listed **
12687 }
12688 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_,
12689 real_4 _p_ resasc_)
12690 { // ** body not listed **
12964 }
12965 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_,
12966 real_4 _p_ resasc_)
12967 { // ** body not listed **
13301 }
13302 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_,
13303 real_4 _p_ resasc_)
13304 { // ** body not listed **
13715 }
13716 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_,
13717 real_4 _p_ resasc_)
13718 { // ** body not listed **
14207 }
14208 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
14209 _p_ integr_)
14210 { // ** body not listed **
14274 }
14275 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
14276 _p_ k_)
14277 { // ** body not listed **
14512 }
14513 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_,
14514 real_4 _p_ abserr_, int_4 _p_ neval_, int_4 _p_ ier_)
14515 { // ** body not listed **
15324 }
15325 int_4 _qpdoc (void)
15326 { // ** body not listed **
15329 }
15330 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_
15331 iord_, int_4 _p_ nrmax_)
15332 { // ** body not listed **
15397 }
15398 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_)
15399 { // ** body not listed **
15404 }
15405 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_)
15406 { // ** body not listed **
15423 }
15424 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_)
15425 { // ** body not listed **
15449 }
|
© 2002-2025 J.M. van der Veer (jmvdveer@xs4all.nl)
|
