mathlib-slatec.c
1 //! @file mathlib-slatec.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 //! Subprograms from SLATEC
24
25 // Compiled from Fortran source code by VIF.
26
27 // Miscellaneous routines from SLATEC, not in other packages as BLAS,
28 // EISPACK, FISHPACK, FFTPACK, FNLIB, LINPACK etcetera.
29 //
30 // Source: netlib.org/slatec/
31
32 // The license for SLATEC Fortran source code is:
33 //
34 // The SLATEC Common Mathematical Library was developed at
35 // US government research laboratories and is in the public domain.
36 //
37 // Repository: http://www.netlib.org/slatec/
38 //
39 // The SLATEC common mathematical library is issued by the following
40 //
41 // Air Force Weapons Laboratory, Albuquerque
42 // Lawrence Livermore National Laboratory, Livermore
43 // Los Alamos National Laboratory, Los Alamos
44 // National Institute of Standards and Technology, Washington
45 // National Energy Research Supercomputer Center, Livermore
46 // Oak Ridge National Laboratory, Oak Ridge
47 // Sandia National Laboratories, Albuquerque
48 // Sandia National Laboratories, Livermore
49 //
50 // All questions concerning the distribution of the library should be
51 // directed to the NATIONAL ENERGY SOFTWARE CENTER, 9700 Cass Ave.,
52 // Argonne, Illinois 60439, and not to the authors of the subprograms.
53 //
54 // * * * * * Notice * * * * *
55 //
56 // This material was prepared as an account of work sponsored by the
57 // United States Government. Neither the United States, nor the
58 // Department of Energy, nor the Department of Defense, nor any of
59 // their employees, nor any of their contractors, subcontractors, or
60 // their employees, makes any warranty, expressed or implied, or
61 // assumes any legal liability or responsibility for the accuracy,
62 // completeness, or usefulness of any information, apparatus, product,
63 // or process disclosed, or represents that its use would not infringe
64 // upon privately owned rights.
65
66 // VIF THU 20 NOV 2025 22:21:23 ** MARCEL ** SLATEC PAGE 00001
67
68
69
70 // M M A RRRRRR CCCCC EEEEEEE L
71 // MM MM A A R R C C E L
72 // M M M M A A R R C E L
73 // M M M A A RRRRRR C EEEEE L
74 // M M AAAAAAA R R C E L
75 // M M A A R R C C E L
76 // M M A A R R CCCCC EEEEEEE LLLLLLL
77
78 // SSSSS L A TTTTTTT EEEEEEE CCCCC
79 // S S L A A T E C C
80 // S L A A T E C
81 // SSSSS L A A T EEEEE C
82 // S L AAAAAAA T E C
83 // S S L A A T E C C
84 // SSSSS LLLLLLL A A T EEEEEEE CCCCC
85
86
87
88
89 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DIAGNOSTICS PAGE 00002
90
91 // ** linker ** object size 5591872 bytes
92 // ** statistics ** 384 subprograms, no errors, no warnings
93
94
95 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** JOB CONTROL PAGE 00003
96
97
98 // Line JCL *...*....1....|....2....|....3....|....4....|....5....|....6....|....7..*.|....8
99
100
101
102 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00004
103
104 /*
105 Generated by VIF - experimental VIntage Fortran compiler.
106 VIF release 1.4.1
107 */
108
109 #if defined (__GNUC__)
110 #pragma GCC diagnostic ignored "-Wimplicit-function-declaration"
111 #pragma GCC diagnostic ignored "-Wincompatible-pointer-types"
112 #if (__GNUC__ >= 14)
113 #pragma GCC diagnostic ignored "-Wdeclaration-missing-parameter-type"
114 #pragma GCC diagnostic ignored "-Wimplicit-int"
115 #pragma GCC diagnostic ignored "-Wint-conversion"
116 #pragma GCC diagnostic ignored "-Wreturn-mismatch"
117 #endif
118 #else
119 #error VIF requires GCC
120 #endif
121
122 #include <vif.h>
123
124 static int_4 _km1 = -1, _k0 = 0, _k1 = 1;
125
126
127 #define _dc_0 " 4.1"
128 #define _dc_1 "slatec"
129 #define _dc_2 "avint"
130 #define _dc_3 "the upper limit of integration was not greater than the "
131 #define _dc_4 "lower limit."
132 #define _dc_5 "there were less than three function values between the "
133 #define _dc_6 "limits of integration."
134 #define _dc_7 "the abscissas were not strictly increasing. must have "
135 #define _dc_8 "x(i-1) .lt. x(i) for all i."
136 #define _dc_9 "less than two function values were supplied."
137 #define _dc_10 "bndacc"
138 #define _dc_11 "mdg.lt.ir, probable error."
139 #define _dc_12 "bndsol"
140 #define _dc_13 "a zero diagonal term is in the n by n upper triangular "
141 #define _dc_14 "matrix."
142 #define _dc_15 "bsgq8"
143 #define _dc_16 "ans is probably insufficiently accurate."
144 #define _dc_17 "a and b are too nearly equal to allow normal integration. "
145 #define _dc_18 " ans is set to zero and ierr to -1."
146 #define _dc_19 "cgeev"
147 #define _dc_20 "n .gt. lda."
148 #define _dc_21 "n .lt. 1"
149 #define _dc_22 "job .ne. 0 and n .gt. ldv."
150 #define _dc_23 "lda.lt.ldv, elements of v other than the n by n output "
151 #define _dc_24 "elements have been changed."
152 #define _dc_25 "lda.gt.ldv, elements of a other than the n by n input "
153 #define _dc_26 "cgefs"
154 #define _dc_27 "lda = "
155 #define _dc_28 " is less than n = "
156 #define _dc_29 "n = "
157 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00005
158
159 #define _dc_30 " is less than 1"
160 #define _dc_31 "itask = "
161 #define _dc_32 "singular matrix a - no solution"
162 #define _dc_33 "solution may have no significance"
163 #define _dc_34 "cgeir"
164 #define _dc_35 "chiev"
165 #define _dc_36 "nonreal element on diagonal of a"
166 #define _dc_37 "cnbfs"
167 #define _dc_38 "ml = "
168 #define _dc_39 " is out of range"
169 #define _dc_40 "mu = "
170 #define _dc_41 "cnbir"
171 #define _dc_42 "cpofs"
172 #define _dc_43 "singular or not positive definite - no solution"
173 #define _dc_44 "cpoir"
174 #define _dc_45 "cpqr79"
175 #define _dc_46 "leading coefficient is zero."
176 #define _dc_47 "degree invalid."
177 #define _dc_48 "no convergence in 30 qr iterations."
178 #define _dc_49 "davint"
179 #define _dc_50 "there were less than three function values "
180 #define _dc_51 "between the limits of integration."
181 #define _dc_52 "the upper limit of integration was not greater "
182 #define _dc_53 "than the lower limit."
183 #define _dc_54 "dbndac"
184 #define _dc_55 "dbndsl"
185 #define _dc_56 "dbocls"
186 #define _dc_57 "mdw = "
187 #define _dc_58 " must be positive."
188 #define _dc_59 "mcon = "
189 #define _dc_60 " must be non-negative"
190 #define _dc_61 "ncols = "
191 #define _dc_62 " the no. of variables, must be positive."
192 #define _dc_63 "ind("
193 #define _dc_64 ") = "
194 #define _dc_65 " must be 1-4."
195 #define _dc_66 "bound bl("
196 #define _dc_67 " is .gt. bu("
197 #define _dc_68 "iscale option = "
198 #define _dc_69 " must be 1-3"
199 #define _dc_70 "offset past x(ncols) ("
200 #define _dc_71 ") for user-provided column scaling must be positive."
201 #define _dc_72 "each provided column scale factor must be "
202 #define _dc_73 "positive.$$component "
203 #define _dc_74 " now = "
204 #define _dc_75 "option number = "
205 #define _dc_76 " is not defined."
206 #define _dc_77 "the row dimension of w(,) = "
207 #define _dc_78 " must be .ge. the number of effective rows = "
208 #define _dc_79 "the column dimension of w(,) = "
209 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00006
210
211 #define _dc_80 " must be .ge. ncols+mcon+1 = "
212 #define _dc_81 "the dimensions of the arrays bs(), bu(), and ind() = "
213 #define _dc_82 " must be .ge. ncols+mcon = "
214 #define _dc_83 "the dimension of x() = "
215 #define _dc_84 " must be .ge. the required length = "
216 #define _dc_85 "the dimension of rw() = "
217 #define _dc_86 " must be .ge. 6*ncols+5*mcon = "
218 #define _dc_87 "the dimension of iw() = "
219 #define _dc_88 " must be .ge. 2*ncols+2*mcon = "
220 #define _dc_89 "the dimension of iopt() = "
221 #define _dc_90 " must be .ge. the required len = "
222 #define _dc_91 "no. of rows = "
223 #define _dc_92 " must be .ge. 0 .and. .le. mdw-mcon = "
224 #define _dc_93 "dbols"
225 #define _dc_94 " the no. of variables must be positive."
226 #define _dc_95 ") for user-provided column scaling must "
227 #define _dc_96 "be positive."
228 #define _dc_97 "each provided column scale factor "
229 #define _dc_98 "must be positive.$$component "
230 #define _dc_99 "the option number = "
231 #define _dc_100 " must be .ge. the number of rows = "
232 #define _dc_101 " must be .ge. ncols+1 = "
233 #define _dc_102 "the dimensions of the arrays bl(), bu(), and ind() = "
234 #define _dc_103 " must be .ge. ncols = "
235 #define _dc_104 " must be .ge. 5*ncols = "
236 #define _dc_105 " must be .ge. 2*ncols = "
237 #define _dc_106 " must be .ge. 0 .and. .le. mdw = "
238 #define _dc_107 "dbolsm"
239 #define _dc_108 "the number of rows = "
240 #define _dc_109 "the number of columns = "
241 #define _dc_110 "for j = "
242 #define _dc_111 " the constraint indicator must be 1-4"
243 #define _dc_112 " the lower bound = "
244 #define _dc_113 " is .gt. the upper bound = "
245 #define _dc_114 "the input order of columns = "
246 #define _dc_115 " is not between 1 and ncols = "
247 #define _dc_116 "the bound polarity flag in component j = "
248 #define _dc_117 " must be positive.$$now = "
249 #define _dc_118 "the offset = "
250 #define _dc_119 " beyond position ncols = "
251 #define _dc_120 " must be positive for option number 2."
252 #define _dc_121 "the tolerance for rank determination = "
253 #define _dc_122 " is less than machine precision = "
254 #define _dc_123 " must be positive for option number 3."
255 #define _dc_124 "the reciprocal "
256 #define _dc_125 "of the blow-up factor for rejecting variables "
257 #define _dc_126 "must be positive.$$now = "
258 #define _dc_127 "the maximum number of iterations = "
259 #define _dc_128 " must be positive for option number 5."
260 #define _dc_129 "the factor (ncols/minput) where pre-"
261 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00007
262
263 #define _dc_130 "triangularizing is performed must be non-"
264 #define _dc_131 "negative.$$now = "
265 #define _dc_132 "the row separator to apply weighting ("
266 #define _dc_133 ") must lie between 0 and minput = "
267 #define _dc_134 ".$$weight = "
268 #define _dc_135 "(' pretri. input matrix')"
269 #define _dc_136 "(' lower bounds')"
270 #define _dc_137 "(' upper bounds')"
271 #define _dc_138 "more than itmax = "
272 #define _dc_139 " iterations solving bounded least squares problem."
273 #define _dc_140 "(' gradient values')"
274 #define _dc_141 "(' internal variable order')"
275 #define _dc_142 "(' bound polarity')"
276 #define _dc_143 "(' found no variable to enter')"
277 #define _dc_144 "(' try to bring in this col.')"
278 #define _dc_145 "(' variable is dependent, not used.')"
279 #define _dc_146 "(' pivot is zero, not used.')"
280 #define _dc_147 "(' variable has bad direction, not used.')"
281 #define _dc_148 "(' soln. values')"
282 #define _dc_149 "(' cols. used')"
283 #define _dc_150 "dbsgq8"
284 #define _dc_151 "dcov"
285 #define _dc_152 "execution terminated because user set iflag negative."
286 #define _dc_153 "invalid input parameter."
287 #define _dc_154 "singular jacobian matrix, covariance matrix cannot be "
288 #define _dc_155 "calculated."
289 #define _dc_156 "ddes"
290 #define _dc_157 "in ddeabm, info(1) must be "
291 #define _dc_158 "set to 0 for the start of a new problem, and must be "
292 #define _dc_159 "set to 1 following an interrupted task. you are "
293 #define _dc_160 "attempting to continue the integration illegally by "
294 #define _dc_161 "calling the code with info(1) = "
295 #define _dc_162 "in ddeabm, info(2) must be "
296 #define _dc_163 "0 or 1 indicating scalar and vector error tolerances, "
297 #define _dc_164 "respectively. you have called the code with info(2) = "
298 #define _dc_165 "in ddeabm, info(3) must be "
299 #define _dc_166 "0 or 1 indicating the interval or intermediate-output "
300 #define _dc_167 "mode of integration, respectively. you have called "
301 #define _dc_168 "the code with info(3) = "
302 #define _dc_169 "in ddeabm, info(4) must be "
303 #define _dc_170 "0 or 1 indicating whether or not the integration "
304 #define _dc_171 "interval is to be restricted by a point tstop. you "
305 #define _dc_172 "have called the code with info(4) = "
306 #define _dc_173 "in ddeabm, the number of "
307 #define _dc_174 "equations neq must be a positive integer. you have "
308 #define _dc_175 "called the code with neq = "
309 #define _dc_176 "in ddeabm, the relative "
310 #define _dc_177 "error tolerances rtol must be non-negative. you "
311 #define _dc_178 "have called the code with rtol("
312 #define _dc_179 ". in the case of vector error tolerances, "
313 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00008
314
315 #define _dc_180 "no further checking of rtol components is done."
316 #define _dc_181 "in ddeabm, the absolute "
317 #define _dc_182 "error tolerances atol must be non-negative. you "
318 #define _dc_183 "have called the code with atol("
319 #define _dc_184 "no further checking of atol components is done."
320 #define _dc_185 "in ddeabm, you have "
321 #define _dc_186 "called the code with tout = "
322 #define _dc_187 " but "
323 #define _dc_188 "you have also told the code (info(4) = 1) not to "
324 #define _dc_189 "integrate past the point tstop = "
325 #define _dc_190 " these instructions conflict."
326 #define _dc_191 "called the code with t = tout = "
327 #define _dc_192 "$$this is not allowed on continuation calls."
328 #define _dc_193 "changed the value of t from "
329 #define _dc_194 " to "
330 #define _dc_195 " this is not allowed on continuation calls."
331 #define _dc_196 "in ddeabm, by "
332 #define _dc_197 "calling the code with tout = "
333 #define _dc_198 " you are attempting to change the direction of "
334 #define _dc_199 "integration.$$this is not allowed without "
335 #define _dc_200 "restarting."
336 #define _dc_201 "in ddeabm, invalid "
337 #define _dc_202 "input was detected on successive entries. it is "
338 #define _dc_203 "impossible to proceed because you have not "
339 #define _dc_204 "corrected the problem, so execution is being "
340 #define _dc_205 "terminated."
341 #define _dc_206 "defcmn"
342 #define _dc_207 "in defc, the order of the b-spline must be 1 thru 20."
343 #define _dc_208 "in defc, the number of knots must be at least twice "
344 #define _dc_209 "the b-spline order."
345 #define _dc_210 "in defc, the number of data points must be nonnegative."
346 #define _dc_211 "in defc, insufficient storage for w(*). check formula "
347 #define _dc_212 "that reads lw.ge. ... . need = "
348 #define _dc_213 " given = "
349 #define _dc_214 "in defc, input value of mdein must be 1-2."
350 #define _dc_215 "derkfs"
351 #define _dc_216 "in derkf, info(1) must be set to 0 "
352 #define _dc_217 "for the start of a new problem, and must be set to 1 "
353 #define _dc_218 "following an interrupted task. you are attempting to "
354 #define _dc_219 "continue the integration illegally by calling the code "
355 #define _dc_220 "with info(1) = "
356 #define _dc_221 "in derkf, info(2) must be 0 or 1 indicating scalar "
357 #define _dc_222 "and vector error tolerances, respectively. you have "
358 #define _dc_223 "called the code with info(2) = "
359 #define _dc_224 "in derkf, info(3) must be 0 or 1 indicating the "
360 #define _dc_225 "or intermediate-output mode of integration, "
361 #define _dc_226 "respectively. you have called the code "
362 #define _dc_227 "with info(3) = "
363 #define _dc_228 "in derkf, the number of equations neq must be a "
364 #define _dc_229 "positive integer. you have called the "
365 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00009
366
367 #define _dc_230 "code with neq = "
368 #define _dc_231 "in derkf, the relative error "
369 #define _dc_232 "tolerances rtol must be non-negative. you have "
370 #define _dc_233 "called the code with rtol("
371 #define _dc_234 "in derkf, the absolute error "
372 #define _dc_235 "tolerances atol must be non-negative. you have "
373 #define _dc_236 "called the code with atol("
374 #define _dc_237 "in derkf, you have called the "
375 #define _dc_238 "code with t = tout = "
376 #define _dc_239 "$$this is not "
377 #define _dc_240 "allowed on continuation calls."
378 #define _dc_241 "in derkf, you have changed the "
379 #define _dc_242 "value of t from "
380 #define _dc_243 "in derkf, by calling the code "
381 #define _dc_244 "with tout = "
382 #define _dc_245 " you are attempting "
383 #define _dc_246 "to change the direction of integration.$$this is "
384 #define _dc_247 "not allowed without restarting."
385 #define _dc_248 "in derkf, invalid input was "
386 #define _dc_249 "detected on successive entries. it is impossible "
387 #define _dc_250 "to proceed because you have not corrected the "
388 #define _dc_251 "problem, so execution is being terminated."
389 #define _dc_252 "des"
390 #define _dc_253 "in deabm, info(1) must be "
391 #define _dc_254 "in deabm, info(2) must be 0 or 1 "
392 #define _dc_255 "indicating scalar and vector error tolerances, "
393 #define _dc_256 "in deabm, info(3) must be 0 or 1 "
394 #define _dc_257 "indicating the interval or intermediate-output mode of "
395 #define _dc_258 "integration, respectively. you have called the code "
396 #define _dc_259 "in deabm, info(4) must be 0 or 1 "
397 #define _dc_260 "indicating whether or not the integration interval is "
398 #define _dc_261 "to be restricted by a point tstop. you have called "
399 #define _dc_262 "the code with info(4) = "
400 #define _dc_263 "in deabm, the number of equations "
401 #define _dc_264 "neq must be a positive integer. you have called the "
402 #define _dc_265 "code with neq = "
403 #define _dc_266 "in deabm, the relative error "
404 #define _dc_267 "in deabm, the absolute error "
405 #define _dc_268 "in deabm, you have called the "
406 #define _dc_269 "code with tout = "
407 #define _dc_270 " but you have "
408 #define _dc_271 "also told the code (info(4) = 1) not to integrate "
409 #define _dc_272 "past the point tstop = "
410 #define _dc_273 " these "
411 #define _dc_274 "instructions conflict."
412 #define _dc_275 "in deabm, you have changed the "
413 #define _dc_276 "in deabm, by calling the "
414 #define _dc_277 "code with tout = "
415 #define _dc_278 " you are "
416 #define _dc_279 "attempting to change the direction of "
417 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00010
418
419 #define _dc_280 "in deabm, invalid input was "
420 #define _dc_281 "dfcmn"
421 #define _dc_282 "in dfc, the order of the b-spline must be 1 thru 20."
422 #define _dc_283 "in dfc, the number of knots must be at least twice "
423 #define _dc_284 "in dfc, the number of data points must be nonnegative."
424 #define _dc_285 "in dfc, insufficient storage for w(*). check nb = "
425 #define _dc_286 "in dfc, input value of mode must be 1-4."
426 #define _dc_287 "in dfc, insufficient storage for w(*). check lw = "
427 #define _dc_288 "in dfc, insufficient storage for iw(*). check iw1 = "
428 #define _dc_289 "dfulmt"
429 #define _dc_290 "in dsplp, row dim., mrelas, nvars are missing from prgopt."
430 #define _dc_291 "dgaus8"
431 #define _dc_292 "a and b are too nearly equal to allow normal integration. $$"
432 #define _dc_293 "ans is set to zero and ierr to -1."
433 #define _dc_294 "dgefs"
434 #define _dc_295 "dhfti"
435 #define _dc_296 "mda.lt.m, probable error."
436 #define _dc_297 "mdb.lt.max(m,n).and.nb.gt.1. probable error."
437 #define _dc_298 "dllsia"
438 #define _dc_299 "solution only (info=1) but no right hand side (nb=0)"
439 #define _dc_300 "m.lt.1"
440 #define _dc_301 "n.lt.1"
441 #define _dc_302 "n.gt.m"
442 #define _dc_303 "mda.lt.m"
443 #define _dc_304 "liw.lt.m+n"
444 #define _dc_305 "nb.lt.0"
445 #define _dc_306 "mdb.lt.m"
446 #define _dc_307 "key out of range"
447 #define _dc_308 "insufficient work space"
448 #define _dc_309 "re(i) .lt. 0"
449 #define _dc_310 "re(i) .gt. 1"
450 #define _dc_311 "ae(i) .lt. 0"
451 #define _dc_312 "info out of range"
452 #define _dc_313 "mode out of range"
453 #define _dc_314 "np out of range"
454 #define _dc_315 "lsei"
455 #define _dc_316 "all of the variables n, me,"
456 #define _dc_317 " ma, mg must be .ge. 0$$entered routine with"
457 #define _dc_318 "$$n = "
458 #define _dc_319 "$$me = "
459 #define _dc_320 "$$ma = "
460 #define _dc_321 "$$mg = "
461 #define _dc_322 "dlsei"
462 #define _dc_323 "insufficient storage "
463 #define _dc_324 "allocated for ws(*), need lw = "
464 #define _dc_325 "allocated for ip(*), need lip = "
465 #define _dc_326 "mdw.lt.me+ma+mg is an error"
466 #define _dc_327 "the option vector is undefined"
467 #define _dc_328 "the links in the option vector are cycling."
468 #define _dc_329 "mdw .lt. n when cov matrix needed, is an error"
469 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00011
470
471 #define _dc_330 "dlssud"
472 #define _dc_331 "invalid imput parameters."
473 #define _dc_332 "dnbfs"
474 #define _dc_333 "dnls1e"
475 #define _dc_334 "dnls1"
476 #define _dc_335 "derivative of "
477 #define _dc_336 "function "
478 #define _dc_337 " may be wrong, err = "
479 #define _dc_338 " too close to 0."
480 #define _dc_339 "derivative of function "
481 #define _dc_340 "third convergence condition, check results before accepting."
482 #define _dc_341 "too many function evaluations."
483 #define _dc_342 "tolerances too small, no further improvement possible."
484 #define _dc_343 "dnsqe"
485 #define _dc_344 "dnsq"
486 #define _dc_345 "xtol too small. no further improvement possible."
487 #define _dc_346 "iteration not making good progress."
488 #define _dc_347 "dorthr"
489 #define _dc_348 "invalid input parameters."
490 #define _dc_349 "rank of matrix is less than the number of rows."
491 #define _dc_350 "dp1vlu"
492 #define _dc_351 "the order of polynomial evaluation, l = "
493 #define _dc_352 " requested exceeds the highest order fit, nord = "
494 #define _dc_353 ", computed by dpolft -- execution terminated."
495 #define _dc_354 "invalid input parameter. order of polynomial evaluation "
496 #define _dc_355 "requested is negative."
497 #define _dc_356 "dpchng"
498 #define _dc_357 "ircx=0"
499 #define _dc_358 "subscripts for array element to be accessed were out of "
500 #define _dc_359 "bounds"
501 #define _dc_360 "dpintm"
502 #define _dc_361 "matrix dimension m or n .le. 0"
503 #define _dc_362 "the value of lmx is too small"
504 #define _dc_363 "dplint"
505 #define _dc_364 "n is zero or negative."
506 #define _dc_365 "the abscissas are not distinct."
507 #define _dc_366 "dplpdm"
508 #define _dc_367 "in dsplp, short on storage for la05ad. "
509 #define _dc_368 "use prgopt(*) to give more."
510 #define _dc_369 "in dsplp, la05ad returned error flag = "
511 #define _dc_370 "dplpmn"
512 #define _dc_371 "in dsplp, a singular initial basis was encountered."
513 #define _dc_372 "in dsplp, an infeasible initial basis was encountered."
514 #define _dc_373 "(' enter standard phase-1')"
515 #define _dc_374 "(' enter standard phase-2')"
516 #define _dc_375 "in dsplp, the problem appears to be infeasible"
517 #define _dc_376 "in dsplp, the problem appears to have no finite solution."
518 #define _dc_377 "in dsplp, the problem appears to be infeasible and to "
519 #define _dc_378 "have no finite soln."
520 #define _dc_379 "(' basic (internal) dual soln.')"
521 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00012
522
523 #define _dc_380 "(' reduced costs')"
524 #define _dc_381 "(' search direction')"
525 #define _dc_382 "(' subscripts of basic variables during redecomposition')"
526 #define _dc_383 "(' est. error in primal comps.')"
527 #define _dc_384 "(' est. error in dual comps.')"
528 #define _dc_385 "in dsplp, moved to a singular point. this should not happen."
529 #define _dc_386 "in dsplp, max iterations = "
530 #define _dc_387 " taken. up-to-date results saved on file no. "
531 #define _dc_388 ". if file no. = 0, no save."
532 #define _dc_389 "('1num. of dependent vars., mrelas')"
533 #define _dc_390 "(' num. of independent vars., nvars')"
534 #define _dc_391 "(' dimension of costs(*)=')"
535 #define _dc_392 "(' dimensions of bl(*),bu(*),ind(*)'/' primal(*),duals(*) =')"
536 #define _dc_393 "(' dimension of ibasis(*)=')"
537 #define _dc_394 "(' dimension of prgopt(*)=')"
538 #define _dc_395 "(' 1-nvars=independent variable indices.'/ ' (nvars+1)-(nvars+mrelas)=dependent variable indices.'/ ' constraint indicators are 1-4 and mean')"
539 #define _dc_396 "(' 1=variable has only lower bound.'/ ' 2=variable has only upper bound.'/ ' 3=variable has both bounds.'/ ' 4=variable has no bounds, it is free.')"
540 #define _dc_397 "(' array of costs')"
541 #define _dc_398 "(' constraint indicators')"
542 #define _dc_399 "(' lower bounds for variables (ignore unused entries.)')"
543 #define _dc_400 "(' upper bounds for variables (ignore unused entries.)')"
544 #define _dc_401 "('0non-basic indices that are negative show variables' ' exchanged at a zero'/' step length')"
545 #define _dc_402 "(' when col. no. leaving=col. no. entering, the entering ' 'variable moved'/' to its bound. it remains non-basic.'/ ' when col. no. of basis exchanged is negative, the leaving'/ ' variable is at its upper bound.')"
546 #define _dc_403 "(' the output value of info is')"
547 #define _dc_404 "(' this is a minimization problem.')"
548 #define _dc_405 "(' this is a maximization problem.')"
549 #define _dc_406 "(' steepest edge pricing was used.')"
550 #define _dc_407 "(' minimum reduced cost pricing was used.')"
551 #define _dc_408 "(' output value of the objective function')"
552 #define _dc_409 "(' the output independent and dependent variables')"
553 #define _dc_410 "(' the output dual variables')"
554 #define _dc_411 "(' variable indices in positions 1-mrelas are basic.')"
555 #define _dc_412 "(' no. of iterations')"
556 #define _dc_413 "(' no. of full redecomps')"
557 #define _dc_414 "('0iteration number')"
558 #define _dc_415 "(' index of variable entering the basis')"
559 #define _dc_416 "(' column of the basis exchanged')"
560 #define _dc_417 "(' index of variable leaving the basis')"
561 #define _dc_418 "(' length of the exchange step')"
562 #define _dc_419 "(' basic (internal) primal soln.')"
563 #define _dc_420 "(' ibb array')"
564 #define _dc_421 "(' translated rhs')"
565 #define _dc_422 "dplpmu"
566 #define _dc_423 "dplpup"
567 #define _dc_424 "in dsplp, independent variable = "
568 #define _dc_425 "in dsplp, lower bound = "
569 #define _dc_426 " and upper bound = "
570 #define _dc_427 " for independent variable = "
571 #define _dc_428 " are not consistent."
572 #define _dc_429 "in dsplp, dependent variable = "
573 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00013
574
575 #define _dc_430 " for dependant variable = "
576 #define _dc_431 "in dsplp, more than 2*nvars*mrelas iterations defining "
577 #define _dc_432 "or updating matrix data."
578 #define _dc_433 "in dsplp, row index = "
579 #define _dc_434 " or column index = "
580 #define _dc_435 " is out of range."
581 #define _dc_436 "in dsplp, indication flag = "
582 #define _dc_437 " for matrix data must be either 0 or 1."
583 #define _dc_438 "in dsplp, a matrix element's size is out of the "
584 #define _dc_439 "specified range."
585 #define _dc_440 "dpnnzr"
586 #define _dc_441 "bounds."
587 #define _dc_442 "dpofs"
588 #define _dc_443 "dpolft"
589 #define _dc_444 "dpopt"
590 #define _dc_445 "in dsplp, the user option array has undefined data."
591 #define _dc_446 "in dsplp, option array processing is cycling."
592 #define _dc_447 "in dsplp, an index of user-supplied basis is out of range."
593 #define _dc_448 "in dsplp, size parameters for matrix must be smallest and "
594 #define _dc_449 "largest magnitudes of nonzero entries."
595 #define _dc_450 "in dsplp, the number of revised simplex steps between "
596 #define _dc_451 "check-points must be positive."
597 #define _dc_452 "in dsplp, file numbers for saved data and matrix pages "
598 #define _dc_453 "must be positive and not equal."
599 #define _dc_454 "dpperm"
600 #define _dc_455 "the number of values to be rearranged, n, is not positive."
601 #define _dc_456 "the permutation vector, iperm, is not valid."
602 #define _dc_457 "dppgq8"
603 #define _dc_458 "a and b are too nearly equal to allow normal "
604 #define _dc_459 "integration. answer is set to zero, and ierr=-1."
605 #define _dc_460 "dprwpg"
606 #define _dc_461 "the value of ipage (page number) was not in the range"
607 #define _dc_462 "1.le.ipage.le.maxpge."
608 #define _dc_463 "the value of lpg (page length) was nonpositive."
609 #define _dc_464 "the value of key (read-write flag) was not 1 or 2."
610 #define _dc_465 "dpsort"
611 #define _dc_466 "the number of values to be sorted, n, is not positive."
612 #define _dc_467 "the sort control parameter, kflag, is not 2, 1, -1, or -2."
613 #define _dc_468 "drc3jj"
614 #define _dc_469 "l2-abs(m2) or l3-abs(m3) "
615 #define _dc_470 "less than zero."
616 #define _dc_471 "l2+abs(m2) or l3+abs(m3) "
617 #define _dc_472 "not integer."
618 #define _dc_473 "l1max-l1min not integer."
619 #define _dc_474 "l1min greater than l1max."
620 #define _dc_475 "dimension of result array for "
621 #define _dc_476 "3j coefficients too small."
622 #define _dc_477 "drc3jm"
623 #define _dc_478 "l1-abs(m1) less than zero or "
624 #define _dc_479 "l1+abs(m1) not integer."
625 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00014
626
627 #define _dc_480 "l1, l2, l3 do not satisfy "
628 #define _dc_481 "triangular condition."
629 #define _dc_482 "l1+l2+l3 not integer."
630 #define _dc_483 "m2max-m2min not integer."
631 #define _dc_484 "m2min greater than m2max."
632 #define _dc_485 "drc6j"
633 #define _dc_486 "l2+l3+l5+l6 or l4+l2+l6 not "
634 #define _dc_487 "integer."
635 #define _dc_488 "l4, l2, l6 triangular "
636 #define _dc_489 "condition not satisfied."
637 #define _dc_490 "l4, l5, l3 triangular "
638 #define _dc_491 "dimension of result array for 6j "
639 #define _dc_492 "coefficients too small."
640 #define _dc_493 "drc"
641 #define _dc_494 "x.lt.0 .or. y.le.0 where x = "
642 #define _dc_495 " and y = "
643 #define _dc_496 "max(x,y).gt.uplim where x = "
644 #define _dc_497 " y = "
645 #define _dc_498 " and uplim = "
646 #define _dc_499 "x+y.lt.lolim where x = "
647 #define _dc_500 " and lolim = "
648 #define _dc_501 "drd"
649 #define _dc_502 "min(x,y).lt.0 where x = "
650 #define _dc_503 "max(x,y,z).gt.uplim where x = "
651 #define _dc_504 " z = "
652 #define _dc_505 "min(x+y,z).lt.lolim where x = "
653 #define _dc_506 "dreadp"
654 #define _dc_507 "in dsplp, lpg = "
655 #define _dc_508 " irecn = "
656 #define _dc_509 "drf"
657 #define _dc_510 "min(x,y,z).lt.0 where x = "
658 #define _dc_511 " and z = "
659 #define _dc_512 "min(x+y,x+z,y+z).lt.lolim where x = "
660 #define _dc_513 "drj"
661 #define _dc_514 "max(x,y,z,p).gt.uplim where x = "
662 #define _dc_515 " p = "
663 #define _dc_516 "rj"
664 #define _dc_517 "min(x+y,x+z,y+z,p).lt.lolim where x = "
665 #define _dc_518 "drkfs"
666 #define _dc_519 "in dderkf, info(1) must be set to 0 "
667 #define _dc_520 "in dderkf, info(2) must be 0 or 1 "
668 #define _dc_521 "in dderkf, info(3) must be 0 or 1 "
669 #define _dc_522 "in dderkf, the number of equations "
670 #define _dc_523 "in dderkf, the relative error "
671 #define _dc_524 "in dderkf, the absolute error "
672 #define _dc_525 "in dderkf, you have called the "
673 #define _dc_526 "in dderkf, you have changed the "
674 #define _dc_527 "in dderkf, by calling the code with tout = "
675 #define _dc_528 " you are attempting to change the "
676 #define _dc_529 "direction of integration.$$this is not allowed "
677 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00015
678
679 #define _dc_530 "without restarting."
680 #define _dc_531 "in dderkf, invalid input was "
681 #define _dc_532 "dsort"
682 #define _dc_533 "the number of values to be sorted is not positive."
683 #define _dc_534 "the sort control parameter, k, is not 2, 1, -1, or -2."
684 #define _dc_535 "0residual norm ="
685 #define _dc_536 " "
686 #define _dc_537 "solution iterate ("
687 #define _dc_538 ")"
688 #define _dc_539 "dsos"
689 #define _dc_540 "the number of equations "
690 #define _dc_541 "must be a positive integer. you have called the "
691 #define _dc_542 "the error tolerances for "
692 #define _dc_543 "the solution iterates cannot be negative. you have "
693 #define _dc_544 "called the code with rtolx = "
694 #define _dc_545 " and atolx = "
695 #define _dc_546 "the residual error "
696 #define _dc_547 "tolerance must be non-negative. you have called the "
697 #define _dc_548 "code with tolf = "
698 #define _dc_549 "you have told the code "
699 #define _dc_550 "to use optional input items by setting iflag=-1. "
700 #define _dc_551 "however you have called the code with the maximum "
701 #define _dc_552 "allowable number of iterations set to iw(2) = "
702 #define _dc_553 "dimension of the rw array "
703 #define _dc_554 "must be at least 1 + 6*neq + neq*(neq+1)/2 . you have "
704 #define _dc_555 "called the code with lrw = "
705 #define _dc_556 "dimension of the iw array "
706 #define _dc_557 "must be at least 3 + neq. you have called the code "
707 #define _dc_558 "with liw = "
708 #define _dc_559 "dsplp"
709 #define _dc_560 "value of mrelas must be "
710 #define _dc_561 ".gt. 0. now = "
711 #define _dc_562 "value of nvars must be "
712 #define _dc_563 "the user option array has undefined data."
713 #define _dc_564 "option array processing is cycling."
714 #define _dc_565 "user-defined value of "
715 #define _dc_566 "lamat = "
716 #define _dc_567 " must be .ge. nvars+7."
717 #define _dc_568 "user-defined value of lbm must be .ge. 0."
718 #define _dc_569 "work or iwork is not long "
719 #define _dc_570 "enough. lw must be = "
720 #define _dc_571 " and liw must be = "
721 #define _dc_572 "du11ls"
722 #define _dc_573 "first np columns are linearly dependent"
723 #define _dc_574 "du11us"
724 #define _dc_575 "first np rows are linearly dependent"
725 #define _dc_576 "dulsia"
726 #define _dc_577 "n.lt.m"
727 #define _dc_578 "mdb.lt.n"
728 #define _dc_579 "dwnlsm"
729 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00016
730
731 #define _dc_580 "in dwnnls, the option vector is undefined"
732 #define _dc_581 "in dwnnls, the links in the option vector are cycling."
733 #define _dc_582 "dwnnls"
734 #define _dc_583 "allocated for work(*), need lw = "
735 #define _dc_584 "allocated for iwork(*), need liw = "
736 #define _dc_585 "the value mdw.lt.me+ma is an error"
737 #define _dc_586 "l.ge.0 .and. l.le.n is required"
738 #define _dc_587 "dwritp"
739 #define _dc_588 "in dsplp, lgp = "
740 #define _dc_589 "dxadj"
741 #define _dc_590 "overflow in auxiliary index"
742 #define _dc_591 "dxc210"
743 #define _dc_592 "k too large"
744 #define _dc_593 "efcmn"
745 #define _dc_594 "in efc, the order of the b-spline must be 1 thru 20."
746 #define _dc_595 "in efc, the number of knots must be at least twice "
747 #define _dc_596 "in efc, the number of data points must be nonnegative."
748 #define _dc_597 "in efc, insufficient storage for w(*). check formula "
749 #define _dc_598 "in efc, input value of mdein must be 1-2."
750 #define _dc_599 "fcmn"
751 #define _dc_600 "in fc, the order of the b-spline must be 1 thru 20."
752 #define _dc_601 "in fc, the number of knots must be at least twice "
753 #define _dc_602 "in fc, the number of data points must be nonnegative."
754 #define _dc_603 "in fc, insufficient storage for w(*). check nb = "
755 #define _dc_604 "in fc, input value of mode must be 1-4."
756 #define _dc_605 "in fc, insufficient storage for w(*). check lw = "
757 #define _dc_606 "in fc, insufficient storage for iw(*). check iw1 = "
758 #define _dc_607 "fulmat"
759 #define _dc_608 "in splp package, row dim., mrelas, nvars are missing from "
760 #define _dc_609 "prgopt."
761 #define _dc_610 "gaus8"
762 #define _dc_611 "hfti"
763 #define _dc_612 "hpperm"
764 #define _dc_613 "the length of the work variable, work, is too short."
765 #define _dc_614 "hpsort"
766 #define _dc_615 " hpsort"
767 #define _dc_616 "the string beginning, strbeg, is beyond its end, strend."
768 #define _dc_617 "the string beginning, strbeg, is out-of-range."
769 #define _dc_618 "the string end, strend, is out-of-range."
770 #define _dc_619 "idloc"
771 #define _dc_620 "a value of loc, the first argument, .le. 0 was encountered"
772 #define _dc_621 "iploc"
773 #define _dc_622 "ipperm"
774 #define _dc_623 "ipsort"
775 #define _dc_624 "isort"
776 #define _dc_625 "llsia"
777 #define _dc_626 "lssods"
778 #define _dc_627 "problem may be ill-conditioned. maximal machine accuracy "
779 #define _dc_628 "is not achievable."
780 #define _dc_629 "problem is very ill-conditioned. iterative "
781 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00017
782
783 #define _dc_630 "improvement is ineffective."
784 #define _dc_631 "convergence has not been obtained with allowable "
785 #define _dc_632 "number of iterative improvement steps."
786 #define _dc_633 "lssuds"
787 #define _dc_634 " *** sign not 0, +1 or -1 in call to mpadd2,"
788 #define _dc_635 " possible overwriting problem ***"
789 #define _dc_636 "mpblas"
790 #define _dc_637 "array space not sufficient for quad precision 2x "
791 #define _dc_638 "double precision, proceeding."
792 #define _dc_639 " *** b ="
793 #define _dc_640 " illegal in call to mpchk,"
794 #define _dc_641 " perhaps not set before call to an mp routine ***"
795 #define _dc_642 " *** t ="
796 #define _dc_643 " *** m .le. t in call to mpchk,"
797 #define _dc_644 " *** b too large in call to mpchk ***"
798 #define _dc_645 " *** mxr too small or not set to dim(r) before call"
799 #define _dc_646 " to an mp routine *** "
800 #define _dc_647 " *** mxr should be at least"
801 #define _dc_648 "*t +"
802 #define _dc_649 " ="
803 #define _dc_650 " ***"
804 #define _dc_651 " *** actually mxr ="
805 #define _dc_652 ", and t ="
806 #define _dc_653 " *** floating-point over/under-flow in mpcmd ***"
807 #define _dc_654 " *** attempted division by zero in call to mpdivi ***"
808 #define _dc_655 " *** integer overflow in mpdivi, b too large ***"
809 #define _dc_656 "mperr"
810 #define _dc_657 " *** execution terminated by call to mperr"
811 #define _dc_658 " in mp version 770217 ***"
812 #define _dc_659 " *** overflow occurred in mpmul2 ***"
813 #define _dc_660 " *** integer overflow in mpmul2, b too large ***"
814 #define _dc_661 " *** integer overflow in mpmul, b too large ***"
815 #define _dc_662 " *** illegal base b digit in call to mpmul,"
816 #define _dc_663 " *** sign not 0, +1 or -1 in call to mpnzr,"
817 #define _dc_664 " *** overflow occurred in mpnzr ***"
818 #define _dc_665 " *** call to mpovfl, mp overflow occurred ***"
819 #define _dc_666 "orthol"
820 #define _dc_667 "rank of matrix is less than the number of columns."
821 #define _dc_668 "orthor"
822 #define _dc_669 "pchngs"
823 #define _dc_670 "ircx=0."
824 #define _dc_671 "pinitm"
825 #define _dc_672 "matrix dimension m or n .le. 0."
826 #define _dc_673 "the value of lmx is too small."
827 #define _dc_674 "pnnzrs"
828 #define _dc_675 "polfit"
829 #define _dc_676 "polint"
830 #define _dc_677 "ppgq8"
831 #define _dc_678 "prwpge"
832 #define _dc_679 "pvalue"
833 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00018
834
835 #define _dc_680 ", computed by polfit -- execution terminated."
836 #define _dc_681 "requested is negative -- execution terminated."
837 #define _dc_682 "rc3jj"
838 #define _dc_683 "dimension of result array for 3j "
839 #define _dc_684 "rc3jm"
840 #define _dc_685 "rc6j"
841 #define _dc_686 "rc"
842 #define _dc_687 "rd"
843 #define _dc_688 "rf"
844 #define _dc_689 "rpqr79"
845 #define _dc_690 "sbocls"
846 #define _dc_691 " must be .ge. the reqd. length = "
847 #define _dc_692 " must be .ge. the reqd. len = "
848 #define _dc_693 "sbols"
849 #define _dc_694 "sbolsm"
850 #define _dc_695 "sclosm"
851 #define _dc_696 "in splp, close has error flag = "
852 #define _dc_697 "scov"
853 #define _dc_698 "sgeev"
854 #define _dc_699 "sgefs"
855 #define _dc_700 "sgeir"
856 #define _dc_701 "snbfs"
857 #define _dc_702 "snbir"
858 #define _dc_703 "snls1e"
859 #define _dc_704 "snls1"
860 #define _dc_705 "snsqe"
861 #define _dc_706 "snsq"
862 #define _dc_707 "sopenm"
863 #define _dc_708 "in splp, open has error flag = "
864 #define _dc_709 "solution iterate"
865 #define _dc_710 " ("
866 #define _dc_711 "sos"
867 #define _dc_712 "to use optional in put items by setting iflag=-1. "
868 #define _dc_713 "allowable number of iterations set to iw(2) = "
869 #define _dc_714 "must be at least 3 + neq. you have called the code "
870 #define _dc_715 "splpdm"
871 #define _dc_716 "in splp, short on storage for la05as. "
872 #define _dc_717 "in splp, la05as returned error flag = "
873 #define _dc_718 "splp"
874 #define _dc_719 "splpmn"
875 #define _dc_720 "in splp, a singular initial basis was encountered."
876 #define _dc_721 "in splp, an infeasible initial basis was encountered."
877 #define _dc_722 "in splp, the problem appears to be infeasible"
878 #define _dc_723 "in splp, the problem appears to have no finite solution."
879 #define _dc_724 "in splp, the problem appears to be infeasible and to have "
880 #define _dc_725 "no finite solution."
881 #define _dc_726 "in splp, moved to a singular point. this should not happen."
882 #define _dc_727 "in splp, max iterations = "
883 #define _dc_728 ". if file no. = 0, no save."
884 #define _dc_729 "splpmu"
885 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00019
886
887 #define _dc_730 "splpup"
888 #define _dc_731 "in splp, independent variable = "
889 #define _dc_732 "in splp, lower bound = "
890 #define _dc_733 "in splp, dependent variable = "
891 #define _dc_734 "in splp, more than 2*nvars*mrelas iterations defining "
892 #define _dc_735 "in splp, row index = "
893 #define _dc_736 "in splp, indication flag = "
894 #define _dc_737 "in splp, a matrix element's size is out of the "
895 #define _dc_738 "spofs"
896 #define _dc_739 "spoir"
897 #define _dc_740 "spopt"
898 #define _dc_741 "in splp, the user option array has undefined data."
899 #define _dc_742 "in splp, option array processing is cycling."
900 #define _dc_743 "in splp, an index of user-supplied basis is out of range."
901 #define _dc_744 "in splp, size parameters for matrix must be smallest and "
902 #define _dc_745 "in splp, the number of revised simplex steps between "
903 #define _dc_746 "in splp, file numbers for saved data and matrix pages "
904 #define _dc_747 "spperm"
905 #define _dc_748 "spsort"
906 #define _dc_749 "sreadp"
907 #define _dc_750 "in splp, lpg = "
908 #define _dc_751 "ssiev"
909 #define _dc_752 "ssort"
910 #define _dc_753 "swritp"
911 #define _dc_754 "in splp, lgp = "
912 #define _dc_755 "u11ls"
913 #define _dc_756 "u11us"
914 #define _dc_757 "ulsia"
915 #define _dc_758 "wnlsm"
916 #define _dc_759 "wnnls, the option vector is undefined"
917 #define _dc_760 "wnnls, the links in the option vector are cycling."
918 #define _dc_761 "wnnls"
919 #define _dc_762 "xadj"
920 #define _dc_763 "xc210"
921
922
923
924 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** TYPEDEFS PAGE 00020
925
926 static FORMAT *__fmt_a = NULL;
927 typedef char char_3[4];
928 typedef char char_7[8];
929 typedef char char_15[16];
930 typedef char char_31[32];
931 typedef char char_63[64];
932 typedef char char_127[128];
933 typedef char char_255[256];
934 typedef char char_511[512];
935 typedef char char_1023[1024];
936 typedef char char_2047[2048];
937 typedef char char_4095[4096];
938
939
940 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** FREQUENCY TABLE PAGE 00021
941
942 #define __ncalls 385
943 static CALLS __calls[__ncalls] = {
944 { // ** body not listed **"aaaaaa", 0}, // subroutine
946 { // ** body not listed **"asyjy", 0}, // subroutine
948 { // ** body not listed **"bcrh", 0}, // function
950 { // ** body not listed **"bksol", 0}, // subroutine
952 { // ** body not listed **"bndacc", 0}, // subroutine
954 { // ** body not listed **"bsgq8", 0}, // subroutine
956 { // ** body not listed **"bsplvn", 0}, // subroutine
958 { // ** body not listed **"c1merg", 0}, // subroutine
960 { // ** body not listed **"cblkt1", 0}, // subroutine
962 { // ** body not listed **"cfod", 0}, // subroutine
964 { // ** body not listed **"cgefs", 0}, // subroutine
966 { // ** body not listed **"chiev", 0}, // subroutine
968 { // ** body not listed **"chkprm", 0}, // subroutine
970 { // ** body not listed **"chksng", 0}, // subroutine
972 { // ** body not listed **"cmposd", 0}, // subroutine
974 { // ** body not listed **"cmposp", 0}, // subroutine
976 { // ** body not listed **"cmptrx", 0}, // subroutine
978 { // ** body not listed **"cnbdi", 0}, // subroutine
980 { // ** body not listed **"cnbfs", 0}, // subroutine
982 { // ** body not listed **"cnbsl", 0}, // subroutine
984 { // ** body not listed **"cosgen", 0}, // subroutine
986 { // ** body not listed **"cpevl", 0}, // subroutine
988 { // ** body not listed **"cpofs", 0}, // subroutine
990 { // ** body not listed **"cpqr79", 0}, // subroutine
994 { // ** body not listed **"cprocp", 0}, // subroutine
996 { // ** body not listed **"cprodp", 0}, // subroutine
998 { // ** body not listed **"crati", 0}, // subroutine
1000 { // ** body not listed **"cscale", 0}, // subroutine
1002 { // ** body not listed **"cuchk", 0}, // subroutine
1004 { // ** body not listed **"cunik", 0}, // subroutine
1006 { // ** body not listed **"d1merg", 0}, // subroutine
1008 { // ** body not listed **"d1updt", 0}, // subroutine
1010 { // ** body not listed **"davint", 0}, // subroutine
1012 { // ** body not listed **"dbksol", 0}, // subroutine
1014 { // ** body not listed **"dbndsl", 0}, // subroutine
1016 { // ** body not listed **"dbols", 0}, // subroutine
1018 { // ** body not listed **"dbsgq8", 0}, // subroutine
1020 { // ** body not listed **"dckder", 0}, // subroutine
1022 { // ** body not listed **"dcov", 0}, // subroutine
1024 { // ** body not listed **"dcv", 0}, // real*8 function
1026 { // ** body not listed **"ddoglg", 0}, // subroutine
1028 { // ** body not listed **"defe4", 0}, // subroutine
1030 { // ** body not listed **"defer", 0}, // subroutine
1032 { // ** body not listed **"derkfs", 0}, // subroutine
1034 { // ** body not listed **"dfcmn", 0}, // subroutine
1036 { // ** body not listed **"dfdjc3", 0}, // subroutine
1038 { // ** body not listed **"dfspvd", 0}, // subroutine
1040 { // ** body not listed **"dfulmt", 0}, // subroutine
1042 { // ** body not listed **"dgaus8", 0}, // subroutine
1046 { // ** body not listed **"dglss", 0}, // subroutine
1048 { // ** body not listed **"dhfti", 0}, // subroutine
1050 { // ** body not listed **"dhvnrm", 0}, // real*8 function
1052 { // ** body not listed **"dllsia", 0}, // subroutine
1054 { // ** body not listed **"dlsei", 0}, // subroutine
1056 { // ** body not listed **"dlssud", 0}, // subroutine
1058 { // ** body not listed **"dmgsbv", 0}, // subroutine
1060 { // ** body not listed **"dnbco", 0}, // subroutine
1062 { // ** body not listed **"dnbfa", 0}, // subroutine
1064 { // ** body not listed **"dnbsl", 0}, // subroutine
1066 { // ** body not listed **"dnls1", 0}, // subroutine
1068 { // ** body not listed **"dnsq", 0}, // subroutine
1070 { // ** body not listed **"dorthr", 0}, // subroutine
1072 { // ** body not listed **"dpchng", 0}, // subroutine
1074 { // ** body not listed **"dpincw", 0}, // subroutine
1076 { // ** body not listed **"dpintm", 0}, // subroutine
1078 { // ** body not listed **"dplpce", 0}, // subroutine
1080 { // ** body not listed **"dplpfe", 0}, // subroutine
1082 { // ** body not listed **"dplpmn", 0}, // subroutine
1084 { // ** body not listed **"dplpup", 0}, // subroutine
1086 { // ** body not listed **"dpofs", 0}, // subroutine
1088 { // ** body not listed **"dpolft", 0}, // subroutine
1090 { // ** body not listed **"dpopt", 0}, // subroutine
1092 { // ** body not listed **"dppgq8", 0}, // subroutine
1094 { // ** body not listed **"dprwpg", 0}, // subroutine
1098 { // ** body not listed **"dpsixn", 0}, // real*8 function
1100 { // ** body not listed **"dqdota", 0}, // real*8 function
1102 { // ** body not listed **"dqform", 0}, // subroutine
1104 { // ** body not listed **"dqrslv", 0}, // subroutine
1106 { // ** body not listed **"drc3jm", 0}, // subroutine
1108 { // ** body not listed **"drc", 0}, // real*8 function
1110 { // ** body not listed **"dreadp", 0}, // subroutine
1112 { // ** body not listed **"drf", 0}, // real*8 function
1114 { // ** body not listed **"drkfs", 0}, // subroutine
1116 { // ** body not listed **"dsoseq", 0}, // subroutine
1118 { // ** body not listed **"dsossl", 0}, // subroutine
1120 { // ** body not listed **"dstor1", 0}, // subroutine
1122 { // ** body not listed **"dsuds", 0}, // subroutine
1124 { // ** body not listed **"du11us", 0}, // subroutine
1126 { // ** body not listed **"du12us", 0}, // subroutine
1128 { // ** body not listed **"dusrmt", 0}, // subroutine
1130 { // ** body not listed **"dvnrms", 0}, // real*8 function
1132 { // ** body not listed **"dwnlsm", 0}, // subroutine
1134 { // ** body not listed **"dwnlt2", 0}, // logical*4 function
1136 { // ** body not listed **"dwnnls", 0}, // subroutine
1138 { // ** body not listed **"dwupdt", 0}, // subroutine
1140 { // ** body not listed **"dxadj", 0}, // subroutine
1142 { // ** body not listed **"dx", 0}, // subroutine
1144 { // ** body not listed **"dxred", 0}, // subroutine
1146 { // ** body not listed **"dyairy", 0}, // subroutine
1150 { // ** body not listed **"efcmn", 0}, // subroutine
1152 { // ** body not listed **"fdjac3", 0}, // subroutine
1154 { // ** body not listed **"fftdoc", 0}, // subroutine
1156 { // ** body not listed **"fzero", 0}, // subroutine
1158 { // ** body not listed **"gaus8", 0}, // subroutine
1160 { // ** body not listed **"hfti", 0}, // subroutine
1162 { // ** body not listed **"hpperm", 0}, // subroutine
1164 { // ** body not listed **"hstart", 0}, // subroutine
1166 { // ** body not listed **"hvnrm", 0}, // function
1168 { // ** body not listed **"hwsss1", 0}, // subroutine
1170 { // ** body not listed **"idloc", 0}, // integer*4 function
1172 { // ** body not listed **"indxb", 0}, // subroutine
1174 { // ** body not listed **"inxca", 0}, // subroutine
1176 { // ** body not listed **"inxcc", 0}, // subroutine
1178 { // ** body not listed **"ipperm", 0}, // subroutine
1180 { // ** body not listed **"isort", 0}, // subroutine
1182 { // ** body not listed **"llsia", 0}, // subroutine
1184 { // ** body not listed **"lsei", 0}, // subroutine
1186 { // ** body not listed **"lssods", 0}, // subroutine
1188 { // ** body not listed **"macon", 0}, // subroutine
1190 { // ** body not listed **"minso4", 0}, // subroutine
1192 { // ** body not listed **"mpadd2", 0}, // subroutine
1194 { // ** body not listed **"mpadd", 0}, // subroutine
1196 { // ** body not listed **"mpcdm", 0}, // subroutine
1198 { // ** body not listed **"mpcmd", 0}, // subroutine
1202 { // ** body not listed **"mperr", 0}, // subroutine
1204 { // ** body not listed **"mpmlp", 0}, // subroutine
1206 { // ** body not listed **"mpmul", 0}, // subroutine
1208 { // ** body not listed **"mpnzr", 0}, // subroutine
1210 { // ** body not listed **"mpstr", 0}, // subroutine
1212 { // ** body not listed **"numxer", 0}, // function
1214 { // ** body not listed **"ohtror", 0}, // subroutine
1216 { // ** body not listed **"orthog", 0}, // subroutine
1218 { // ** body not listed **"orthor", 0}, // subroutine
1220 { // ** body not listed **"pcoef", 0}, // subroutine
1222 { // ** body not listed **"pimach", 0}, // function
1224 { // ** body not listed **"pnnzrs", 0}, // subroutine
1226 { // ** body not listed **"poisn2", 0}, // subroutine
1228 { // ** body not listed **"polcof", 0}, // subroutine
1230 { // ** body not listed **"polint", 0}, // subroutine
1232 { // ** body not listed **"pos3d1", 0}, // subroutine
1234 { // ** body not listed **"ppadd", 0}, // subroutine
1236 { // ** body not listed **"ppgsf", 0}, // function
1238 { // ** body not listed **"ppsgf", 0}, // function
1240 { // ** body not listed **"proc", 0}, // subroutine
1242 { // ** body not listed **"prod", 0}, // subroutine
1244 { // ** body not listed **"prvec", 0}, // function
1246 { // ** body not listed **"prwvir", 0}, // subroutine
1248 { // ** body not listed **"psifn", 0}, // subroutine
1250 { // ** body not listed **"pvalue", 0}, // subroutine
1254 { // ** body not listed **"rc3jj", 0}, // subroutine
1256 { // ** body not listed **"rc6j", 0}, // subroutine
1258 { // ** body not listed **"rd", 0}, // real*4 function
1260 { // ** body not listed **"rf", 0}, // real*4 function
1262 { // ** body not listed **"rpqr79", 0}, // subroutine
1264 { // ** body not listed **"s1merg", 0}, // subroutine
1266 { // ** body not listed **"sbols", 0}, // subroutine
1268 { // ** body not listed **"sclosm", 0}, // subroutine
1270 { // ** body not listed **"scov", 0}, // subroutine
1272 { // ** body not listed **"sgefs", 0}, // subroutine
1274 { // ** body not listed **"sglss", 0}, // subroutine
1276 { // ** body not listed **"snbdi", 0}, // subroutine
1278 { // ** body not listed **"snbfs", 0}, // subroutine
1280 { // ** body not listed **"snbsl", 0}, // subroutine
1282 { // ** body not listed **"snls1", 0}, // subroutine
1284 { // ** body not listed **"snsq", 0}, // subroutine
1286 { // ** body not listed **"sopenm", 0}, // subroutine
1288 { // ** body not listed **"sos", 0}, // subroutine
1290 { // ** body not listed **"speli4", 0}, // subroutine
1292 { // ** body not listed **"spincw", 0}, // subroutine
1294 { // ** body not listed **"splpce", 0}, // subroutine
1296 { // ** body not listed **"splp", 0}, // subroutine
1298 { // ** body not listed **"splpfl", 0}, // subroutine
1300 { // ** body not listed **"splpmu", 0}, // subroutine
1302 { // ** body not listed **"spofs", 0}, // subroutine
1306 { // ** body not listed **"spopt", 0}, // subroutine
1308 { // ** body not listed **"spsort", 0}, // subroutine
1310 { // ** body not listed **"ssiev", 0}, // subroutine
1312 { // ** body not listed **"stor1", 0}, // subroutine
1314 { // ** body not listed **"suds", 0}, // subroutine
1316 { // ** body not listed **"swritp", 0}, // subroutine
1318 { // ** body not listed **"tevls", 0}, // subroutine
1320 { // ** body not listed **"tridq", 0}, // subroutine
1322 { // ** body not listed **"trisp", 0}, // subroutine
1324 { // ** body not listed **"u11ls", 0}, // subroutine
1326 { // ** body not listed **"u12ls", 0}, // subroutine
1328 { // ** body not listed **"ulsia", 0}, // subroutine
1330 { // ** body not listed **"vnwrms", 0}, // real*4 function
1332 { // ** body not listed **"wnlsm", 0}, // subroutine
1334 { // ** body not listed **"wnlt2", 0}, // logical*4 function
1336 { // ** body not listed **"wnnls", 0}, // subroutine
1338 { // ** body not listed **"xc210", 0}, // subroutine
1340 { // ** body not listed **"xred", 0}, // subroutine
1342 { // ** body not listed **NULL, 0}
1343 };
1354 } ccblk_;
1355
1356 // common /cblkt_/
1357 static struct {
1358 int_4 npp_, k_, nm_, ncmplx_, ik_;
1359 real_4 eps_, cnv_, machep_;
1360 } cblkt_;
1361
1362 // common /spl4_/
1363 static struct {
1364 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1365 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1366 } spl4_;
1367
1368 // common /splpcm_/
1369 static struct {
1370 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1371 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1372 } splpcm_;
1373
1374 // common /dml5mc_/
1375 static struct {
1376 int_4 lpar_;
1377 real_8 eps_, fouru_, sqovfl_, sru_, twou_, uro_;
1378 } dml5mc_;
1379
1380 // common /dml18j_/
1381 static struct {
1382 int_4 icoco_, indpvt_, integ_, mxnon_, ndisk_, neq_, neqivp_, nfcc_, nic_, nopg_, nps_, ntape_, ntp_, numort_, nxpts_,
1383 lnfcc_;
1384 real_8 ae_, re_, tol_;
1385 } dml18j_;
1386
1387 // common /la05dd_/
1388 static struct {
1389 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1390 real_8 small_;
1391 } la05dd_;
1392
1393 // common /mpcom_/
1394 static struct {
1395 int_4 mpb_, mpt_, mpm_, mplun_, mpmxr_, mpr_[30], b_, t_, m_, lun_, mxr_, r_[30];
1396 } mpcom_;
1397
1398 // common /dml8sz_/
1399 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** COMMON BLOCKS PAGE 00030
1400
1401 static struct {
1402 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1403 real_8 c_, xsav_;
1404 } dml8sz_;
1405
1406 // common /dml15t_/
1407 static struct {
1408 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1409 real_8 pwcnd_, px_, tnd_, x_, xbeg_, xend_, xop_, xot_;
1410 } dml15t_;
1411
1412 // common /dxblk2_/
1413 static struct {
1414 int_4 l_, l2_, kmax_;
1415 real_8 radix_, radixl_, rad2l_, dlg10r_;
1416 } dxblk2_;
1417
1418 // common /dxblk3_/
1419 static struct {
1420 int_4 nlg102_, mlg102_, lg102_[21];
1421 } dxblk3_;
1422
1423 // common /ml5mco_/
1424 static struct {
1425 int_4 lpar_;
1426 real_4 uro_, sru_, eps_, sqovfl_, twou_, fouru_;
1427 } ml5mco_;
1428
1429 // common /ml18jr_/
1430 static struct {
1431 int_4 nxpts_, nic_, nopg_, mxnon_, ndisk_, ntape_, neq_, indpvt_, integ_, nps_, ntp_, neqivp_, numort_, nfcc_, icoco_,
1432 lnfcc_;
1433 real_4 ae_, re_, tol_;
1434 } ml18jr_;
1435
1436 // common /ml8sz_/
1437 static struct {
1438 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1439 real_4 c_, xsav_;
1440 } ml8sz_;
1441
1442 // common /ml15to_/
1443 static struct {
1444 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1445 real_4 px_, pwcnd_, tnd_, x_, xbeg_, xend_, xot_, xop_;
1446 } ml15to_;
1447
1448 // common /la05ds_/
1449 static struct {
1450 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1451 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** COMMON BLOCKS PAGE 00031
1452
1453 real_4 small_;
1454 } la05ds_;
1455
1456 // common /xblk2_/
1457 static struct {
1458 int_4 l_, l2_, kmax_;
1459 real_4 radix_, radixl_, rad2l_, dlg10r_;
1460 } xblk2_;
1461
1462 // common /xblk3_/
1463 static struct {
1464 int_4 nlg102_, mlg102_, lg102_[21];
1465 } xblk3_;
1466
1467
1468 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00032
1469
1470
1471 prototype int_4 _aaaaaa (char _p_ ver_);
1472 prototype int_4 _asyik (real_4 _p_ x_, real_4 _p_ fnu_, int_4 _p_ kode_, real_4 _p_ flgik_, real_4 _p_ ra_, real_4 _p_
1473 arg_, int_4 _p_ in_, real_4 _p_ y_);
1474 prototype int_4 _asyjy (int_4 (*_funjy)(), real_4 _p_ x_, real_4 _p_ fnu_, real_4 _p_ flgjy_, int_4 _p_ in_, real_4 _p_
1475 y_, real_4 _p_ wk_, int_4 _p_ iflw_);
1476 prototype int_4 _avint (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, real_4 _p_ xlo_, real_4 _p_ xup_, real_4 _p_ ans_,
1477 int_4 _p_ ierr_);
1478 prototype real_4 _bcrh (real_4 _p_ xll_, real_4 _p_ xrr_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_,
1479 real_4 (*_f)(), real_4 _p_ sgn_);
1480 prototype int_4 _bdiff (int_4 _p_ l_, real_4 _p_ v_);
1481 prototype int_4 _bksol (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ x_);
1482 prototype int_4 _blktr1 (int_4 _p_ n_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, int_4 _p_ m_, real_4 _p_ am_,
1483 real_4 _p_ bm_, real_4 _p_ cm_, int_4 _p_ idimy_, real_4 _p_ y_, real_4 _p_ b_, real_4 _p_ w1_, real_4 _p_ w2_, real_4
1484 _p_ w3_, real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)());
1485 prototype int_4 _bndacc (real_4 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, int_4 _p_ mt_,
1486 int_4 _p_ jt_);
1487 prototype int_4 _bndsol (int_4 _p_ mode_, real_4 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_,
1488 real_4 _p_ x_, int_4 _p_ n_, real_4 _p_ rnorm_);
1489 prototype int_4 _bsgq8 (real_4 (*_fun)(), real_4 _p_ xt_, real_4 _p_ bc_, int_4 _p_ n_, int_4 _p_ kk_, int_4 _p_ id_,
1490 real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ inbv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_, real_4 _p_ work_);
1491 prototype int_4 _bsplvd (real_4 _p_ t_, int_4 _p_ k_, real_4 _p_ x_, int_4 _p_ ileft_, real_4 _p_ vnikx_, int_4 _p_
1492 nderiv_);
1493 prototype int_4 _bsplvn (real_4 _p_ t_, int_4 _p_ jhigh_, int_4 _p_ index_, real_4 _p_ x_, int_4 _p_ ileft_, real_4 _p_
1494 vnikx_);
1495 prototype real_4 _bsrh (real_4 _p_ xll_, real_4 _p_ xrr_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_,
1496 real_4 (*_f)(), real_4 _p_ sgn_);
1497 prototype int_4 _c1merg (complex_8 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_
1498 );
1499 prototype int_4 _casyi (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ kode_, int_4 _p_ n_, complex_8 _p_ y_, int_4 _p_
1500 nz_, real_4 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_);
1501 prototype int_4 _cblkt1 (int_4 _p_ n_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, int_4 _p_ m_, complex_8 _p_ am_,
1502 complex_8 _p_ bm_, complex_8 _p_ cm_, int_4 _p_ idimy_, complex_8 _p_ y_, real_4 _p_ b_, complex_8 _p_ w1_, complex_8
1503 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4
1504 (*_cprdct)());
1505 prototype int_4 _ccmpb (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ b_,
1506 real_4 _p_ ah_, real_4 _p_ bh_);
1507 prototype int_4 _cfod (int_4 _p_ meth_, real_4 _p_ elco_, real_4 _p_ tesco_);
1508 prototype int_4 _cgeev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_,
1509 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1510 prototype int_4 _cgefs (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_
1511 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1512 prototype int_4 _cgeir (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_
1513 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1514 prototype int_4 _chiev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_,
1515 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1516 prototype int_4 _chkpr4 (int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_
1517 c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_);
1518 prototype int_4 _chkprm (int_4 _p_ intl_, int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_
1519 mbdcnd_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_
1520 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00033
1521
1522 idmn_, int_4 _p_ ierror_);
1523 prototype int_4 _chksn4 (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, int_4 (*_cofx)(),
1524 logical_4 _p_ singlr_);
1525 prototype int_4 _chksng (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, real_4 _p_ gama_,
1526 real_4 _p_ xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_);
1527 prototype int_4 _cmpcsg (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, complex_8 _p_ a_);
1528 prototype int_4 _cmposd (int_4 _p_ mr_, int_4 _p_ nr_, int_4 _p_ istag_, complex_8 _p_ ba_, complex_8 _p_ bb_,
1529 complex_8 _p_ bc_, complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ w_, complex_8 _p_ d_, complex_8
1530 _p_ tcos_, complex_8 _p_ p_);
1531 prototype int_4 _cmposn (int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ istag_, int_4 _p_ mixbnd_, complex_8 _p_ a_, complex_8
1532 _p_ bb_, complex_8 _p_ c_, complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_,
1533 complex_8 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1534 prototype int_4 _cmposp (int_4 _p_ m_, int_4 _p_ n_, complex_8 _p_ a_, complex_8 _p_ bb_, complex_8 _p_ c_, complex_8
1535 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8 _p_ w_, complex_8 _p_ w2_,
1536 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1537 prototype int_4 _cmptr3 (int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_, complex_8 _p_ c_, int_4 _p_ k_, complex_8
1538 _p_ y1_, complex_8 _p_ y2_, complex_8 _p_ y3_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w1_, complex_8 _p_
1539 w2_, complex_8 _p_ w3_);
1540 prototype int_4 _cmptrx (int_4 _p_ idegbr_, int_4 _p_ idegcr_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
1541 complex_8 _p_ c_, complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_);
1542 prototype int_4 _cnbco (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_
1543 , real_4 _p_ rcond_, complex_8 _p_ z_);
1544 prototype int_4 _cnbdi (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_
1545 , complex_8 _p_ det_);
1546 prototype int_4 _cnbfa (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_
1547 , int_4 _p_ info_);
1548 prototype int_4 _cnbfs (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, complex_8 _p_
1549 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1550 prototype int_4 _cnbir (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, complex_8 _p_
1551 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1552 prototype int_4 _cnbsl (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_
1553 , complex_8 _p_ b_, int_4 _p_ job_);
1554 prototype int_4 _compb (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ b_,
1555 real_4 _p_ ah_, real_4 _p_ bh_);
1556 prototype int_4 _cosgen (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, real_4 _p_ a_);
1557 prototype int_4 _cpadd (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ a_, real_4 _p_ c_, complex_8 _p_ cbp_, real_4 _p_
1558 bp_, real_4 _p_ bh_);
1559 prototype int_4 _cpevl (int_4 _p_ n_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ z_, complex_8 _p_ c_, complex_8 _p_
1560 b_, logical_4 _p_ kbd_);
1561 prototype int_4 _cpevlr (int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ c_);
1562 prototype int_4 _cpofs (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_
1563 ind_, complex_8 _p_ work_);
1564 prototype int_4 _cpoir (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_
1565 ind_, complex_8 _p_ work_);
1566 prototype int_4 _cpqr79 (int_4 _p_ ndeg_, complex_8 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
1567 ;
1568 prototype int_4 _cproc (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_
1569 bm2_, int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_
1570 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_);
1571 prototype int_4 _cprocp (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_
1572 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00034
1573
1574 bm2_, int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_
1575 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_);
1576 prototype int_4 _cprod (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_
1577 bm2_, int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4
1578 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_);
1579 prototype int_4 _cprodp (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_
1580 bm2_, int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4
1581 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_);
1582 prototype int_4 _cpzero (int_4 _p_ in_, complex_8 _p_ a_, complex_8 _p_ r_, complex_8 _p_ t_, int_4 _p_ iflg_, real_4
1583 _p_ s_);
1584 prototype int_4 _crati (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ n_, complex_8 _p_ cy_, real_4 _p_ tol_);
1585 prototype int_4 _cs1s2 (complex_8 _p_ zr_, complex_8 _p_ s1_, complex_8 _p_ s2_, int_4 _p_ nz_, real_4 _p_ ascle_,
1586 real_4 _p_ alim_, int_4 _p_ iuf_);
1587 prototype int_4 _cscale (real_4 _p_ a_, int_4 _p_ nrda_, int_4 _p_ nrow_, int_4 _p_ ncol_, real_4 _p_ cols_, real_4 _p_
1588 colsav_, real_4 _p_ rows_, real_4 _p_ rowsav_, real_4 _p_ anorm_, real_4 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
1589 ;
1590 prototype int_4 _cshch (complex_8 _p_ z_, complex_8 _p_ csh_, complex_8 _p_ cch_);
1591 prototype int_4 _cuchk (complex_8 _p_ y_, int_4 _p_ nz_, real_4 _p_ ascle_, real_4 _p_ tol_);
1592 prototype int_4 _cunhj (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ ipmtr_, real_4 _p_ tol_, complex_8 _p_ phi_,
1593 complex_8 _p_ arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_);
1594 prototype int_4 _cunik (complex_8 _p_ zr_, real_4 _p_ fnu_, int_4 _p_ ikflg_, int_4 _p_ ipmtr_, real_4 _p_ tol_, int_4
1595 _p_ init_, complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_);
1596 prototype real_4 _cv (real_4 _p_ xval_, int_4 _p_ ndata_, int_4 _p_ nconst_, int_4 _p_ nord_, int_4 _p_ nbkpt_, real_4
1597 _p_ bkpt_, real_4 _p_ w_);
1598 prototype int_4 _d1merg (real_8 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_);
1599 prototype int_4 _d1mpyq (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ lda_, real_8 _p_ v_, real_8 _p_ w_);
1600 prototype int_4 _d1updt (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ s_, int_4 _p_ ls_, real_8 _p_ u_, real_8 _p_ v_, real_8
1601 _p_ w_, logical_4 _p_ sing_);
1602 prototype int_4 _dasyik (real_8 _p_ x_, real_8 _p_ fnu_, int_4 _p_ kode_, real_8 _p_ flgik_, real_8 _p_ ra_, real_8 _p_
1603 arg_, int_4 _p_ in_, real_8 _p_ y_);
1604 prototype int_4 _davint (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ n_, real_8 _p_ xlo_, real_8 _p_ xup_, real_8 _p_ ans_,
1605 int_4 _p_ ierr_);
1606 prototype int_4 _dbdiff (int_4 _p_ l_, real_8 _p_ v_);
1607 prototype int_4 _dbksol (int_4 _p_ n_, real_8 _p_ a_, real_8 _p_ x_);
1608 prototype int_4 _dbndac (real_8 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, int_4 _p_ mt_,
1609 int_4 _p_ jt_);
1610 prototype int_4 _dbndsl (int_4 _p_ mode_, real_8 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_,
1611 real_8 _p_ x_, int_4 _p_ n_, real_8 _p_ rnorm_);
1612 prototype int_4 _dbocls (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mcon_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_8 _p_
1613 bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnormc_, real_8 _p_ rnorm_, int_4 _p_
1614 mode_, real_8 _p_ rw_, int_4 _p_ iw_);
1615 prototype int_4 _dbols (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_8 _p_ bl_, real_8 _p_
1616 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, int_4 _p_ iw_)
1617 ;
1618 prototype int_4 _dbolsm (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ minput_, int_4 _p_ ncols_, real_8 _p_ bl_, real_8 _p_
1619 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, real_8 _p_ ww_
1620 , real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
1621 prototype int_4 _dbsgq8 (real_8 (*_fun)(), real_8 _p_ xt_, real_8 _p_ bc_, int_4 _p_ n_, int_4 _p_ kk_, int_4 _p_ id_,
1622 real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ inbv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_, real_8 _p_ work_);
1623 prototype int_4 _dcfod (int_4 _p_ meth_, real_8 _p_ elco_, real_8 _p_ tesco_);
1624 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00035
1625
1626 prototype int_4 _dckder (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4 _p_
1627 ldfjac_, real_8 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_);
1628 prototype int_4 _dcoef (real_8 _p_ yh_, real_8 _p_ yp_, int_4 _p_ ncomp_, int_4 _p_ nrowb_, int_4 _p_ nfc_, int_4 _p_
1629 nic_, real_8 _p_ b_, real_8 _p_ beta_, real_8 _p_ coef_, int_4 _p_ inhomo_, real_8 _p_ re_, real_8 _p_ ae_, real_8 _p_
1630 by_, real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
1631 prototype int_4 _dcov (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_,
1632 real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ info_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_);
1633 prototype int_4 _dcscal (real_8 _p_ a_, int_4 _p_ nrda_, int_4 _p_ nrow_, int_4 _p_ ncol_, real_8 _p_ cols_, real_8 _p_
1634 colsav_, real_8 _p_ rows_, real_8 _p_ rowsav_, real_8 _p_ anorm_, real_8 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
1635 ;
1636 prototype real_8 _dcv (real_8 _p_ xval_, int_4 _p_ ndata_, int_4 _p_ nconst_, int_4 _p_ nord_, int_4 _p_ nbkpt_, real_8
1637 _p_ bkpt_, real_8 _p_ w_);
1638 prototype int_4 _ddes (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ tout_, int_4 _p_ info_,
1639 real_8 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ ypout_, real_8 _p_ yp_, real_8 _p_ yy_, real_8 _p_ wt_,
1640 real_8 _p_ p_, real_8 _p_ phi_, real_8 _p_ alpha_, real_8 _p_ beta_, real_8 _p_ psi_, real_8 _p_ v_, real_8 _p_ w_,
1641 real_8 _p_ sig_, real_8 _p_ g_, real_8 _p_ gi_, real_8 _p_ h_, real_8 _p_ eps_, real_8 _p_ x_, real_8 _p_ xold_, real_8
1642 _p_ hold_, real_8 _p_ told_, real_8 _p_ delsgn_, real_8 _p_ tstop_, real_8 _p_ twou_, real_8 _p_ fouru_, logical_4 _p_
1643 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1644 _p_ kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_,
1645 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1646 prototype int_4 _ddoglg (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ lr_, real_8 _p_ diag_, real_8 _p_ qtb_, real_8 _p_
1647 delta_, real_8 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1648 prototype int_4 _defcmn (int_4 _p_ ndata_, real_8 _p_ xdata_, real_8 _p_ ydata_, real_8 _p_ sddata_, int_4 _p_ nord_,
1649 int_4 _p_ nbkpt_, real_8 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8
1650 _p_ xtemp_, real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_ g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, int_4
1651 _p_ lw_);
1652 prototype int_4 _defe4 (int_4 (*_cofx)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_);
1653 prototype int_4 _defehl (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ h_, real_4 _p_ yp_,
1654 real_4 _p_ f1_, real_4 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ rpar_, int_4
1655 _p_ ipar_);
1656 prototype int_4 _defer (int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_);
1657 prototype real_8 _denorm (int_4 _p_ n_, real_8 _p_ x_);
1658 prototype int_4 _derkfs (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ tout_, int_4 _p_ info_
1659 , real_4 _p_ rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ h_, real_4 _p_ tolfac_, real_4 _p_ yp_, real_4 _p_
1660 f1_, real_4 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ told_, real_4 _p_
1661 dtsign_, real_4 _p_ u26_, real_4 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_,
1662 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1663 prototype int_4 _des (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ tout_, int_4 _p_ info_,
1664 real_4 _p_ rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ ypout_, real_4 _p_ yp_, real_4 _p_ yy_, real_4 _p_ wt_,
1665 real_4 _p_ p_, real_4 _p_ phi_, real_4 _p_ alpha_, real_4 _p_ beta_, real_4 _p_ psi_, real_4 _p_ v_, real_4 _p_ w_,
1666 real_4 _p_ sig_, real_4 _p_ g_, real_4 _p_ gi_, real_4 _p_ h_, real_4 _p_ eps_, real_4 _p_ x_, real_4 _p_ xold_, real_4
1667 _p_ hold_, real_4 _p_ told_, real_4 _p_ delsgn_, real_4 _p_ tstop_, real_4 _p_ twou_, real_4 _p_ fouru_, logical_4 _p_
1668 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1669 _p_ kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_,
1670 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1671 prototype int_4 _dfcmn (int_4 _p_ ndata_, real_8 _p_ xdata_, real_8 _p_ ydata_, real_8 _p_ sddata_, int_4 _p_ nord_,
1672 int_4 _p_ nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_,
1673 int_4 _p_ mode_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8 _p_ xtemp_, real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_
1674 g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_);
1675 prototype int_4 _dfdjc1 (int_4 (*_fcn)(), int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4 _p_
1676 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00036
1677
1678 ldfjac_, int_4 _p_ iflag_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1679 prototype int_4 _dfdjc3 (int_4 (*_fcn)(), int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_
1680 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_);
1681 prototype int_4 _dfehl (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ h_, real_8 _p_ yp_,
1682 real_8 _p_ f1_, real_8 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ rpar_, int_4
1683 _p_ ipar_);
1684 prototype int_4 _dfspvd (real_8 _p_ t_, int_4 _p_ k_, real_8 _p_ x_, int_4 _p_ ileft_, real_8 _p_ vnikx_, int_4 _p_
1685 nderiv_);
1686 prototype int_4 _dfspvn (real_8 _p_ t_, int_4 _p_ jhigh_, int_4 _p_ index_, real_8 _p_ x_, int_4 _p_ ileft_, real_8 _p_
1687 vnikx_);
1688 prototype int_4 _dfulmt (int_4 _p_ i_, int_4 _p_ j_, real_8 _p_ aij_, int_4 _p_ indcat_, real_8 _p_ prgopt_, real_8 _p_
1689 dattrv_, int_4 _p_ iflag_);
1690 prototype int_4 _dfzero (real_8 (*_f)(), real_8 _p_ b_, real_8 _p_ c_, real_8 _p_ r_, real_8 _p_ re_, real_8 _p_ ae_,
1691 int_4 _p_ iflag_);
1692 prototype int_4 _dgaus8 (real_8 (*_fun)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_
1693 ierr_);
1694 prototype int_4 _dgefs (real_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
1695 real_8 _p_ work_, int_4 _p_ iwork_);
1696 prototype int_4 _dglss (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4
1697 _p_ nb_, real_8 _p_ rnorm_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1698 prototype int_4 _dh12 (int_4 _p_ mode_, int_4 _p_ lpivot_, int_4 _p_ l1_, int_4 _p_ m_, real_8 _p_ u_, int_4 _p_ iue_,
1699 real_8 _p_ up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1700 prototype int_4 _dhfti (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4
1701 _p_ nb_, real_8 _p_ tau_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ g_, int_4 _p_ ip_);
1702 prototype int_4 _dhstrt (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ y_, real_8 _p_
1703 yprime_, real_8 _p_ etol_, int_4 _p_ morder_, real_8 _p_ small_, real_8 _p_ big_, real_8 _p_ spy_, real_8 _p_ pv_,
1704 real_8 _p_ yp_, real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_);
1705 prototype real_8 _dhvnrm (real_8 _p_ v_, int_4 _p_ ncomp_);
1706 prototype int_4 _djairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ ai_, real_8 _p_ dai_);
1707 prototype int_4 _dllsia (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_,
1708 int_4 _p_ nb_, real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4
1709 _p_ ksure_, real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1710 prototype int_4 _dlpdp (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n1_, int_4 _p_ n2_, real_8 _p_ prgopt_,
1711 real_8 _p_ x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_);
1712 prototype int_4 _dlsei (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_,
1713 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorme_, real_8 _p_ rnorml_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_
1714 ip_);
1715 prototype int_4 _dlsi (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_8 _p_ prgopt_,
1716 real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_);
1717 prototype int_4 _dlssud (real_8 _p_ a_, real_8 _p_ x_, real_8 _p_ b_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_,
1718 real_8 _p_ u_, int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_8 _p_ q_,
1719 real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ s_, real_8 _p_ div_, real_8 _p_ td_, int_4 _p_ isflg_, real_8 _p_
1720 scales_);
1721 prototype int_4 _dmacon (void);
1722 prototype int_4 _dmgsbv (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ ia_, int_4 _p_ niv_, int_4 _p_ iflag_,
1723 real_8 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_8 _p_ v_, real_8 _p_ w_, real_8 _p_ wcnd_);
1724 prototype int_4 _dmpar (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ ipvt_, real_8 _p_ diag_, real_8 _p_ qtb_
1725 , real_8 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1726 prototype int_4 _dnbco (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
1727 real_8 _p_ rcond_, real_8 _p_ z_);
1728 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00037
1729
1730 prototype int_4 _dnbdi (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
1731 real_8 _p_ det_);
1732 prototype int_4 _dnbfa (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
1733 int_4 _p_ info_);
1734 prototype int_4 _dnbfs (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ v_,
1735 int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_);
1736 prototype int_4 _dnbsl (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
1737 real_8 _p_ b_, int_4 _p_ job_);
1738 prototype int_4 _dnls1e (real_8 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_
1739 , real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_);
1740 prototype int_4 _dnls1 (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_,
1741 real_8 _p_ fjac_, int_4 _p_ ldfjac_, real_8 _p_ ftol_, real_8 _p_ xtol_, real_8 _p_ gtol_, int_4 _p_ maxfev_, real_8
1742 _p_ epsfcn_, real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_
1743 , int_4 _p_ njev_, int_4 _p_ ipvt_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_
1744 );
1745 prototype int_4 _dnsqe (real_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_
1746 fvec_, real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_);
1747 prototype int_4 _dnsq (int_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_
1748 , real_8 _p_ fjac_, int_4 _p_ ldfjac_, real_8 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_
1749 epsfcn_, real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_,
1750 int_4 _p_ njev_, real_8 _p_ r_, int_4 _p_ lr_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_,
1751 real_8 _p_ wa4_);
1752 prototype int_4 _dohtrl (real_8 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_8 _p_ diag_, int_4 _p_ irank_, real_8 _p_
1753 div_, real_8 _p_ td_);
1754 prototype int_4 _dorthr (real_8 _p_ a_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_
1755 , int_4 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_);
1756 prototype int_4 _dp1vlu (int_4 _p_ l_, int_4 _p_ nder_, real_8 _p_ x_, real_8 _p_ yfit_, real_8 _p_ yp_, real_8 _p_ a_)
1757 ;
1758 prototype int_4 _dpchng (int_4 _p_ ii_, real_8 _p_ xval_, int_4 _p_ iplace_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_
1759 ircx_);
1760 prototype int_4 _dpcoef (int_4 _p_ l_, real_8 _p_ c_, real_8 _p_ tc_, real_8 _p_ a_);
1761 prototype int_4 _dpincw (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ npp_, int_4 _p_
1762 jstrt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_
1763 ibb_, real_8 _p_ costsc_, real_8 _p_ gg_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
1764 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ costs_, real_8 _p_ colnrm_,
1765 real_8 _p_ duals_, logical_4 _p_ stpedg_);
1766 prototype int_4 _dpinit (int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ bl_, real_8 _p_ bu_, int_4
1767 _p_ ind_, real_8 _p_ primal_, int_4 _p_ info_, real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ costsc_, real_8 _p_
1768 colnrm_, real_8 _p_ xlamda_, real_8 _p_ anorm_, real_8 _p_ rhs_, real_8 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_,
1769 int_4 _p_ imat_, logical_4 _p_ lopt_);
1770 prototype int_4 _dpintm (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_ lmx_, int_4 _p_ ipagef_);
1771 prototype int_4 _dplint (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ c_);
1772 prototype int_4 _dplpce (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ itlp_, int_4
1773 _p_ itbrc_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4
1774 _p_ ibb_, real_8 _p_ erdnrm_, real_8 _p_ eps_, real_8 _p_ tune_, real_8 _p_ gg_, real_8 _p_ amat_, real_8 _p_ basmat_,
1775 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ primal_, real_8 _p_ erd_, real_8 _p_ erp_, logical_4 _p_
1776 singlr_, logical_4 _p_ redbas_);
1777 prototype int_4 _dplpdm (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4
1778 _p_ info_, int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4
1779 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ anorm_, real_8 _p_ eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ amat_, real_8
1780 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00038
1781
1782 _p_ basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
1783 prototype int_4 _dplpfe (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ ienter_, int_4
1784 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8
1785 _p_ erdnrm_, real_8 _p_ eps_, real_8 _p_ gg_, real_8 _p_ dulnrm_, real_8 _p_ dirnrm_, real_8 _p_ amat_, real_8 _p_
1786 basmat_, real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ rz_, real_8 _p_
1787 rg_, real_8 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_);
1788 prototype int_4 _dplpfl (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ ibasis_,
1789 int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ theta_, real_8 _p_ dirnrm_, real_8 _p_ rprnrm_, real_8 _p_ csc_, real_8 _p_
1790 ww_, real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ erp_, real_8 _p_ rprim_, real_8 _p_ primal_, logical_4 _p_ finite_,
1791 logical_4 _p_ zerolv_);
1792 prototype int_4 _dplpmn (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_
1793 prgopt_, real_8 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_,
1794 real_8 _p_ duals_, real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ colnrm_, real_8 _p_ erd_, real_8 _p_ erp_, real_8 _p_
1795 basmat_, real_8 _p_ wr_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ rprim_, real_8 _p_ rhs_, real_8 _p_ ww_, int_4 _p_
1796 lmx_, int_4 _p_ lbm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_
1797 iwr_);
1798 prototype int_4 _dplpmu (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4
1799 _p_ info_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_,
1800 int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ anorm_,
1801 real_8 _p_ eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ rprnrm_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_
1802 theta_, real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_
1803 csc_, real_8 _p_ wr_, real_8 _p_ rprim_, real_8 _p_ ww_, real_8 _p_ bu_, real_8 _p_ bl_, real_8 _p_ rhs_, real_8 _p_
1804 erd_, real_8 _p_ erp_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ colnrm_, real_8 _p_ costs_, real_8 _p_ primal_,
1805 real_8 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
1806 prototype int_4 _dplpup (int_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ prgopt_, real_8 _p_
1807 dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ amat_, int_4 _p_ imat_, logical_4
1808 _p_ sizeup_, real_8 _p_ asmall_, real_8 _p_ abig_);
1809 prototype int_4 _dpnnzr (int_4 _p_ i_, real_8 _p_ xval_, int_4 _p_ iplace_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_
1810 ircx_);
1811 prototype int_4 _dpofs (real_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
1812 real_8 _p_ work_);
1813 prototype int_4 _dpolcf (real_8 _p_ xx_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ c_, real_8 _p_ d_, real_8 _p_ work_);
1814 prototype int_4 _dpolft (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ w_, int_4 _p_ maxdeg_, int_4 _p_ ndeg_,
1815 real_8 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_);
1816 prototype int_4 _dpolvl (int_4 _p_ nder_, real_8 _p_ xx_, real_8 _p_ yfit_, real_8 _p_ yp_, int_4 _p_ n_, real_8 _p_ x_
1817 , real_8 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_);
1818 prototype int_4 _dpopt (real_8 _p_ prgopt_, int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ info_, real_8 _p_ csc_,
1819 int_4 _p_ ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
1820 prototype int_4 _dpperm (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_);
1821 prototype int_4 _dppgq8 (real_8 (*_fun)(), int_4 _p_ ldc_, real_8 _p_ c_, real_8 _p_ xi_, int_4 _p_ lxi_, int_4 _p_ kk_
1822 , int_4 _p_ id_, real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ inppv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_);
1823 prototype real_8 _dprvec (int_4 _p_ m_, real_8 _p_ u_, real_8 _p_ v_);
1824 prototype int_4 _dprwpg (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_);
1825 prototype int_4 _dprwvr (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_);
1826 prototype real_8 _dpsixn (int_4 _p_ n_);
1827 prototype int_4 _dpsort (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_);
1828 prototype real_8 _dqdota (int_4 _p_ n_, real_8 _p_ db_, int_4 _p_ qc_, real_8 _p_ dx_, int_4 _p_ incx_, real_8 _p_ dy_,
1829 int_4 _p_ incy_);
1830 prototype real_8 _dqdoti (int_4 _p_ n_, real_8 _p_ db_, int_4 _p_ qc_, real_8 _p_ dx_, int_4 _p_ incx_, real_8 _p_ dy_,
1831 int_4 _p_ incy_);
1832 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00039
1833
1834 prototype int_4 _dqform (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ q_, int_4 _p_ ldq_, real_8 _p_ wa_);
1835 prototype int_4 _dqrfac (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ lda_, logical_4 _p_ pivot_, int_4 _p_
1836 ipvt_, int_4 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_);
1837 prototype int_4 _dqrslv (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ ipvt_, real_8 _p_ diag_, real_8 _p_
1838 qtb_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_);
1839 prototype int_4 _drc3jj (real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ m2_, real_8 _p_ m3_, real_8 _p_ l1min_, real_8 _p_
1840 l1max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1841 prototype int_4 _drc3jm (real_8 _p_ l1_, real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ m1_, real_8 _p_ m2min_, real_8 _p_
1842 m2max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1843 prototype int_4 _drc6j (real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ l4_, real_8 _p_ l5_, real_8 _p_ l6_, real_8 _p_
1844 l1min_, real_8 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1845 prototype real_8 _drc (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ ier_);
1846 prototype real_8 _drd (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_);
1847 prototype int_4 _dreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_);
1848 prototype int_4 _dreort (int_4 _p_ ncomp_, real_8 _p_ y_, real_8 _p_ yp_, real_8 _p_ yhp_, int_4 _p_ niv_, real_8 _p_
1849 w_, real_8 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_);
1850 prototype real_8 _drf (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_);
1851 prototype real_8 _drj (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, real_8 _p_ p_, int_4 _p_ ier_);
1852 prototype int_4 _drkfs (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ tout_, int_4 _p_ info_
1853 , real_8 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ h_, real_8 _p_ tolfac_, real_8 _p_ yp_, real_8 _p_
1854 f1_, real_8 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ told_, real_8 _p_
1855 dtsign_, real_8 _p_ u26_, real_8 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_,
1856 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1857 prototype int_4 _dsort (real_8 _p_ dx_, real_8 _p_ dy_, int_4 _p_ n_, int_4 _p_ kflag_);
1858 prototype int_4 _dsoseq (real_8 (*_fnc)(), int_4 _p_ n_, real_8 _p_ s_, real_8 _p_ rtolx_, real_8 _p_ atolx_, real_8
1859 _p_ tolf_, int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_,
1860 real_8 _p_ fmax_, real_8 _p_ c_, int_4 _p_ nc_, real_8 _p_ b_, real_8 _p_ p_, real_8 _p_ temp_, real_8 _p_ x_, real_8
1861 _p_ y_, real_8 _p_ fac_, int_4 _p_ is_);
1862 prototype int_4 _dsos (real_8 (*_fnc)(), int_4 _p_ neq_, real_8 _p_ x_, real_8 _p_ rtolx_, real_8 _p_ atolx_, real_8
1863 _p_ tolf_, int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
1864 prototype int_4 _dsossl (int_4 _p_ k_, int_4 _p_ n_, int_4 _p_ l_, real_8 _p_ x_, real_8 _p_ c_, real_8 _p_ b_, int_4
1865 _p_ m_);
1866 prototype int_4 _dsplp (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_
1867 , real_8 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_, real_8 _p_
1868 duals_, int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
1869 prototype int_4 _dstor1 (real_8 _p_ u_, real_8 _p_ yh_, real_8 _p_ v_, real_8 _p_ yp_, int_4 _p_ ntemp_, int_4 _p_
1870 ndisk_, int_4 _p_ ntape_);
1871 prototype int_4 _dstway (real_8 _p_ u_, real_8 _p_ v_, real_8 _p_ yhp_, int_4 _p_ inout_, real_8 _p_ stowa_);
1872 prototype int_4 _dsuds (real_8 _p_ a_, real_8 _p_ x_, real_8 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_,
1873 int_4 _p_ iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_);
1874 prototype int_4 _du11ls (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ ub_, real_8 _p_ db_,
1875 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4
1876 _p_ ic_, int_4 _p_ ir_);
1877 prototype int_4 _du11us (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ ub_, real_8 _p_ db_,
1878 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4
1879 _p_ ir_, int_4 _p_ ic_);
1880 prototype int_4 _du12ls (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_,
1881 int_4 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ic_, int_4
1882 _p_ ir_);
1883 prototype int_4 _du12us (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_,
1884 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00040
1885
1886 int_4 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ir_, int_4
1887 _p_ ic_);
1888 prototype int_4 _dulsia (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_,
1889 int_4 _p_ nb_, real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4
1890 _p_ ksure_, real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1891 prototype int_4 _dusrmt (int_4 _p_ i_, int_4 _p_ j_, real_8 _p_ aij_, int_4 _p_ indcat_, real_8 _p_ prgopt_, real_8 _p_
1892 dattrv_, int_4 _p_ iflag_);
1893 prototype int_4 _dvecs (int_4 _p_ ncomp_, int_4 _p_ lnfc_, real_8 _p_ yhp_, real_8 _p_ work_, int_4 _p_ iwork_, int_4
1894 _p_ inhomo_, int_4 _p_ iflag_);
1895 prototype real_8 _dvnrms (int_4 _p_ n_, real_8 _p_ v_, real_8 _p_ w_);
1896 prototype int_4 _dwnlit (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ l_, int_4 _p_ ipivot_,
1897 int_4 _p_ itype_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ rnorm_, int_4 _p_ idope_, real_8 _p_ dope_, logical_4
1898 _p_ done_);
1899 prototype int_4 _dwnlsm (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mme_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_,
1900 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_8 _p_
1901 wd_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_);
1902 prototype int_4 _dwnlt1 (int_4 _p_ i_, int_4 _p_ lend_, int_4 _p_ mend_, int_4 _p_ ir_, int_4 _p_ mdw_, logical_4 _p_
1903 recalc_, int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_);
1904 prototype logical_4 _dwnlt2 (int_4 _p_ me_, int_4 _p_ mend_, int_4 _p_ ir_, real_8 _p_ factor_, real_8 _p_ tau_, real_8
1905 _p_ scale_, real_8 _p_ wic_);
1906 prototype int_4 _dwnlt3 (int_4 _p_ i_, int_4 _p_ imax_, int_4 _p_ m_, int_4 _p_ mdw_, int_4 _p_ ipivot_, real_8 _p_ h_,
1907 real_8 _p_ w_);
1908 prototype int_4 _dwnnls (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_,
1909 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_);
1910 prototype int_4 _dwritp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_);
1911 prototype int_4 _dwupdt (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, real_8 _p_ w_, real_8 _p_ b_, real_8 _p_ alpha_,
1912 real_8 _p_ cos_, real_8 _p_ sin_);
1913 prototype int_4 _dx4 (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uxxx_, real_4 _p_ uxxxx_);
1914 prototype int_4 _dxadj (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_);
1915 prototype int_4 _dxc210 (int_4 _p_ k_, real_8 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_);
1916 prototype int_4 _dx (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uxxx_, real_4 _p_ uxxxx_);
1917 prototype real_8 _dxpsi (real_8 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_);
1918 prototype int_4 _dxred (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_);
1919 prototype int_4 _dy4 (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uyyy_, real_4 _p_ uyyyy_);
1920 prototype int_4 _dyairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ bi_, real_8 _p_ dbi_);
1921 prototype int_4 _dy (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uyyy_, real_4 _p_ uyyyy_);
1922 prototype int_4 _efcmn (int_4 _p_ ndata_, real_4 _p_ xdata_, real_4 _p_ ydata_, real_4 _p_ sddata_, int_4 _p_ nord_,
1923 int_4 _p_ nbkpt_, real_4 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4
1924 _p_ xtemp_, real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_ g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, int_4
1925 _p_ lw_);
1926 prototype int_4 _fcmn (int_4 _p_ ndata_, real_4 _p_ xdata_, real_4 _p_ ydata_, real_4 _p_ sddata_, int_4 _p_ nord_,
1927 int_4 _p_ nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_,
1928 int_4 _p_ mode_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4 _p_ xtemp_, real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_
1929 g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_);
1930 prototype int_4 _fdjac3 (int_4 (*_fcn)(), int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4 _p_ fjac_
1931 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_);
1932 prototype int_4 _fdump (void);
1933 prototype int_4 _fftdoc (void);
1934 prototype int_4 _fulmat (int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ aij_, int_4 _p_ indcat_, real_4 _p_ prgopt_, real_4 _p_
1935 dattrv_, int_4 _p_ iflag_);
1936 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00041
1937
1938 prototype int_4 _fzero (real_4 (*_f)(), real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ r_, real_4 _p_ re_, real_4 _p_ ae_,
1939 int_4 _p_ iflag_);
1940 prototype real_4 _gamrn (real_4 _p_ x_);
1941 prototype int_4 _gaus8 (real_4 (*_fun)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_
1942 ierr_);
1943 prototype int_4 _h12 (int_4 _p_ mode_, int_4 _p_ lpivot_, int_4 _p_ l1_, int_4 _p_ m_, real_4 _p_ u_, int_4 _p_ iue_,
1944 real_4 _p_ up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1945 prototype int_4 _hfti (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4
1946 _p_ nb_, real_4 _p_ tau_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ g_, int_4 _p_ ip_);
1947 prototype int_4 _hkseq (real_4 _p_ x_, int_4 _p_ m_, real_4 _p_ h_, int_4 _p_ ierr_);
1948 prototype int_4 _hpperm (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ iperm_, char _p_ work_, int_4 _p_ ier_);
1949 prototype int_4 _hpsort (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ strbeg_, int_4 _p_ strend_, int_4 _p_ iperm_, int_4
1950 _p_ kflag_, char _p_ work_, int_4 _p_ ier_);
1951 prototype int_4 _hstart (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ y_, real_4 _p_ yprime_
1952 , real_4 _p_ etol_, int_4 _p_ morder_, real_4 _p_ small_, real_4 _p_ big_, real_4 _p_ spy_, real_4 _p_ pv_, real_4 _p_
1953 yp_, real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_);
1954 prototype int_4 _hstcs1 (int_4 _p_ intl_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_
1955 bda_, real_4 _p_ bdb_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ bdd_,
1956 real_4 _p_ elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, int_4 _p_ ierr1_, real_4 _p_ am_, real_4 _p_
1957 bm_, real_4 _p_ cm_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ snth_, real_4 _p_ rsq_, real_4 _p_ wrk_
1958 );
1959 prototype real_4 _hvnrm (real_4 _p_ v_, int_4 _p_ ncomp_);
1960 prototype int_4 _hwscs1 (int_4 _p_ intl_, real_4 _p_ ts_, real_4 _p_ tf_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_
1961 bdts_, real_4 _p_ bdtf_, real_4 _p_ rs_, real_4 _p_ rf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdrs_, real_4 _p_
1962 bdrf_, real_4 _p_ elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ w_, real_4 _p_ s_, real_4
1963 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ r_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_
1964 sint_, real_4 _p_ bmh_);
1965 prototype int_4 _hwsss1 (real_4 _p_ ts_, real_4 _p_ tf_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bdts_, real_4 _p_
1966 bdtf_, real_4 _p_ ps_, real_4 _p_ pf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdps_, real_4 _p_ bdpf_, real_4 _p_
1967 elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4
1968 _p_ sn_, real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_);
1969 prototype int_4 _i1merg (real_4 _p_ icos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_);
1970 prototype int_4 _idloc (int_4 _p_ loc_, real_8 _p_ sx_, int_4 _p_ ix_);
1971 prototype int_4 _indxa (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_);
1972 prototype int_4 _indxb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_);
1973 prototype int_4 _indxc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_);
1974 prototype int_4 _inxca (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_);
1975 prototype int_4 _inxcb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_);
1976 prototype int_4 _inxcc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_);
1977 prototype int_4 _iploc (int_4 _p_ loc_, real_4 _p_ sx_, int_4 _p_ ix_);
1978 prototype int_4 _ipperm (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_);
1979 prototype int_4 _ipsort (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_);
1980 prototype int_4 _isort (int_4 _p_ ix_, int_4 _p_ iy_, int_4 _p_ n_, int_4 _p_ kflag_);
1981 prototype int_4 _jairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ ai_, real_4 _p_ dai_);
1982 prototype int_4 _llsia (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4
1983 _p_ nb_, real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_
1984 ksure_, real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1985 prototype int_4 _lpdp (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n1_, int_4 _p_ n2_, real_4 _p_ prgopt_,
1986 real_4 _p_ x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_);
1987 prototype int_4 _lsei (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_4
1988 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00042
1989
1990 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorme_, real_4 _p_ rnorml_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_);
1991 prototype int_4 _lsi (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_4 _p_ prgopt_,
1992 real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_);
1993 prototype int_4 _lssods (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ nrda_,
1994 int_4 _p_ iflag_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_, real_4 _p_ diag_, int_4 _p_ kpivot_, int_4 _p_
1995 iter_, real_4 _p_ resnrm_, real_4 _p_ xnorm_, real_4 _p_ z_, real_4 _p_ r_, real_4 _p_ div_, real_4 _p_ td_, real_4 _p_
1996 scales_);
1997 prototype int_4 _lssuds (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_,
1998 real_4 _p_ u_, int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_,
1999 real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ s_, real_4 _p_ div_, real_4 _p_ td_, int_4 _p_ isflg_, real_4 _p_
2000 scales_);
2001 prototype int_4 _macon (void);
2002 prototype int_4 _mgsbv (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, int_4 _p_ ia_, int_4 _p_ niv_, int_4 _p_ iflag_,
2003 real_4 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_ wcnd_);
2004 prototype int_4 _minso4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_);
2005 prototype int_4 _minsol (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_);
2006 prototype int_4 _mpadd2 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_, int_4 _p_ y1_, int_4 _p_ trunc_);
2007 prototype int_4 _mpadd3 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ s_, int_4 _p_ med_, int_4 _p_ re_);
2008 prototype int_4 _mpadd (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_);
2009 prototype int_4 _mpblas (int_4 _p_ i1_);
2010 prototype int_4 _mpcdm (real_8 _p_ dx_, int_4 _p_ z_);
2011 prototype int_4 _mpchk (int_4 _p_ i_, int_4 _p_ j_);
2012 prototype int_4 _mpcmd (int_4 _p_ x_, real_8 _p_ dz_);
2013 prototype int_4 _mpdivi (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_);
2014 prototype int_4 _mperr (void);
2015 prototype int_4 _mpmaxr (int_4 _p_ x_);
2016 prototype int_4 _mpmlp (int_4 _p_ u_, int_4 _p_ v_, int_4 _p_ w_, int_4 _p_ j_);
2017 prototype int_4 _mpmul2 (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_, int_4 _p_ trunc_);
2018 prototype int_4 _mpmul (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_);
2019 prototype int_4 _mpmuli (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_);
2020 prototype int_4 _mpnzr (int_4 _p_ rs_, int_4 _p_ re_, int_4 _p_ z_, int_4 _p_ trunc_);
2021 prototype int_4 _mpovfl (int_4 _p_ x_);
2022 prototype int_4 _mpstr (int_4 _p_ x_, int_4 _p_ y_);
2023 prototype int_4 _mpunfl (int_4 _p_ x_);
2024 prototype int_4 _numxer (int_4 _p_ nerr_);
2025 prototype int_4 _ohtrol (real_4 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_4 _p_ diag_, int_4 _p_ irank_, real_4 _p_
2026 div_, real_4 _p_ td_);
2027 prototype int_4 _ohtror (real_4 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_4 _p_ diag_, int_4 _p_ irank_, real_4 _p_
2028 div_, real_4 _p_ td_);
2029 prototype int_4 _ortho4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_);
2030 prototype int_4 _orthog (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_);
2031 prototype int_4 _orthol (real_4 _p_ a_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_
2032 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_);
2033 prototype int_4 _orthor (real_4 _p_ a_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_
2034 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_);
2035 prototype int_4 _pchngs (int_4 _p_ ii_, real_4 _p_ xval_, int_4 _p_ iplace_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_
2036 ircx_);
2037 prototype int_4 _pcoef (int_4 _p_ l_, real_4 _p_ c_, real_4 _p_ tc_, real_4 _p_ a_);
2038 prototype real_4 _pgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_);
2039 prototype real_4 _pimach (real_4 _p_ dum_);
2040 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00043
2041
2042 prototype int_4 _pinitm (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_ lmx_, int_4 _p_ ipagef_);
2043 prototype int_4 _pnnzrs (int_4 _p_ i_, real_4 _p_ xval_, int_4 _p_ iplace_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_
2044 ircx_);
2045 prototype int_4 _poisd2 (int_4 _p_ mr_, int_4 _p_ nr_, int_4 _p_ istag_, real_4 _p_ ba_, real_4 _p_ bb_, real_4 _p_ bc_
2046 , real_4 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ w_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
2047 prototype int_4 _poisn2 (int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ istag_, int_4 _p_ mixbnd_, real_4 _p_ a_, real_4 _p_ bb_
2048 , real_4 _p_ c_, real_4 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4
2049 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
2050 prototype int_4 _poisp2 (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ bb_, real_4 _p_ c_, real_4 _p_ q_, int_4
2051 _p_ idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_
2052 , real_4 _p_ tcos_, real_4 _p_ p_);
2053 prototype int_4 _polcof (real_4 _p_ xx_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ work_);
2054 prototype int_4 _polfit (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ w_, int_4 _p_ maxdeg_, int_4 _p_ ndeg_,
2055 real_4 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_);
2056 prototype int_4 _polint (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ c_);
2057 prototype int_4 _polyvl (int_4 _p_ nder_, real_4 _p_ xx_, real_4 _p_ yfit_, real_4 _p_ yp_, int_4 _p_ n_, real_4 _p_ x_
2058 , real_4 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_);
2059 prototype int_4 _pos3d1 (int_4 _p_ lp_, int_4 _p_ l_, int_4 _p_ mp_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, real_4
2060 _p_ b_, real_4 _p_ c_, int_4 _p_ ldimf_, int_4 _p_ mdimf_, real_4 _p_ f_, real_4 _p_ xrt_, real_4 _p_ yrt_, real_4 _p_
2061 t_, real_4 _p_ d_, real_4 _p_ wx_, real_4 _p_ wy_, real_4 _p_ c1_, real_4 _p_ c2_, real_4 _p_ bb_);
2062 prototype int_4 _postg2 (int_4 _p_ nperod_, int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ bb_, real_4 _p_ c_,
2063 int_4 _p_ idimq_, real_4 _p_ q_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4
2064 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
2065 prototype int_4 _ppadd (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ a_, real_4 _p_ c_, complex_8 _p_ cbp_, real_4 _p_
2066 bp_, real_4 _p_ bh_);
2067 prototype int_4 _ppgq8 (real_4 (*_fun)(), int_4 _p_ ldc_, real_4 _p_ c_, real_4 _p_ xi_, int_4 _p_ lxi_, int_4 _p_ kk_,
2068 int_4 _p_ id_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ inppv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_);
2069 prototype real_4 _ppgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_);
2070 prototype real_4 _pppsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_);
2071 prototype real_4 _ppsgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_);
2072 prototype real_4 _ppspf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_);
2073 prototype int_4 _proc (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_,
2074 int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
2075 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_);
2076 prototype int_4 _procp (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_
2077 , int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
2078 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_);
2079 prototype int_4 _prod (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_,
2080 int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_,
2081 real_4 _p_ d_, real_4 _p_ w_, real_4 _p_ u_);
2082 prototype int_4 _prodp (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_
2083 , int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_
2084 c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_);
2085 prototype real_4 _prvec (int_4 _p_ m_, real_4 _p_ u_, real_4 _p_ v_);
2086 prototype int_4 _prwpge (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_);
2087 prototype int_4 _prwvir (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_);
2088 prototype real_4 _psgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_);
2089 prototype int_4 _psifn (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ kode_, int_4 _p_ m_, real_4 _p_ ans_, int_4 _p_ nz_,
2090 int_4 _p_ ierr_);
2091 prototype real_4 _psixn (int_4 _p_ n_);
2092 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00044
2093
2094 prototype int_4 _pvalue (int_4 _p_ l_, int_4 _p_ nder_, real_4 _p_ x_, real_4 _p_ yfit_, real_4 _p_ yp_, real_4 _p_ a_)
2095 ;
2096 prototype real_4 _pythag (real_4 _p_ a_, real_4 _p_ b_);
2097 prototype int_4 _rc3jj (real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ m2_, real_4 _p_ m3_, real_4 _p_ l1min_, real_4 _p_
2098 l1max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
2099 prototype int_4 _rc3jm (real_4 _p_ l1_, real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ m1_, real_4 _p_ m2min_, real_4 _p_
2100 m2max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
2101 prototype int_4 _rc6j (real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ l4_, real_4 _p_ l5_, real_4 _p_ l6_, real_4 _p_
2102 l1min_, real_4 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
2103 prototype real_4 _rc (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ ier_);
2104 prototype real_4 _rd (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_);
2105 prototype int_4 _reort (int_4 _p_ ncomp_, real_4 _p_ y_, real_4 _p_ yp_, real_4 _p_ yhp_, int_4 _p_ niv_, real_4 _p_ w_
2106 , real_4 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_);
2107 prototype real_4 _rf (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_);
2108 prototype real_4 _rj (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, real_4 _p_ p_, int_4 _p_ ier_);
2109 prototype int_4 _rpqr79 (int_4 _p_ ndeg_, real_4 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_);
2110 prototype int_4 _rpzero (int_4 _p_ n_, real_4 _p_ a_, complex_8 _p_ r_, complex_8 _p_ t_, int_4 _p_ iflg_, real_4 _p_
2111 s_);
2112 prototype int_4 _s1merg (real_4 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_);
2113 prototype int_4 _sbocls (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mcon_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_4 _p_
2114 bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnormc_, real_4 _p_ rnorm_, int_4 _p_
2115 mode_, real_4 _p_ rw_, int_4 _p_ iw_);
2116 prototype int_4 _sbols (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_4 _p_ bl_, real_4 _p_
2117 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, int_4 _p_ iw_)
2118 ;
2119 prototype int_4 _sbolsm (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ minput_, int_4 _p_ ncols_, real_4 _p_ bl_, real_4 _p_
2120 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, real_4 _p_ ww_
2121 , real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
2122 prototype int_4 _sclosm (int_4 _p_ ipage_);
2123 prototype int_4 _scoef (real_4 _p_ yh_, real_4 _p_ yp_, int_4 _p_ ncomp_, int_4 _p_ nrowb_, int_4 _p_ nfc_, int_4 _p_
2124 nic_, real_4 _p_ b_, real_4 _p_ beta_, real_4 _p_ coef_, int_4 _p_ inhomo_, real_4 _p_ re_, real_4 _p_ ae_, real_4 _p_
2125 by_, real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
2126 prototype int_4 _scov (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_,
2127 real_4 _p_ r_, int_4 _p_ ldr_, int_4 _p_ info_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_);
2128 prototype int_4 _sgeev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_,
2129 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
2130 prototype int_4 _sgefs (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
2131 real_4 _p_ work_, int_4 _p_ iwork_);
2132 prototype int_4 _sgeir (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
2133 real_4 _p_ work_, int_4 _p_ iwork_);
2134 prototype int_4 _sglss (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4
2135 _p_ nb_, real_4 _p_ rnorm_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
2136 prototype int_4 _snbco (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
2137 real_4 _p_ rcond_, real_4 _p_ z_);
2138 prototype int_4 _snbdi (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
2139 real_4 _p_ det_);
2140 prototype int_4 _snbfa (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
2141 int_4 _p_ info_);
2142 prototype int_4 _snbfs (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ v_,
2143 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2144 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00045
2145
2146 prototype int_4 _snbir (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ v_,
2147 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2148 prototype int_4 _snbsl (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
2149 real_4 _p_ b_, int_4 _p_ job_);
2150 prototype int_4 _snls1e (real_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_
2151 , real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_);
2152 prototype int_4 _snls1 (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_,
2153 real_4 _p_ fjac_, int_4 _p_ ldfjac_, real_4 _p_ ftol_, real_4 _p_ xtol_, real_4 _p_ gtol_, int_4 _p_ maxfev_, real_4
2154 _p_ epsfcn_, real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_
2155 , int_4 _p_ njev_, int_4 _p_ ipvt_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_
2156 );
2157 prototype int_4 _snsqe (real_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_
2158 fvec_, real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_);
2159 prototype int_4 _snsq (int_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_
2160 , real_4 _p_ fjac_, int_4 _p_ ldfjac_, real_4 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_
2161 epsfcn_, real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_,
2162 int_4 _p_ njev_, real_4 _p_ r_, int_4 _p_ lr_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_,
2163 real_4 _p_ wa4_);
2164 prototype int_4 _sods (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_,
2165 int_4 _p_ iflag_, real_4 _p_ work_, int_4 _p_ iwork_);
2166 prototype int_4 _sopenm (int_4 _p_ ipage_, int_4 _p_ lpage_);
2167 prototype int_4 _soseqs (real_4 (*_fnc)(), int_4 _p_ n_, real_4 _p_ s_, real_4 _p_ rtolx_, real_4 _p_ atolx_, real_4
2168 _p_ tolf_, int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_,
2169 real_4 _p_ fmax_, real_4 _p_ c_, int_4 _p_ nc_, real_4 _p_ b_, real_4 _p_ p_, real_4 _p_ temp_, real_4 _p_ x_, real_4
2170 _p_ y_, real_4 _p_ fac_, int_4 _p_ is_);
2171 prototype int_4 _sos (real_4 (*_fnc)(), int_4 _p_ neq_, real_4 _p_ x_, real_4 _p_ rtolx_, real_4 _p_ atolx_, real_4 _p_
2172 tolf_, int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
2173 prototype int_4 _sossol (int_4 _p_ k_, int_4 _p_ n_, int_4 _p_ l_, real_4 _p_ x_, real_4 _p_ c_, real_4 _p_ b_, int_4
2174 _p_ m_);
2175 prototype int_4 _speli4 (int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_
2176 bda_, real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_
2177 nbdcnd_, real_4 _p_ bdc_, real_4 _p_ bdd_, int_4 (*_cofx)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_
2178 dn_, real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_,
2179 real_4 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_
2180 ierror_);
2181 prototype int_4 _spelip (int_4 _p_ intl_, int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_
2182 mbdcnd_, real_4 _p_ bda_, real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_
2183 n_, int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ gama_, real_4 _p_ bdd_, real_4 _p_ xnu_, int_4 (*_cofx)(), int_4
2184 (*_cofy)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ dn_, real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_
2185 am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_, real_4 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_
2186 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_);
2187 prototype int_4 _spincw (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ npp_, int_4 _p_
2188 jstrt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_
2189 ibb_, real_4 _p_ costsc_, real_4 _p_ gg_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
2190 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ costs_, real_4 _p_ colnrm_,
2191 real_4 _p_ duals_, logical_4 _p_ stpedg_);
2192 prototype int_4 _spinit (int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ bl_, real_4 _p_ bu_, int_4
2193 _p_ ind_, real_4 _p_ primal_, int_4 _p_ info_, real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ costsc_, real_4 _p_
2194 colnrm_, real_4 _p_ xlamda_, real_4 _p_ anorm_, real_4 _p_ rhs_, real_4 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_,
2195 int_4 _p_ imat_, logical_4 _p_ lopt_);
2196 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00046
2197
2198 prototype int_4 _splpce (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ itlp_, int_4
2199 _p_ itbrc_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4
2200 _p_ ibb_, real_4 _p_ erdnrm_, real_4 _p_ eps_, real_4 _p_ tune_, real_4 _p_ gg_, real_4 _p_ amat_, real_4 _p_ basmat_,
2201 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ primal_, real_4 _p_ erd_, real_4 _p_ erp_, logical_4 _p_
2202 singlr_, logical_4 _p_ redbas_);
2203 prototype int_4 _splpdm (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4
2204 _p_ info_, int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4
2205 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ anorm_, real_4 _p_ eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ amat_, real_4
2206 _p_ basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
2207 prototype int_4 _splp (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_,
2208 real_4 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_, real_4 _p_
2209 duals_, int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
2210 prototype int_4 _splpfe (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ ienter_, int_4
2211 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4
2212 _p_ erdnrm_, real_4 _p_ eps_, real_4 _p_ gg_, real_4 _p_ dulnrm_, real_4 _p_ dirnrm_, real_4 _p_ amat_, real_4 _p_
2213 basmat_, real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ rz_, real_4 _p_
2214 rg_, real_4 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_);
2215 prototype int_4 _splpfl (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ ibasis_,
2216 int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ theta_, real_4 _p_ dirnrm_, real_4 _p_ rprnrm_, real_4 _p_ csc_, real_4 _p_
2217 ww_, real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ erp_, real_4 _p_ rprim_, real_4 _p_ primal_, logical_4 _p_ finite_,
2218 logical_4 _p_ zerolv_);
2219 prototype int_4 _splpmn (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_
2220 prgopt_, real_4 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_,
2221 real_4 _p_ duals_, real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ colnrm_, real_4 _p_ erd_, real_4 _p_ erp_, real_4 _p_
2222 basmat_, real_4 _p_ wr_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ rprim_, real_4 _p_ rhs_, real_4 _p_ ww_, int_4 _p_
2223 lmx_, int_4 _p_ lbm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_
2224 iwr_);
2225 prototype int_4 _splpmu (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4
2226 _p_ info_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_,
2227 int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ anorm_,
2228 real_4 _p_ eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ rprnrm_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_
2229 theta_, real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_
2230 csc_, real_4 _p_ wr_, real_4 _p_ rprim_, real_4 _p_ ww_, real_4 _p_ bu_, real_4 _p_ bl_, real_4 _p_ rhs_, real_4 _p_
2231 erd_, real_4 _p_ erp_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ colnrm_, real_4 _p_ costs_, real_4 _p_ primal_,
2232 real_4 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
2233 prototype int_4 _splpup (int_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ prgopt_, real_4 _p_
2234 dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ amat_, int_4 _p_ imat_, logical_4
2235 _p_ sizeup_, real_4 _p_ asmall_, real_4 _p_ abig_);
2236 prototype int_4 _spofs (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
2237 real_4 _p_ work_);
2238 prototype int_4 _spoir (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
2239 real_4 _p_ work_);
2240 prototype int_4 _spopt (real_4 _p_ prgopt_, int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ info_, real_4 _p_ csc_,
2241 int_4 _p_ ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
2242 prototype int_4 _spperm (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_);
2243 prototype int_4 _spsort (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_);
2244 prototype int_4 _sreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_);
2245 prototype int_4 _ssiev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ work_, int_4 _p_ job_,
2246 int_4 _p_ info_);
2247 prototype int_4 _ssort (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, int_4 _p_ kflag_);
2248 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00047
2249
2250 prototype int_4 _stor1 (real_4 _p_ u_, real_4 _p_ yh_, real_4 _p_ v_, real_4 _p_ yp_, int_4 _p_ ntemp_, int_4 _p_
2251 ndisk_, int_4 _p_ ntape_);
2252 prototype int_4 _stway (real_4 _p_ u_, real_4 _p_ v_, real_4 _p_ yhp_, int_4 _p_ inout_, real_4 _p_ stowa_);
2253 prototype int_4 _suds (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_,
2254 int_4 _p_ iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_);
2255 prototype int_4 _svecs (int_4 _p_ ncomp_, int_4 _p_ lnfc_, real_4 _p_ yhp_, real_4 _p_ work_, int_4 _p_ iwork_, int_4
2256 _p_ inhomo_, int_4 _p_ iflag_);
2257 prototype int_4 _swritp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_);
2258 prototype int_4 _tevlc (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_);
2259 prototype int_4 _tevls (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_);
2260 prototype int_4 _tri3 (int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, int_4 _p_ k_, real_4 _p_ y1_, real_4
2261 _p_ y2_, real_4 _p_ y3_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_);
2262 prototype int_4 _tridq (int_4 _p_ mr_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ y_, real_4 _p_ d_);
2263 prototype int_4 _tris4 (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ u_, real_4
2264 _p_ z_);
2265 prototype int_4 _trisp (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ u_, real_4
2266 _p_ z_);
2267 prototype int_4 _trix (int_4 _p_ idegbr_, int_4 _p_ idegcr_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_,
2268 real_4 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_);
2269 prototype int_4 _u11ls (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ ub_, real_4 _p_ db_,
2270 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4
2271 _p_ ic_, int_4 _p_ ir_);
2272 prototype int_4 _u11us (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ ub_, real_4 _p_ db_,
2273 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4
2274 _p_ ir_, int_4 _p_ ic_);
2275 prototype int_4 _u12ls (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4
2276 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ic_, int_4 _p_
2277 ir_);
2278 prototype int_4 _u12us (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4
2279 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ir_, int_4 _p_
2280 ic_);
2281 prototype int_4 _ulsia (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4
2282 _p_ nb_, real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_
2283 ksure_, real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
2284 prototype int_4 _usrmat (int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ aij_, int_4 _p_ indcat_, real_4 _p_ prgopt_, real_4 _p_
2285 dattrv_, int_4 _p_ iflag_);
2286 prototype real_4 _vnwrms (int_4 _p_ n_, real_4 _p_ v_, real_4 _p_ w_);
2287 prototype int_4 _wnlit (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ l_, int_4 _p_ ipivot_,
2288 int_4 _p_ itype_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ rnorm_, int_4 _p_ idope_, real_4 _p_ dope_, logical_4
2289 _p_ done_);
2290 prototype int_4 _wnlsm (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mme_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_,
2291 real_4 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_4 _p_
2292 wd_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_);
2293 prototype int_4 _wnlt1 (int_4 _p_ i_, int_4 _p_ lend_, int_4 _p_ mend_, int_4 _p_ ir_, int_4 _p_ mdw_, logical_4 _p_
2294 recalc_, int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_);
2295 prototype logical_4 _wnlt2 (int_4 _p_ me_, int_4 _p_ mend_, int_4 _p_ ir_, real_4 _p_ factor_, real_4 _p_ tau_, real_4
2296 _p_ scale_, real_4 _p_ wic_);
2297 prototype int_4 _wnlt3 (int_4 _p_ i_, int_4 _p_ imax_, int_4 _p_ m_, int_4 _p_ mdw_, int_4 _p_ ipivot_, real_4 _p_ h_,
2298 real_4 _p_ w_);
2299 prototype int_4 _wnnls (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_4
2300 // VIF THU 20 NOV 2025 22:21:23 ** GLOBAL SCOPE ** PROTOTYPES PAGE 00048
2301
2302 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_);
2303 prototype int_4 _xadj (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_);
2304 prototype int_4 _xc210 (int_4 _p_ k_, real_4 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_);
2305 prototype real_4 _xpsi (real_4 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_);
2306 prototype int_4 _xred (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_);
2307 prototype int_4 _yairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ bi_, real_4 _p_ dbi_);
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321 // VIF THU 20 NOV 2025 22:21:23 ** AAAAAA ** AAAAAA PAGE 00049
2322
2323 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2324 // S S U U B B R R O O U U T I NN N E
2325 // S U U B B R R O O U U T I N N N E
2326 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2327 // S U U B B R R O O U U T I N N N E
2328 // S S U U B B R R O O U U T I N NN E
2329 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2330
2331 // A A A A A A
2332 // A A A A A A A A A A A A
2333 // A A A A A A A A A A A A
2334 // A A A A A A A A A A A A
2335 // AAAAAAA AAAAAAA AAAAAAA AAAAAAA AAAAAAA AAAAAAA
2336 // A A A A A A A A A A A A
2337 // A A A A A A A A A A A A
2338
2339
2340 // VIF THU 20 NOV 2025 22:21:23 ** AAAAAA ** DIAGNOSTICS PAGE 00050
2341
2342
2343 // VIF THU 20 NOV 2025 22:21:23 ** AAAAAA ** GENERATED CODE PAGE 00051
2344
2345 int_4 _aaaaaa (char _p_ ver_)
2346 { // ** body not listed **
2350 }
2351
2352 // VIF THU 20 NOV 2025 22:21:23 ** ASYIK ** ASYIK PAGE 00052
2353
2354 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2355 // S S U U B B R R O O U U T I NN N E
2356 // S U U B B R R O O U U T I N N N E
2357 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2358 // S U U B B R R O O U U T I N N N E
2359 // S S U U B B R R O O U U T I N NN E
2360 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2361
2362 // A SSSSS Y Y III K K
2363 // A A S S Y Y I K K
2364 // A A S Y Y I K K
2365 // A A SSSSS Y I KKK
2366 // AAAAAAA S Y I K K
2367 // A A S S Y I K K
2368 // A A SSSSS Y III K K
2369
2370
2371 // VIF THU 20 NOV 2025 22:21:23 ** ASYIK ** DIAGNOSTICS PAGE 00053
2372
2373
2374 // VIF THU 20 NOV 2025 22:21:23 ** ASYIK ** GENERATED CODE PAGE 00054
2375
2376 int_4 _asyik (real_4 _p_ x_, real_4 _p_ fnu_, int_4 _p_ kode_, real_4 _p_ flgik_, real_4 _p_ ra_, real_4 _p_ arg_,
2377 int_4 _p_ in_, real_4 _p_ y_)
2378 { // ** body not listed **
2872 }
2873
2874 // VIF THU 20 NOV 2025 22:21:23 ** ASYJY ** ASYJY PAGE 00064
2875
2876 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2877 // S S U U B B R R O O U U T I NN N E
2878 // S U U B B R R O O U U T I N N N E
2879 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2880 // S U U B B R R O O U U T I N N N E
2881 // S S U U B B R R O O U U T I N NN E
2882 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2883
2884 // A SSSSS Y Y J Y Y
2885 // A A S S Y Y J Y Y
2886 // A A S Y Y J Y Y
2887 // A A SSSSS Y J Y
2888 // AAAAAAA S Y J J Y
2889 // A A S S Y J J Y
2890 // A A SSSSS Y JJJJJ Y
2891
2892
2893 // VIF THU 20 NOV 2025 22:21:23 ** ASYJY ** DIAGNOSTICS PAGE 00065
2894
2895
2896 // VIF THU 20 NOV 2025 22:21:23 ** ASYJY ** GENERATED CODE PAGE 00066
2897
2898 int_4 _asyjy (int_4 (*_funjy)(), real_4 _p_ x_, real_4 _p_ fnu_, real_4 _p_ flgjy_, int_4 _p_ in_, real_4 _p_ y_,
2899 real_4 _p_ wk_, int_4 _p_ iflw_)
2900 { // ** body not listed **
5423 }
5424
5425 // VIF THU 20 NOV 2025 22:21:23 ** AVINT ** AVINT PAGE 00115
5426
5427 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5428 // S S U U B B R R O O U U T I NN N E
5429 // S U U B B R R O O U U T I N N N E
5430 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5431 // S U U B B R R O O U U T I N N N E
5432 // S S U U B B R R O O U U T I N NN E
5433 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5434
5435 // A V V III N N TTTTTTT
5436 // A A V V I NN N T
5437 // A A V V I N N N T
5438 // A A V V I N N N T
5439 // AAAAAAA V V I N N N T
5440 // A A V V I N NN T
5441 // A A V III N N T
5442
5443
5444 // VIF THU 20 NOV 2025 22:21:23 ** AVINT ** DIAGNOSTICS PAGE 00116
5445
5446
5447 // VIF THU 20 NOV 2025 22:21:23 ** AVINT ** GENERATED CODE PAGE 00117
5448
5449 int_4 _avint (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, real_4 _p_ xlo_, real_4 _p_ xup_, real_4 _p_ ans_, int_4 _p_
5450 ierr_)
5451 { // ** body not listed **
5601 }
5602
5603 // VIF THU 20 NOV 2025 22:21:23 ** BCRH ** BCRH PAGE 00120
5604
5605 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
5606 // F U U NN N C C T I O O NN N
5607 // F U U N N N C T I O O N N N
5608 // FFFFF U U N N N C T I O O N N N
5609 // F U U N N N C T I O O N N N
5610 // F U U N NN C C T I O O N NN
5611 // F UUUUU N N CCCCC T III OOOOO N N
5612
5613 // BBBBBB CCCCC RRRRRR H H
5614 // B B C C R R H H
5615 // B B C R R H H
5616 // BBBBBB C RRRRRR HHHHHHH
5617 // B B C R R H H
5618 // B B C C R R H H
5619 // BBBBBB CCCCC R R H H
5620
5621
5622 // VIF THU 20 NOV 2025 22:21:23 ** BCRH ** DIAGNOSTICS PAGE 00121
5623
5624
5625 // VIF THU 20 NOV 2025 22:21:23 ** BCRH ** GENERATED CODE PAGE 00122
5626
5627 real_4 _bcrh (real_4 _p_ xll_, real_4 _p_ xrr_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_, real_4
5628 (*_f)(), real_4 _p_ sgn_)
5629 { // ** body not listed **
5664 }
5665
5666
5667 // VIF THU 20 NOV 2025 22:21:23 ** BDIFF ** BDIFF PAGE 00123
5668
5669 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5670 // S S U U B B R R O O U U T I NN N E
5671 // S U U B B R R O O U U T I N N N E
5672 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5673 // S U U B B R R O O U U T I N N N E
5674 // S S U U B B R R O O U U T I N NN E
5675 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5676
5677 // BBBBBB DDDDDD III FFFFFFF FFFFFFF
5678 // B B D D I F F
5679 // B B D D I F F
5680 // BBBBBB D D I FFFFF FFFFF
5681 // B B D D I F F
5682 // B B D D I F F
5683 // BBBBBB DDDDDD III F F
5684
5685
5686 // VIF THU 20 NOV 2025 22:21:23 ** BDIFF ** DIAGNOSTICS PAGE 00124
5687
5688
5689 // VIF THU 20 NOV 2025 22:21:23 ** BDIFF ** GENERATED CODE PAGE 00125
5690
5691 int_4 _bdiff (int_4 _p_ l_, real_4 _p_ v_)
5692 { // ** body not listed **
5707 }
5708
5709 // VIF THU 20 NOV 2025 22:21:23 ** BKSOL ** BKSOL PAGE 00126
5710
5711 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5712 // S S U U B B R R O O U U T I NN N E
5713 // S U U B B R R O O U U T I N N N E
5714 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5715 // S U U B B R R O O U U T I N N N E
5716 // S S U U B B R R O O U U T I N NN E
5717 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5718
5719 // BBBBBB K K SSSSS OOOOO L
5720 // B B K K S S O O L
5721 // B B K K S O O L
5722 // BBBBBB KKK SSSSS O O L
5723 // B B K K S O O L
5724 // B B K K S S O O L
5725 // BBBBBB K K SSSSS OOOOO LLLLLLL
5726
5727
5728 // VIF THU 20 NOV 2025 22:21:23 ** BKSOL ** DIAGNOSTICS PAGE 00127
5729
5730
5731 // VIF THU 20 NOV 2025 22:21:23 ** BKSOL ** GENERATED CODE PAGE 00128
5732
5733 int_4 _bksol (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ x_)
5734 { // ** body not listed **
5751 }
5752
5753 // VIF THU 20 NOV 2025 22:21:23 ** BLKTR1 ** BLKTR1 PAGE 00129
5754
5755 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5756 // S S U U B B R R O O U U T I NN N E
5757 // S U U B B R R O O U U T I N N N E
5758 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5759 // S U U B B R R O O U U T I N N N E
5760 // S S U U B B R R O O U U T I N NN E
5761 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5762
5763 // BBBBBB L K K TTTTTTT RRRRRR 1
5764 // B B L K K T R R 11
5765 // B B L K K T R R 1 1
5766 // BBBBBB L KKK T RRRRRR 1
5767 // B B L K K T R R 1
5768 // B B L K K T R R 1
5769 // BBBBBB LLLLLLL K K T R R 11111
5770
5771
5772 // VIF THU 20 NOV 2025 22:21:23 ** BLKTR1 ** DIAGNOSTICS PAGE 00130
5773
5774
5775 // VIF THU 20 NOV 2025 22:21:23 ** BLKTR1 ** GENERATED CODE PAGE 00131
5776
5777 int_4 _blktr1 (int_4 _p_ n_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, int_4 _p_ m_, real_4 _p_ am_, real_4 _p_
5778 bm_, real_4 _p_ cm_, int_4 _p_ idimy_, real_4 _p_ y_, real_4 _p_ b_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_,
5779 real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
5780 { // ** body not listed **
6125 }
6126
6127 // VIF THU 20 NOV 2025 22:21:23 ** BNDACC ** BNDACC PAGE 00138
6128
6129 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6130 // S S U U B B R R O O U U T I NN N E
6131 // S U U B B R R O O U U T I N N N E
6132 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6133 // S U U B B R R O O U U T I N N N E
6134 // S S U U B B R R O O U U T I N NN E
6135 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6136
6137 // BBBBBB N N DDDDDD A CCCCC CCCCC
6138 // B B NN N D D A A C C C C
6139 // B B N N N D D A A C C
6140 // BBBBBB N N N D D A A C C
6141 // B B N N N D D AAAAAAA C C
6142 // B B N NN D D A A C C C C
6143 // BBBBBB N N DDDDDD A A CCCCC CCCCC
6144
6145
6146 // VIF THU 20 NOV 2025 22:21:23 ** BNDACC ** DIAGNOSTICS PAGE 00139
6147
6148
6149 // VIF THU 20 NOV 2025 22:21:23 ** BNDACC ** GENERATED CODE PAGE 00140
6150
6151 int_4 _bndacc (real_4 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, int_4 _p_ mt_, int_4 _p_ jt_
6152 )
6153 { // ** body not listed **
6231 }
6232
6233 // VIF THU 20 NOV 2025 22:21:23 ** BNDSOL ** BNDSOL PAGE 00142
6234
6235 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6236 // S S U U B B R R O O U U T I NN N E
6237 // S U U B B R R O O U U T I N N N E
6238 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6239 // S U U B B R R O O U U T I N N N E
6240 // S S U U B B R R O O U U T I N NN E
6241 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6242
6243 // BBBBBB N N DDDDDD SSSSS OOOOO L
6244 // B B NN N D D S S O O L
6245 // B B N N N D D S O O L
6246 // BBBBBB N N N D D SSSSS O O L
6247 // B B N N N D D S O O L
6248 // B B N NN D D S S O O L
6249 // BBBBBB N N DDDDDD SSSSS OOOOO LLLLLLL
6250
6251
6252 // VIF THU 20 NOV 2025 22:21:23 ** BNDSOL ** DIAGNOSTICS PAGE 00143
6253
6254
6255 // VIF THU 20 NOV 2025 22:21:23 ** BNDSOL ** GENERATED CODE PAGE 00144
6256
6257 int_4 _bndsol (int_4 _p_ mode_, real_4 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, real_4 _p_
6258 x_, int_4 _p_ n_, real_4 _p_ rnorm_)
6259 { // ** body not listed **
6349 }
6350
6351 // VIF THU 20 NOV 2025 22:21:23 ** BSGQ8 ** BSGQ8 PAGE 00146
6352
6353 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6354 // S S U U B B R R O O U U T I NN N E
6355 // S U U B B R R O O U U T I N N N E
6356 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6357 // S U U B B R R O O U U T I N N N E
6358 // S S U U B B R R O O U U T I N NN E
6359 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6360
6361 // BBBBBB SSSSS GGGGG QQQQQ 88888
6362 // B B S S G G Q Q 8 8
6363 // B B S G Q Q 8 8
6364 // BBBBBB SSSSS G GGGG Q Q 88888
6365 // B B S G G Q Q Q 8 8
6366 // B B S S G G Q Q 8 8
6367 // BBBBBB SSSSS GGGGG QQQQ Q 88888
6368
6369
6370 // VIF THU 20 NOV 2025 22:21:23 ** BSGQ8 ** DIAGNOSTICS PAGE 00147
6371
6372
6373 // VIF THU 20 NOV 2025 22:21:23 ** BSGQ8 ** GENERATED CODE PAGE 00148
6374
6375 int_4 _bsgq8 (real_4 (*_fun)(), real_4 _p_ xt_, real_4 _p_ bc_, int_4 _p_ n_, int_4 _p_ kk_, int_4 _p_ id_, real_4 _p_
6376 a_, real_4 _p_ b_, int_4 _p_ inbv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_, real_4 _p_ work_)
6377 { // ** body not listed **
6668 }
6669
6670 // VIF THU 20 NOV 2025 22:21:23 ** BSPLVD ** BSPLVD PAGE 00154
6671
6672 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6673 // S S U U B B R R O O U U T I NN N E
6674 // S U U B B R R O O U U T I N N N E
6675 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6676 // S U U B B R R O O U U T I N N N E
6677 // S S U U B B R R O O U U T I N NN E
6678 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6679
6680 // BBBBBB SSSSS PPPPPP L V V DDDDDD
6681 // B B S S P P L V V D D
6682 // B B S P P L V V D D
6683 // BBBBBB SSSSS PPPPPP L V V D D
6684 // B B S P L V V D D
6685 // B B S S P L V V D D
6686 // BBBBBB SSSSS P LLLLLLL V DDDDDD
6687
6688
6689 // VIF THU 20 NOV 2025 22:21:23 ** BSPLVD ** DIAGNOSTICS PAGE 00155
6690
6691
6692 // VIF THU 20 NOV 2025 22:21:23 ** BSPLVD ** GENERATED CODE PAGE 00156
6693
6694 int_4 _bsplvd (real_4 _p_ t_, int_4 _p_ k_, real_4 _p_ x_, int_4 _p_ ileft_, real_4 _p_ vnikx_, int_4 _p_ nderiv_)
6695 { // ** body not listed **
6763 }
6764
6765 // VIF THU 20 NOV 2025 22:21:23 ** BSPLVN ** BSPLVN PAGE 00158
6766
6767 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6768 // S S U U B B R R O O U U T I NN N E
6769 // S U U B B R R O O U U T I N N N E
6770 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6771 // S U U B B R R O O U U T I N N N E
6772 // S S U U B B R R O O U U T I N NN E
6773 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6774
6775 // BBBBBB SSSSS PPPPPP L V V N N
6776 // B B S S P P L V V NN N
6777 // B B S P P L V V N N N
6778 // BBBBBB SSSSS PPPPPP L V V N N N
6779 // B B S P L V V N N N
6780 // B B S S P L V V N NN
6781 // BBBBBB SSSSS P LLLLLLL V N N
6782
6783
6784 // VIF THU 20 NOV 2025 22:21:23 ** BSPLVN ** DIAGNOSTICS PAGE 00159
6785
6786
6787 // VIF THU 20 NOV 2025 22:21:23 ** BSPLVN ** GENERATED CODE PAGE 00160
6788
6789 int_4 _bsplvn (real_4 _p_ t_, int_4 _p_ jhigh_, int_4 _p_ index_, real_4 _p_ x_, int_4 _p_ ileft_, real_4 _p_ vnikx_)
6790 { // ** body not listed **
6900 }
6901
6902 // VIF THU 20 NOV 2025 22:21:23 ** BSRH ** BSRH PAGE 00163
6903
6904 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
6905 // F U U NN N C C T I O O NN N
6906 // F U U N N N C T I O O N N N
6907 // FFFFF U U N N N C T I O O N N N
6908 // F U U N N N C T I O O N N N
6909 // F U U N NN C C T I O O N NN
6910 // F UUUUU N N CCCCC T III OOOOO N N
6911
6912 // BBBBBB SSSSS RRRRRR H H
6913 // B B S S R R H H
6914 // B B S R R H H
6915 // BBBBBB SSSSS RRRRRR HHHHHHH
6916 // B B S R R H H
6917 // B B S S R R H H
6918 // BBBBBB SSSSS R R H H
6919
6920
6921 // VIF THU 20 NOV 2025 22:21:23 ** BSRH ** DIAGNOSTICS PAGE 00164
6922
6923
6924 // VIF THU 20 NOV 2025 22:21:23 ** BSRH ** GENERATED CODE PAGE 00165
6925
6926 real_4 _bsrh (real_4 _p_ xll_, real_4 _p_ xrr_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_, real_4
6927 (*_f)(), real_4 _p_ sgn_)
6928 { // ** body not listed **
6963 }
6964
6965
6966 // VIF THU 20 NOV 2025 22:21:23 ** C1MERG ** C1MERG PAGE 00166
6967
6968 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6969 // S S U U B B R R O O U U T I NN N E
6970 // S U U B B R R O O U U T I N N N E
6971 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6972 // S U U B B R R O O U U T I N N N E
6973 // S S U U B B R R O O U U T I N NN E
6974 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6975
6976 // CCCCC 1 M M EEEEEEE RRRRRR GGGGG
6977 // C C 11 MM MM E R R G G
6978 // C 1 1 M M M M E R R G
6979 // C 1 M M M EEEEE RRRRRR G GGGG
6980 // C 1 M M E R R G G
6981 // C C 1 M M E R R G G
6982 // CCCCC 11111 M M EEEEEEE R R GGGGG
6983
6984
6985 // VIF THU 20 NOV 2025 22:21:23 ** C1MERG ** DIAGNOSTICS PAGE 00167
6986
6987
6988 // VIF THU 20 NOV 2025 22:21:23 ** C1MERG ** GENERATED CODE PAGE 00168
6989
6990 int_4 _c1merg (complex_8 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
6991 { // ** body not listed **
7030 }
7031
7032 // VIF THU 20 NOV 2025 22:21:23 ** CASYI ** CASYI PAGE 00169
7033
7034 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7035 // S S U U B B R R O O U U T I NN N E
7036 // S U U B B R R O O U U T I N N N E
7037 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7038 // S U U B B R R O O U U T I N N N E
7039 // S S U U B B R R O O U U T I N NN E
7040 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7041
7042 // CCCCC A SSSSS Y Y III
7043 // C C A A S S Y Y I
7044 // C A A S Y Y I
7045 // C A A SSSSS Y I
7046 // C AAAAAAA S Y I
7047 // C C A A S S Y I
7048 // CCCCC A A SSSSS Y III
7049
7050
7051 // VIF THU 20 NOV 2025 22:21:23 ** CASYI ** DIAGNOSTICS PAGE 00170
7052
7053
7054 // VIF THU 20 NOV 2025 22:21:23 ** CASYI ** GENERATED CODE PAGE 00171
7055
7056 int_4 _casyi (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ kode_, int_4 _p_ n_, complex_8 _p_ y_, int_4 _p_ nz_, real_4
7057 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_)
7058 { // ** body not listed **
7223 }
7224
7225 // VIF THU 20 NOV 2025 22:21:23 ** CBLKT1 ** CBLKT1 PAGE 00175
7226
7227 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7228 // S S U U B B R R O O U U T I NN N E
7229 // S U U B B R R O O U U T I N N N E
7230 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7231 // S U U B B R R O O U U T I N N N E
7232 // S S U U B B R R O O U U T I N NN E
7233 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7234
7235 // CCCCC BBBBBB L K K TTTTTTT 1
7236 // C C B B L K K T 11
7237 // C B B L K K T 1 1
7238 // C BBBBBB L KKK T 1
7239 // C B B L K K T 1
7240 // C C B B L K K T 1
7241 // CCCCC BBBBBB LLLLLLL K K T 11111
7242
7243
7244 // VIF THU 20 NOV 2025 22:21:23 ** CBLKT1 ** DIAGNOSTICS PAGE 00176
7245
7246
7247 // VIF THU 20 NOV 2025 22:21:23 ** CBLKT1 ** GENERATED CODE PAGE 00177
7248
7249 int_4 _cblkt1 (int_4 _p_ n_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, int_4 _p_ m_, complex_8 _p_ am_, complex_8
7250 _p_ bm_, complex_8 _p_ cm_, int_4 _p_ idimy_, complex_8 _p_ y_, real_4 _p_ b_, complex_8 _p_ w1_, complex_8 _p_ w2_,
7251 complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
7252 { // ** body not listed **
7597 }
7598
7599 // VIF THU 20 NOV 2025 22:21:23 ** CCMPB ** CCMPB PAGE 00184
7600
7601 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7602 // S S U U B B R R O O U U T I NN N E
7603 // S U U B B R R O O U U T I N N N E
7604 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7605 // S U U B B R R O O U U T I N N N E
7606 // S S U U B B R R O O U U T I N NN E
7607 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7608
7609 // CCCCC CCCCC M M PPPPPP BBBBBB
7610 // C C C C MM MM P P B B
7611 // C C M M M M P P B B
7612 // C C M M M PPPPPP BBBBBB
7613 // C C M M P B B
7614 // C C C C M M P B B
7615 // CCCCC CCCCC M M P BBBBBB
7616
7617
7618 // VIF THU 20 NOV 2025 22:21:23 ** CCMPB ** DIAGNOSTICS PAGE 00185
7619
7620
7621 // VIF THU 20 NOV 2025 22:21:23 ** CCMPB ** GENERATED CODE PAGE 00186
7622
7623 int_4 _ccmpb (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ b_, real_4
7624 _p_ ah_, real_4 _p_ bh_)
7625 { // ** body not listed **
7789 }
7790
7791 // VIF THU 20 NOV 2025 22:21:23 ** CFOD ** CFOD PAGE 00190
7792
7793 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7794 // S S U U B B R R O O U U T I NN N E
7795 // S U U B B R R O O U U T I N N N E
7796 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7797 // S U U B B R R O O U U T I N N N E
7798 // S S U U B B R R O O U U T I N NN E
7799 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7800
7801 // CCCCC FFFFFFF OOOOO DDDDDD
7802 // C C F O O D D
7803 // C F O O D D
7804 // C FFFFF O O D D
7805 // C F O O D D
7806 // C C F O O D D
7807 // CCCCC F OOOOO DDDDDD
7808
7809
7810 // VIF THU 20 NOV 2025 22:21:23 ** CFOD ** DIAGNOSTICS PAGE 00191
7811
7812
7813 // VIF THU 20 NOV 2025 22:21:23 ** CFOD ** GENERATED CODE PAGE 00192
7814
7815 int_4 _cfod (int_4 _p_ meth_, real_4 _p_ elco_, real_4 _p_ tesco_)
7816 { // ** body not listed **
7893 }
7894
7895 // VIF THU 20 NOV 2025 22:21:23 ** CGEEV ** CGEEV PAGE 00194
7896
7897 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7898 // S S U U B B R R O O U U T I NN N E
7899 // S U U B B R R O O U U T I N N N E
7900 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7901 // S U U B B R R O O U U T I N N N E
7902 // S S U U B B R R O O U U T I N NN E
7903 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7904
7905 // CCCCC GGGGG EEEEEEE EEEEEEE V V
7906 // C C G G E E V V
7907 // C G E E V V
7908 // C G GGGG EEEEE EEEEE V V
7909 // C G G E E V V
7910 // C C G G E E V V
7911 // CCCCC GGGGG EEEEEEE EEEEEEE V
7912
7913
7914 // VIF THU 20 NOV 2025 22:21:23 ** CGEEV ** DIAGNOSTICS PAGE 00195
7915
7916
7917 // VIF THU 20 NOV 2025 22:21:23 ** CGEEV ** GENERATED CODE PAGE 00196
7918
7919 int_4 _cgeev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_, real_4 _p_
7920 work_, int_4 _p_ job_, int_4 _p_ info_)
7921 { // ** body not listed **
8018 }
8019
8020 // VIF THU 20 NOV 2025 22:21:23 ** CGEFS ** CGEFS PAGE 00198
8021
8022 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8023 // S S U U B B R R O O U U T I NN N E
8024 // S U U B B R R O O U U T I N N N E
8025 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8026 // S U U B B R R O O U U T I N N N E
8027 // S S U U B B R R O O U U T I N NN E
8028 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8029
8030 // CCCCC GGGGG EEEEEEE FFFFFFF SSSSS
8031 // C C G G E F S S
8032 // C G E F S
8033 // C G GGGG EEEEE FFFFF SSSSS
8034 // C G G E F S
8035 // C C G G E F S S
8036 // CCCCC GGGGG EEEEEEE F SSSSS
8037
8038
8039 // VIF THU 20 NOV 2025 22:21:23 ** CGEFS ** DIAGNOSTICS PAGE 00199
8040
8041
8042 // VIF THU 20 NOV 2025 22:21:23 ** CGEFS ** GENERATED CODE PAGE 00200
8043
8044 int_4 _cgefs (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
8045 complex_8 _p_ work_, int_4 _p_ iwork_)
8046 { // ** body not listed **
8247 }
8248
8249 // VIF THU 20 NOV 2025 22:21:23 ** CGEIR ** CGEIR PAGE 00204
8250
8251 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8252 // S S U U B B R R O O U U T I NN N E
8253 // S U U B B R R O O U U T I N N N E
8254 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8255 // S U U B B R R O O U U T I N N N E
8256 // S S U U B B R R O O U U T I N NN E
8257 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8258
8259 // CCCCC GGGGG EEEEEEE III RRRRRR
8260 // C C G G E I R R
8261 // C G E I R R
8262 // C G GGGG EEEEE I RRRRRR
8263 // C G G E I R R
8264 // C C G G E I R R
8265 // CCCCC GGGGG EEEEEEE III R R
8266
8267
8268 // VIF THU 20 NOV 2025 22:21:23 ** CGEIR ** DIAGNOSTICS PAGE 00205
8269
8270
8271 // VIF THU 20 NOV 2025 22:21:23 ** CGEIR ** GENERATED CODE PAGE 00206
8272
8273 int_4 _cgeir (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
8274 complex_8 _p_ work_, int_4 _p_ iwork_)
8275 { // ** body not listed **
8497 }
8498
8499 // VIF THU 20 NOV 2025 22:21:23 ** CHIEV ** CHIEV PAGE 00211
8500
8501 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8502 // S S U U B B R R O O U U T I NN N E
8503 // S U U B B R R O O U U T I N N N E
8504 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8505 // S U U B B R R O O U U T I N N N E
8506 // S S U U B B R R O O U U T I N NN E
8507 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8508
8509 // CCCCC H H III EEEEEEE V V
8510 // C C H H I E V V
8511 // C H H I E V V
8512 // C HHHHHHH I EEEEE V V
8513 // C H H I E V V
8514 // C C H H I E V V
8515 // CCCCC H H III EEEEEEE V
8516
8517
8518 // VIF THU 20 NOV 2025 22:21:23 ** CHIEV ** DIAGNOSTICS PAGE 00212
8519
8520
8521 // VIF THU 20 NOV 2025 22:21:23 ** CHIEV ** GENERATED CODE PAGE 00213
8522
8523 int_4 _chiev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_, real_4 _p_
8524 work_, int_4 _p_ job_, int_4 _p_ info_)
8525 { // ** body not listed **
8642 }
8643
8644 // VIF THU 20 NOV 2025 22:21:23 ** CHKPR4 ** CHKPR4 PAGE 00216
8645
8646 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8647 // S S U U B B R R O O U U T I NN N E
8648 // S U U B B R R O O U U T I N N N E
8649 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8650 // S U U B B R R O O U U T I N N N E
8651 // S S U U B B R R O O U U T I N NN E
8652 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8653
8654 // CCCCC H H K K PPPPPP RRRRRR 4
8655 // C C H H K K P P R R 4 4
8656 // C H H K K P P R R 4 4
8657 // C HHHHHHH KKK PPPPPP RRRRRR 4444444
8658 // C H H K K P R R 4
8659 // C C H H K K P R R 4
8660 // CCCCC H H K K P R R 4
8661
8662
8663 // VIF THU 20 NOV 2025 22:21:23 ** CHKPR4 ** DIAGNOSTICS PAGE 00217
8664
8665
8666 // VIF THU 20 NOV 2025 22:21:23 ** CHKPR4 ** GENERATED CODE PAGE 00218
8667
8668 int_4 _chkpr4 (int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ c_, real_4
8669 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_)
8670 { // ** body not listed **
8716 }
8717
8718 // VIF THU 20 NOV 2025 22:21:23 ** CHKPRM ** CHKPRM PAGE 00219
8719
8720 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8721 // S S U U B B R R O O U U T I NN N E
8722 // S U U B B R R O O U U T I N N N E
8723 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8724 // S U U B B R R O O U U T I N N N E
8725 // S S U U B B R R O O U U T I N NN E
8726 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8727
8728 // CCCCC H H K K PPPPPP RRRRRR M M
8729 // C C H H K K P P R R MM MM
8730 // C H H K K P P R R M M M M
8731 // C HHHHHHH KKK PPPPPP RRRRRR M M M
8732 // C H H K K P R R M M
8733 // C C H H K K P R R M M
8734 // CCCCC H H K K P R R M M
8735
8736
8737 // VIF THU 20 NOV 2025 22:21:23 ** CHKPRM ** DIAGNOSTICS PAGE 00220
8738
8739
8740 // VIF THU 20 NOV 2025 22:21:23 ** CHKPRM ** GENERATED CODE PAGE 00221
8741
8742 int_4 _chkprm (int_4 _p_ intl_, int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_,
8743 real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_ idmn_,
8744 int_4 _p_ ierror_)
8745 { // ** body not listed **
8802 }
8803
8804 // VIF THU 20 NOV 2025 22:21:23 ** CHKSN4 ** CHKSN4 PAGE 00223
8805
8806 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8807 // S S U U B B R R O O U U T I NN N E
8808 // S U U B B R R O O U U T I N N N E
8809 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8810 // S U U B B R R O O U U T I N N N E
8811 // S S U U B B R R O O U U T I N NN E
8812 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8813
8814 // CCCCC H H K K SSSSS N N 4
8815 // C C H H K K S S NN N 4 4
8816 // C H H K K S N N N 4 4
8817 // C HHHHHHH KKK SSSSS N N N 4444444
8818 // C H H K K S N N N 4
8819 // C C H H K K S S N NN 4
8820 // CCCCC H H K K SSSSS N N 4
8821
8822
8823 // VIF THU 20 NOV 2025 22:21:23 ** CHKSN4 ** DIAGNOSTICS PAGE 00224
8824
8825
8826 // VIF THU 20 NOV 2025 22:21:23 ** CHKSN4 ** GENERATED CODE PAGE 00225
8827
8828 int_4 _chksn4 (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, int_4 (*_cofx)(), logical_4
8829 _p_ singlr_)
8830 { // ** body not listed **
8855 }
8856
8857 // VIF THU 20 NOV 2025 22:21:23 ** CHKSNG ** CHKSNG PAGE 00226
8858
8859 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8860 // S S U U B B R R O O U U T I NN N E
8861 // S U U B B R R O O U U T I N N N E
8862 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8863 // S U U B B R R O O U U T I N N N E
8864 // S S U U B B R R O O U U T I N NN E
8865 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8866
8867 // CCCCC H H K K SSSSS N N GGGGG
8868 // C C H H K K S S NN N G G
8869 // C H H K K S N N N G
8870 // C HHHHHHH KKK SSSSS N N N G GGGG
8871 // C H H K K S N N N G G
8872 // C C H H K K S S N NN G G
8873 // CCCCC H H K K SSSSS N N GGGGG
8874
8875
8876 // VIF THU 20 NOV 2025 22:21:23 ** CHKSNG ** DIAGNOSTICS PAGE 00227
8877
8878
8879 // VIF THU 20 NOV 2025 22:21:23 ** CHKSNG ** GENERATED CODE PAGE 00228
8880
8881 int_4 _chksng (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, real_4 _p_ gama_, real_4 _p_
8882 xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_)
8883 { // ** body not listed **
8922 }
8923
8924 // VIF THU 20 NOV 2025 22:21:23 ** CMPCSG ** CMPCSG PAGE 00229
8925
8926 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8927 // S S U U B B R R O O U U T I NN N E
8928 // S U U B B R R O O U U T I N N N E
8929 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8930 // S U U B B R R O O U U T I N N N E
8931 // S S U U B B R R O O U U T I N NN E
8932 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8933
8934 // CCCCC M M PPPPPP CCCCC SSSSS GGGGG
8935 // C C MM MM P P C C S S G G
8936 // C M M M M P P C S G
8937 // C M M M PPPPPP C SSSSS G GGGG
8938 // C M M P C S G G
8939 // C C M M P C C S S G G
8940 // CCCCC M M P CCCCC SSSSS GGGGG
8941
8942
8943 // VIF THU 20 NOV 2025 22:21:23 ** CMPCSG ** DIAGNOSTICS PAGE 00230
8944
8945
8946 // VIF THU 20 NOV 2025 22:21:23 ** CMPCSG ** GENERATED CODE PAGE 00231
8947
8948 int_4 _cmpcsg (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, complex_8 _p_ a_)
8949 { // ** body not listed **
8982 }
8983
8984 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSD ** CMPOSD PAGE 00232
8985
8986 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8987 // S S U U B B R R O O U U T I NN N E
8988 // S U U B B R R O O U U T I N N N E
8989 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8990 // S U U B B R R O O U U T I N N N E
8991 // S S U U B B R R O O U U T I N NN E
8992 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8993
8994 // CCCCC M M PPPPPP OOOOO SSSSS DDDDDD
8995 // C C MM MM P P O O S S D D
8996 // C M M M M P P O O S D D
8997 // C M M M PPPPPP O O SSSSS D D
8998 // C M M P O O S D D
8999 // C C M M P O O S S D D
9000 // CCCCC M M P OOOOO SSSSS DDDDDD
9001
9002
9003 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSD ** DIAGNOSTICS PAGE 00233
9004
9005
9006 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSD ** GENERATED CODE PAGE 00234
9007
9008 int_4 _cmposd (int_4 _p_ mr_, int_4 _p_ nr_, int_4 _p_ istag_, complex_8 _p_ ba_, complex_8 _p_ bb_, complex_8 _p_ bc_,
9009 complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ w_, complex_8 _p_ d_, complex_8 _p_ tcos_,
9010 complex_8 _p_ p_)
9011 { // ** body not listed **
9449 }
9450
9451 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSN ** CMPOSN PAGE 00243
9452
9453 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9454 // S S U U B B R R O O U U T I NN N E
9455 // S U U B B R R O O U U T I N N N E
9456 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9457 // S U U B B R R O O U U T I N N N E
9458 // S S U U B B R R O O U U T I N NN E
9459 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9460
9461 // CCCCC M M PPPPPP OOOOO SSSSS N N
9462 // C C MM MM P P O O S S NN N
9463 // C M M M M P P O O S N N N
9464 // C M M M PPPPPP O O SSSSS N N N
9465 // C M M P O O S N N N
9466 // C C M M P O O S S N NN
9467 // CCCCC M M P OOOOO SSSSS N N
9468
9469
9470 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSN ** DIAGNOSTICS PAGE 00244
9471
9472
9473 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSN ** GENERATED CODE PAGE 00245
9474
9475 int_4 _cmposn (int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ istag_, int_4 _p_ mixbnd_, complex_8 _p_ a_, complex_8 _p_ bb_,
9476 complex_8 _p_ c_, complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8
9477 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
9478 { // ** body not listed **
10138 }
10139
10140 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSP ** CMPOSP PAGE 00258
10141
10142 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10143 // S S U U B B R R O O U U T I NN N E
10144 // S U U B B R R O O U U T I N N N E
10145 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10146 // S U U B B R R O O U U T I N N N E
10147 // S S U U B B R R O O U U T I N NN E
10148 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10149
10150 // CCCCC M M PPPPPP OOOOO SSSSS PPPPPP
10151 // C C MM MM P P O O S S P P
10152 // C M M M M P P O O S P P
10153 // C M M M PPPPPP O O SSSSS PPPPPP
10154 // C M M P O O S P
10155 // C C M M P O O S S P
10156 // CCCCC M M P OOOOO SSSSS P
10157
10158
10159 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSP ** DIAGNOSTICS PAGE 00259
10160
10161
10162 // VIF THU 20 NOV 2025 22:21:23 ** CMPOSP ** GENERATED CODE PAGE 00260
10163
10164 int_4 _cmposp (int_4 _p_ m_, int_4 _p_ n_, complex_8 _p_ a_, complex_8 _p_ bb_, complex_8 _p_ c_, complex_8 _p_ q_,
10165 int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8 _p_ w_, complex_8 _p_ w2_,
10166 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
10167 { // ** body not listed **
10264 }
10265
10266 // VIF THU 20 NOV 2025 22:21:23 ** CMPTR3 ** CMPTR3 PAGE 00262
10267
10268 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10269 // S S U U B B R R O O U U T I NN N E
10270 // S U U B B R R O O U U T I N N N E
10271 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10272 // S U U B B R R O O U U T I N N N E
10273 // S S U U B B R R O O U U T I N NN E
10274 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10275
10276 // CCCCC M M PPPPPP TTTTTTT RRRRRR 33333
10277 // C C MM MM P P T R R 3 3
10278 // C M M M M P P T R R 3
10279 // C M M M PPPPPP T RRRRRR 33333
10280 // C M M P T R R 3
10281 // C C M M P T R R 3 3
10282 // CCCCC M M P T R R 33333
10283
10284
10285 // VIF THU 20 NOV 2025 22:21:23 ** CMPTR3 ** DIAGNOSTICS PAGE 00263
10286
10287
10288 // VIF THU 20 NOV 2025 22:21:23 ** CMPTR3 ** GENERATED CODE PAGE 00264
10289
10290 int_4 _cmptr3 (int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_, complex_8 _p_ c_, int_4 _p_ k_, complex_8 _p_ y1_,
10291 complex_8 _p_ y2_, complex_8 _p_ y3_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w1_, complex_8 _p_ w2_,
10292 complex_8 _p_ w3_)
10293 { // ** body not listed **
10407 }
10408
10409 // VIF THU 20 NOV 2025 22:21:23 ** CMPTRX ** CMPTRX PAGE 00267
10410
10411 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10412 // S S U U B B R R O O U U T I NN N E
10413 // S U U B B R R O O U U T I N N N E
10414 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10415 // S U U B B R R O O U U T I N N N E
10416 // S S U U B B R R O O U U T I N NN E
10417 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10418
10419 // CCCCC M M PPPPPP TTTTTTT RRRRRR X X
10420 // C C MM MM P P T R R X X
10421 // C M M M M P P T R R X X
10422 // C M M M PPPPPP T RRRRRR X
10423 // C M M P T R R X X
10424 // C C M M P T R R X X
10425 // CCCCC M M P T R R X X
10426
10427
10428 // VIF THU 20 NOV 2025 22:21:23 ** CMPTRX ** DIAGNOSTICS PAGE 00268
10429
10430
10431 // VIF THU 20 NOV 2025 22:21:23 ** CMPTRX ** GENERATED CODE PAGE 00269
10432
10433 int_4 _cmptrx (int_4 _p_ idegbr_, int_4 _p_ idegcr_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_, complex_8 _p_ c_
10434 , complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_)
10435 { // ** body not listed **
10490 }
10491
10492 // VIF THU 20 NOV 2025 22:21:23 ** CNBCO ** CNBCO PAGE 00271
10493
10494 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10495 // S S U U B B R R O O U U T I NN N E
10496 // S U U B B R R O O U U T I N N N E
10497 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10498 // S U U B B R R O O U U T I N N N E
10499 // S S U U B B R R O O U U T I N NN E
10500 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10501
10502 // CCCCC N N BBBBBB CCCCC OOOOO
10503 // C C NN N B B C C O O
10504 // C N N N B B C O O
10505 // C N N N BBBBBB C O O
10506 // C N N N B B C O O
10507 // C C N NN B B C C O O
10508 // CCCCC N N BBBBBB CCCCC OOOOO
10509
10510
10511 // VIF THU 20 NOV 2025 22:21:23 ** CNBCO ** DIAGNOSTICS PAGE 00272
10512
10513
10514 // VIF THU 20 NOV 2025 22:21:23 ** CNBCO ** GENERATED CODE PAGE 00273
10515
10516 int_4 _cnbco (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4
10517 _p_ rcond_, complex_8 _p_ z_)
10518 { // ** body not listed **
10687 }
10688
10689 // VIF THU 20 NOV 2025 22:21:23 ** CNBDI ** CNBDI PAGE 00277
10690
10691 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10692 // S S U U B B R R O O U U T I NN N E
10693 // S U U B B R R O O U U T I N N N E
10694 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10695 // S U U B B R R O O U U T I N N N E
10696 // S S U U B B R R O O U U T I N NN E
10697 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10698
10699 // CCCCC N N BBBBBB DDDDDD III
10700 // C C NN N B B D D I
10701 // C N N N B B D D I
10702 // C N N N BBBBBB D D I
10703 // C N N N B B D D I
10704 // C C N NN B B D D I
10705 // CCCCC N N BBBBBB DDDDDD III
10706
10707
10708 // VIF THU 20 NOV 2025 22:21:23 ** CNBDI ** DIAGNOSTICS PAGE 00278
10709
10710
10711 // VIF THU 20 NOV 2025 22:21:23 ** CNBDI ** GENERATED CODE PAGE 00279
10712
10713 int_4 _cnbdi (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
10714 complex_8 _p_ det_)
10715 { // ** body not listed **
10750 }
10751
10752 // VIF THU 20 NOV 2025 22:21:23 ** CNBFA ** CNBFA PAGE 00280
10753
10754 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10755 // S S U U B B R R O O U U T I NN N E
10756 // S U U B B R R O O U U T I N N N E
10757 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10758 // S U U B B R R O O U U T I N N N E
10759 // S S U U B B R R O O U U T I N NN E
10760 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10761
10762 // CCCCC N N BBBBBB FFFFFFF A
10763 // C C NN N B B F A A
10764 // C N N N B B F A A
10765 // C N N N BBBBBB FFFFF A A
10766 // C N N N B B F AAAAAAA
10767 // C C N NN B B F A A
10768 // CCCCC N N BBBBBB F A A
10769
10770
10771 // VIF THU 20 NOV 2025 22:21:23 ** CNBFA ** DIAGNOSTICS PAGE 00281
10772
10773
10774 // VIF THU 20 NOV 2025 22:21:23 ** CNBFA ** GENERATED CODE PAGE 00282
10775
10776 int_4 _cnbfa (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, int_4
10777 _p_ info_)
10778 { // ** body not listed **
10837 }
10838
10839 // VIF THU 20 NOV 2025 22:21:23 ** CNBFS ** CNBFS PAGE 00284
10840
10841 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10842 // S S U U B B R R O O U U T I NN N E
10843 // S U U B B R R O O U U T I N N N E
10844 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10845 // S U U B B R R O O U U T I N N N E
10846 // S S U U B B R R O O U U T I N NN E
10847 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10848
10849 // CCCCC N N BBBBBB FFFFFFF SSSSS
10850 // C C NN N B B F S S
10851 // C N N N B B F S
10852 // C N N N BBBBBB FFFFF SSSSS
10853 // C N N N B B F S
10854 // C C N NN B B F S S
10855 // CCCCC N N BBBBBB F SSSSS
10856
10857
10858 // VIF THU 20 NOV 2025 22:21:23 ** CNBFS ** DIAGNOSTICS PAGE 00285
10859
10860
10861 // VIF THU 20 NOV 2025 22:21:23 ** CNBFS ** GENERATED CODE PAGE 00286
10862
10863 int_4 _cnbfs (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, complex_8 _p_ v_, int_4
10864 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
10865 { // ** body not listed **
11158 }
11159
11160 // VIF THU 20 NOV 2025 22:21:23 ** CNBIR ** CNBIR PAGE 00292
11161
11162 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11163 // S S U U B B R R O O U U T I NN N E
11164 // S U U B B R R O O U U T I N N N E
11165 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11166 // S U U B B R R O O U U T I N N N E
11167 // S S U U B B R R O O U U T I N NN E
11168 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11169
11170 // CCCCC N N BBBBBB III RRRRRR
11171 // C C NN N B B I R R
11172 // C N N N B B I R R
11173 // C N N N BBBBBB I RRRRRR
11174 // C N N N B B I R R
11175 // C C N NN B B I R R
11176 // CCCCC N N BBBBBB III R R
11177
11178
11179 // VIF THU 20 NOV 2025 22:21:23 ** CNBIR ** DIAGNOSTICS PAGE 00293
11180
11181
11182 // VIF THU 20 NOV 2025 22:21:23 ** CNBIR ** GENERATED CODE PAGE 00294
11183
11184 int_4 _cnbir (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, complex_8 _p_ v_, int_4
11185 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
11186 { // ** body not listed **
11505 }
11506
11507 // VIF THU 20 NOV 2025 22:21:23 ** CNBSL ** CNBSL PAGE 00301
11508
11509 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11510 // S S U U B B R R O O U U T I NN N E
11511 // S U U B B R R O O U U T I N N N E
11512 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11513 // S U U B B R R O O U U T I N N N E
11514 // S S U U B B R R O O U U T I N NN E
11515 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11516
11517 // CCCCC N N BBBBBB SSSSS L
11518 // C C NN N B B S S L
11519 // C N N N B B S L
11520 // C N N N BBBBBB SSSSS L
11521 // C N N N B B S L
11522 // C C N NN B B S S L
11523 // CCCCC N N BBBBBB SSSSS LLLLLLL
11524
11525
11526 // VIF THU 20 NOV 2025 22:21:23 ** CNBSL ** DIAGNOSTICS PAGE 00302
11527
11528
11529 // VIF THU 20 NOV 2025 22:21:23 ** CNBSL ** GENERATED CODE PAGE 00303
11530
11531 int_4 _cnbsl (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
11532 complex_8 _p_ b_, int_4 _p_ job_)
11533 { // ** body not listed **
11605 }
11606
11607 // VIF THU 20 NOV 2025 22:21:23 ** COMPB ** COMPB PAGE 00305
11608
11609 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11610 // S S U U B B R R O O U U T I NN N E
11611 // S U U B B R R O O U U T I N N N E
11612 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11613 // S U U B B R R O O U U T I N N N E
11614 // S S U U B B R R O O U U T I N NN E
11615 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11616
11617 // CCCCC OOOOO M M PPPPPP BBBBBB
11618 // C C O O MM MM P P B B
11619 // C O O M M M M P P B B
11620 // C O O M M M PPPPPP BBBBBB
11621 // C O O M M P B B
11622 // C C O O M M P B B
11623 // CCCCC OOOOO M M P BBBBBB
11624
11625
11626 // VIF THU 20 NOV 2025 22:21:23 ** COMPB ** DIAGNOSTICS PAGE 00306
11627
11628
11629 // VIF THU 20 NOV 2025 22:21:23 ** COMPB ** GENERATED CODE PAGE 00307
11630
11631 int_4 _compb (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ b_, real_4
11632 _p_ ah_, real_4 _p_ bh_)
11633 { // ** body not listed **
11797 }
11798
11799 // VIF THU 20 NOV 2025 22:21:23 ** COSGEN ** COSGEN PAGE 00311
11800
11801 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11802 // S S U U B B R R O O U U T I NN N E
11803 // S U U B B R R O O U U T I N N N E
11804 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11805 // S U U B B R R O O U U T I N N N E
11806 // S S U U B B R R O O U U T I N NN E
11807 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11808
11809 // CCCCC OOOOO SSSSS GGGGG EEEEEEE N N
11810 // C C O O S S G G E NN N
11811 // C O O S G E N N N
11812 // C O O SSSSS G GGGG EEEEE N N N
11813 // C O O S G G E N N N
11814 // C C O O S S G G E N NN
11815 // CCCCC OOOOO SSSSS GGGGG EEEEEEE N N
11816
11817
11818 // VIF THU 20 NOV 2025 22:21:23 ** COSGEN ** DIAGNOSTICS PAGE 00312
11819
11820
11821 // VIF THU 20 NOV 2025 22:21:23 ** COSGEN ** GENERATED CODE PAGE 00313
11822
11823 int_4 _cosgen (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, real_4 _p_ a_)
11824 { // ** body not listed **
11857 }
11858
11859 // VIF THU 20 NOV 2025 22:21:23 ** CPADD ** CPADD PAGE 00314
11860
11861 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11862 // S S U U B B R R O O U U T I NN N E
11863 // S U U B B R R O O U U T I N N N E
11864 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11865 // S U U B B R R O O U U T I N N N E
11866 // S S U U B B R R O O U U T I N NN E
11867 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11868
11869 // CCCCC PPPPPP A DDDDDD DDDDDD
11870 // C C P P A A D D D D
11871 // C P P A A D D D D
11872 // C PPPPPP A A D D D D
11873 // C P AAAAAAA D D D D
11874 // C C P A A D D D D
11875 // CCCCC P A A DDDDDD DDDDDD
11876
11877
11878 // VIF THU 20 NOV 2025 22:21:23 ** CPADD ** DIAGNOSTICS PAGE 00315
11879
11880
11881 // VIF THU 20 NOV 2025 22:21:23 ** CPADD ** GENERATED CODE PAGE 00316
11882
11883 int_4 _cpadd (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ a_, real_4 _p_ c_, complex_8 _p_ cbp_, real_4 _p_ bp_, real_4
11884 _p_ bh_)
11885 { // ** body not listed **
12181 }
12182
12183 // VIF THU 20 NOV 2025 22:21:23 ** CPEVL ** CPEVL PAGE 00322
12184
12185 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12186 // S S U U B B R R O O U U T I NN N E
12187 // S U U B B R R O O U U T I N N N E
12188 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12189 // S U U B B R R O O U U T I N N N E
12190 // S S U U B B R R O O U U T I N NN E
12191 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12192
12193 // CCCCC PPPPPP EEEEEEE V V L
12194 // C C P P E V V L
12195 // C P P E V V L
12196 // C PPPPPP EEEEE V V L
12197 // C P E V V L
12198 // C C P E V V L
12199 // CCCCC P EEEEEEE V LLLLLLL
12200
12201
12202 // VIF THU 20 NOV 2025 22:21:23 ** CPEVL ** DIAGNOSTICS PAGE 00323
12203
12204
12205 // VIF THU 20 NOV 2025 22:21:23 ** CPEVL ** GENERATED CODE PAGE 00324
12206
12207 int_4 _cpevl (int_4 _p_ n_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ z_, complex_8 _p_ c_, complex_8 _p_ b_,
12208 logical_4 _p_ kbd_)
12209 { // ** body not listed **
12271 }
12272
12273 // VIF THU 20 NOV 2025 22:21:23 ** CPEVLR ** CPEVLR PAGE 00326
12274
12275 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12276 // S S U U B B R R O O U U T I NN N E
12277 // S U U B B R R O O U U T I N N N E
12278 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12279 // S U U B B R R O O U U T I N N N E
12280 // S S U U B B R R O O U U T I N NN E
12281 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12282
12283 // CCCCC PPPPPP EEEEEEE V V L RRRRRR
12284 // C C P P E V V L R R
12285 // C P P E V V L R R
12286 // C PPPPPP EEEEE V V L RRRRRR
12287 // C P E V V L R R
12288 // C C P E V V L R R
12289 // CCCCC P EEEEEEE V LLLLLLL R R
12290
12291
12292 // VIF THU 20 NOV 2025 22:21:23 ** CPEVLR ** DIAGNOSTICS PAGE 00327
12293
12294
12295 // VIF THU 20 NOV 2025 22:21:23 ** CPEVLR ** GENERATED CODE PAGE 00328
12296
12297 int_4 _cpevlr (int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ c_)
12298 { // ** body not listed **
12318 }
12319
12320 // VIF THU 20 NOV 2025 22:21:23 ** CPOFS ** CPOFS PAGE 00329
12321
12322 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12323 // S S U U B B R R O O U U T I NN N E
12324 // S U U B B R R O O U U T I N N N E
12325 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12326 // S U U B B R R O O U U T I N N N E
12327 // S S U U B B R R O O U U T I N NN E
12328 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12329
12330 // CCCCC PPPPPP OOOOO FFFFFFF SSSSS
12331 // C C P P O O F S S
12332 // C P P O O F S
12333 // C PPPPPP O O FFFFF SSSSS
12334 // C P O O F S
12335 // C C P O O F S S
12336 // CCCCC P OOOOO F SSSSS
12337
12338
12339 // VIF THU 20 NOV 2025 22:21:23 ** CPOFS ** DIAGNOSTICS PAGE 00330
12340
12341
12342 // VIF THU 20 NOV 2025 22:21:23 ** CPOFS ** GENERATED CODE PAGE 00331
12343
12344 int_4 _cpofs (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
12345 complex_8 _p_ work_)
12346 { // ** body not listed **
12548 }
12549
12550 // VIF THU 20 NOV 2025 22:21:23 ** CPOIR ** CPOIR PAGE 00335
12551
12552 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12553 // S S U U B B R R O O U U T I NN N E
12554 // S U U B B R R O O U U T I N N N E
12555 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12556 // S U U B B R R O O U U T I N N N E
12557 // S S U U B B R R O O U U T I N NN E
12558 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12559
12560 // CCCCC PPPPPP OOOOO III RRRRRR
12561 // C C P P O O I R R
12562 // C P P O O I R R
12563 // C PPPPPP O O I RRRRRR
12564 // C P O O I R R
12565 // C C P O O I R R
12566 // CCCCC P OOOOO III R R
12567
12568
12569 // VIF THU 20 NOV 2025 22:21:23 ** CPOIR ** DIAGNOSTICS PAGE 00336
12570
12571
12572 // VIF THU 20 NOV 2025 22:21:23 ** CPOIR ** GENERATED CODE PAGE 00337
12573
12574 int_4 _cpoir (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
12575 complex_8 _p_ work_)
12576 { // ** body not listed **
12803 }
12804
12805 // VIF THU 20 NOV 2025 22:21:23 ** CPQR79 ** CPQR79 PAGE 00342
12806
12807 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12808 // S S U U B B R R O O U U T I NN N E
12809 // S U U B B R R O O U U T I N N N E
12810 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12811 // S U U B B R R O O U U T I N N N E
12812 // S S U U B B R R O O U U T I N NN E
12813 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12814
12815 // CCCCC PPPPPP QQQQQ RRRRRR 7777777 99999
12816 // C C P P Q Q R R 7 7 9 9
12817 // C P P Q Q R R 7 9 9
12818 // C PPPPPP Q Q RRRRRR 7 999999
12819 // C P Q Q Q R R 7 9
12820 // C C P Q Q R R 7 9 9
12821 // CCCCC P QQQQ Q R R 7 99999
12822
12823
12824 // VIF THU 20 NOV 2025 22:21:23 ** CPQR79 ** DIAGNOSTICS PAGE 00343
12825
12826
12827 // VIF THU 20 NOV 2025 22:21:23 ** CPQR79 ** GENERATED CODE PAGE 00344
12828
12829 int_4 _cpqr79 (int_4 _p_ ndeg_, complex_8 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
12830 { // ** body not listed **
12883 }
12884
12885 // VIF THU 20 NOV 2025 22:21:23 ** CPROC ** CPROC PAGE 00346
12886
12887 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12888 // S S U U B B R R O O U U T I NN N E
12889 // S U U B B R R O O U U T I N N N E
12890 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12891 // S U U B B R R O O U U T I N N N E
12892 // S S U U B B R R O O U U T I N NN E
12893 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12894
12895 // CCCCC PPPPPP RRRRRR OOOOO CCCCC
12896 // C C P P R R O O C C
12897 // C P P R R O O C
12898 // C PPPPPP RRRRRR O O C
12899 // C P R R O O C
12900 // C C P R R O O C C
12901 // CCCCC P R R OOOOO CCCCC
12902
12903
12904 // VIF THU 20 NOV 2025 22:21:23 ** CPROC ** DIAGNOSTICS PAGE 00347
12905
12906
12907 // VIF THU 20 NOV 2025 22:21:23 ** CPROC ** GENERATED CODE PAGE 00348
12908
12909 int_4 _cproc (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
12910 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
12911 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_)
12912 { // ** body not listed **
13071 }
13072
13073 // VIF THU 20 NOV 2025 22:21:23 ** CPROCP ** CPROCP PAGE 00352
13074
13075 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13076 // S S U U B B R R O O U U T I NN N E
13077 // S U U B B R R O O U U T I N N N E
13078 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13079 // S U U B B R R O O U U T I N N N E
13080 // S S U U B B R R O O U U T I N NN E
13081 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13082
13083 // CCCCC PPPPPP RRRRRR OOOOO CCCCC PPPPPP
13084 // C C P P R R O O C C P P
13085 // C P P R R O O C P P
13086 // C PPPPPP RRRRRR O O C PPPPPP
13087 // C P R R O O C P
13088 // C C P R R O O C C P
13089 // CCCCC P R R OOOOO CCCCC P
13090
13091
13092 // VIF THU 20 NOV 2025 22:21:23 ** CPROCP ** DIAGNOSTICS PAGE 00353
13093
13094
13095 // VIF THU 20 NOV 2025 22:21:23 ** CPROCP ** GENERATED CODE PAGE 00354
13096
13097 int_4 _cprocp (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_,
13098 int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
13099 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_)
13100 { // ** body not listed **
13288 }
13289
13290 // VIF THU 20 NOV 2025 22:21:23 ** CPROD ** CPROD PAGE 00358
13291
13292 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13293 // S S U U B B R R O O U U T I NN N E
13294 // S U U B B R R O O U U T I N N N E
13295 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13296 // S U U B B R R O O U U T I N N N E
13297 // S S U U B B R R O O U U T I N NN E
13298 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13299
13300 // CCCCC PPPPPP RRRRRR OOOOO DDDDDD
13301 // C C P P R R O O D D
13302 // C P P R R O O D D
13303 // C PPPPPP RRRRRR O O D D
13304 // C P R R O O D D
13305 // C C P R R O O D D
13306 // CCCCC P R R OOOOO DDDDDD
13307
13308
13309 // VIF THU 20 NOV 2025 22:21:23 ** CPROD ** DIAGNOSTICS PAGE 00359
13310
13311
13312 // VIF THU 20 NOV 2025 22:21:23 ** CPROD ** GENERATED CODE PAGE 00360
13313
13314 int_4 _cprod (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
13315 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_,
13316 complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_)
13317 { // ** body not listed **
13479 }
13480
13481 // VIF THU 20 NOV 2025 22:21:23 ** CPRODP ** CPRODP PAGE 00364
13482
13483 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13484 // S S U U B B R R O O U U T I NN N E
13485 // S U U B B R R O O U U T I N N N E
13486 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13487 // S U U B B R R O O U U T I N N N E
13488 // S S U U B B R R O O U U T I N NN E
13489 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13490
13491 // CCCCC PPPPPP RRRRRR OOOOO DDDDDD PPPPPP
13492 // C C P P R R O O D D P P
13493 // C P P R R O O D D P P
13494 // C PPPPPP RRRRRR O O D D PPPPPP
13495 // C P R R O O D D P
13496 // C C P R R O O D D P
13497 // CCCCC P R R OOOOO DDDDDD P
13498
13499
13500 // VIF THU 20 NOV 2025 22:21:23 ** CPRODP ** DIAGNOSTICS PAGE 00365
13501
13502
13503 // VIF THU 20 NOV 2025 22:21:23 ** CPRODP ** GENERATED CODE PAGE 00366
13504
13505 int_4 _cprodp (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_,
13506 int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_
13507 , complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_)
13508 { // ** body not listed **
13699 }
13700
13701 // VIF THU 20 NOV 2025 22:21:23 ** CPZERO ** CPZERO PAGE 00370
13702
13703 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13704 // S S U U B B R R O O U U T I NN N E
13705 // S U U B B R R O O U U T I N N N E
13706 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13707 // S U U B B R R O O U U T I N N N E
13708 // S S U U B B R R O O U U T I N NN E
13709 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13710
13711 // CCCCC PPPPPP ZZZZZZZ EEEEEEE RRRRRR OOOOO
13712 // C C P P Z E R R O O
13713 // C P P Z E R R O O
13714 // C PPPPPP Z EEEEE RRRRRR O O
13715 // C P Z E R R O O
13716 // C C P * E R R O O
13717 // CCCCC P ZZZZZZZ EEEEEEE R R OOOOO
13718
13719
13720 // VIF THU 20 NOV 2025 22:21:23 ** CPZERO ** DIAGNOSTICS PAGE 00371
13721
13722
13723 // VIF THU 20 NOV 2025 22:21:23 ** CPZERO ** GENERATED CODE PAGE 00372
13724
13725 int_4 _cpzero (int_4 _p_ in_, complex_8 _p_ a_, complex_8 _p_ r_, complex_8 _p_ t_, int_4 _p_ iflg_, real_4 _p_ s_)
13726 { // ** body not listed **
13851 }
13852
13853 // VIF THU 20 NOV 2025 22:21:23 ** CRATI ** CRATI PAGE 00375
13854
13855 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13856 // S S U U B B R R O O U U T I NN N E
13857 // S U U B B R R O O U U T I N N N E
13858 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13859 // S U U B B R R O O U U T I N N N E
13860 // S S U U B B R R O O U U T I N NN E
13861 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13862
13863 // CCCCC RRRRRR A TTTTTTT III
13864 // C C R R A A T I
13865 // C R R A A T I
13866 // C RRRRRR A A T I
13867 // C R R AAAAAAA T I
13868 // C C R R A A T I
13869 // CCCCC R R A A T III
13870
13871
13872 // VIF THU 20 NOV 2025 22:21:23 ** CRATI ** DIAGNOSTICS PAGE 00376
13873
13874
13875 // VIF THU 20 NOV 2025 22:21:23 ** CRATI ** GENERATED CODE PAGE 00377
13876
13877 int_4 _crati (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ n_, complex_8 _p_ cy_, real_4 _p_ tol_)
13878 { // ** body not listed **
13993 }
13994
13995 // VIF THU 20 NOV 2025 22:21:23 ** CS1S2 ** CS1S2 PAGE 00380
13996
13997 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13998 // S S U U B B R R O O U U T I NN N E
13999 // S U U B B R R O O U U T I N N N E
14000 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14001 // S U U B B R R O O U U T I N N N E
14002 // S S U U B B R R O O U U T I N NN E
14003 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14004
14005 // CCCCC SSSSS 1 SSSSS 22222
14006 // C C S S 11 S S 2 2
14007 // C S 1 1 S 2
14008 // C SSSSS 1 SSSSS 22222
14009 // C S 1 S 2
14010 // C C S S 1 S S 2
14011 // CCCCC SSSSS 11111 SSSSS 2222222
14012
14013
14014 // VIF THU 20 NOV 2025 22:21:23 ** CS1S2 ** DIAGNOSTICS PAGE 00381
14015
14016
14017 // VIF THU 20 NOV 2025 22:21:23 ** CS1S2 ** GENERATED CODE PAGE 00382
14018
14019 int_4 _cs1s2 (complex_8 _p_ zr_, complex_8 _p_ s1_, complex_8 _p_ s2_, int_4 _p_ nz_, real_4 _p_ ascle_, real_4 _p_
14020 alim_, int_4 _p_ iuf_)
14021 { // ** body not listed **
14074 }
14075
14076 // VIF THU 20 NOV 2025 22:21:23 ** CSCALE ** CSCALE PAGE 00384
14077
14078 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14079 // S S U U B B R R O O U U T I NN N E
14080 // S U U B B R R O O U U T I N N N E
14081 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14082 // S U U B B R R O O U U T I N N N E
14083 // S S U U B B R R O O U U T I N NN E
14084 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14085
14086 // CCCCC SSSSS CCCCC A L EEEEEEE
14087 // C C S S C C A A L E
14088 // C S C A A L E
14089 // C SSSSS C A A L EEEEE
14090 // C S C AAAAAAA L E
14091 // C C S S C C A A L E
14092 // CCCCC SSSSS CCCCC A A LLLLLLL EEEEEEE
14093
14094
14095 // VIF THU 20 NOV 2025 22:21:23 ** CSCALE ** DIAGNOSTICS PAGE 00385
14096
14097
14098 // VIF THU 20 NOV 2025 22:21:23 ** CSCALE ** GENERATED CODE PAGE 00386
14099
14100 int_4 _cscale (real_4 _p_ a_, int_4 _p_ nrda_, int_4 _p_ nrow_, int_4 _p_ ncol_, real_4 _p_ cols_, real_4 _p_ colsav_,
14101 real_4 _p_ rows_, real_4 _p_ rowsav_, real_4 _p_ anorm_, real_4 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
14102 { // ** body not listed **
14190 }
14191
14192 // VIF THU 20 NOV 2025 22:21:23 ** CSHCH ** CSHCH PAGE 00388
14193
14194 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14195 // S S U U B B R R O O U U T I NN N E
14196 // S U U B B R R O O U U T I N N N E
14197 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14198 // S U U B B R R O O U U T I N N N E
14199 // S S U U B B R R O O U U T I N NN E
14200 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14201
14202 // CCCCC SSSSS H H CCCCC H H
14203 // C C S S H H C C H H
14204 // C S H H C H H
14205 // C SSSSS HHHHHHH C HHHHHHH
14206 // C S H H C H H
14207 // C C S S H H C C H H
14208 // CCCCC SSSSS H H CCCCC H H
14209
14210
14211 // VIF THU 20 NOV 2025 22:21:23 ** CSHCH ** DIAGNOSTICS PAGE 00389
14212
14213
14214 // VIF THU 20 NOV 2025 22:21:23 ** CSHCH ** GENERATED CODE PAGE 00390
14215
14216 int_4 _cshch (complex_8 _p_ z_, complex_8 _p_ csh_, complex_8 _p_ cch_)
14217 { // ** body not listed **
14233 }
14234
14235 // VIF THU 20 NOV 2025 22:21:23 ** CUCHK ** CUCHK PAGE 00391
14236
14237 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14238 // S S U U B B R R O O U U T I NN N E
14239 // S U U B B R R O O U U T I N N N E
14240 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14241 // S U U B B R R O O U U T I N N N E
14242 // S S U U B B R R O O U U T I N NN E
14243 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14244
14245 // CCCCC U U CCCCC H H K K
14246 // C C U U C C H H K K
14247 // C U U C H H K K
14248 // C U U C HHHHHHH KKK
14249 // C U U C H H K K
14250 // C C U U C C H H K K
14251 // CCCCC UUUUU CCCCC H H K K
14252
14253
14254 // VIF THU 20 NOV 2025 22:21:23 ** CUCHK ** DIAGNOSTICS PAGE 00392
14255
14256
14257 // VIF THU 20 NOV 2025 22:21:23 ** CUCHK ** GENERATED CODE PAGE 00393
14258
14259 int_4 _cuchk (complex_8 _p_ y_, int_4 _p_ nz_, real_4 _p_ ascle_, real_4 _p_ tol_)
14260 { // ** body not listed **
14279 }
14280
14281 // VIF THU 20 NOV 2025 22:21:23 ** CUNHJ ** CUNHJ PAGE 00394
14282
14283 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14284 // S S U U B B R R O O U U T I NN N E
14285 // S U U B B R R O O U U T I N N N E
14286 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14287 // S U U B B R R O O U U T I N N N E
14288 // S S U U B B R R O O U U T I N NN E
14289 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14290
14291 // CCCCC U U N N H H J
14292 // C C U U NN N H H J
14293 // C U U N N N H H J
14294 // C U U N N N HHHHHHH J
14295 // C U U N N N H H J J
14296 // C C U U N NN H H J J
14297 // CCCCC UUUUU N N H H JJJJJ
14298
14299
14300 // VIF THU 20 NOV 2025 22:21:23 ** CUNHJ ** DIAGNOSTICS PAGE 00395
14301
14302
14303 // VIF THU 20 NOV 2025 22:21:23 ** CUNHJ ** GENERATED CODE PAGE 00396
14304
14305 int_4 _cunhj (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ ipmtr_, real_4 _p_ tol_, complex_8 _p_ phi_, complex_8 _p_
14306 arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_)
14307 { // ** body not listed **
18274 }
18275
18276 // VIF THU 20 NOV 2025 22:21:23 ** CUNIK ** CUNIK PAGE 00473
18277
18278 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18279 // S S U U B B R R O O U U T I NN N E
18280 // S U U B B R R O O U U T I N N N E
18281 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18282 // S U U B B R R O O U U T I N N N E
18283 // S S U U B B R R O O U U T I N NN E
18284 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18285
18286 // CCCCC U U N N III K K
18287 // C C U U NN N I K K
18288 // C U U N N N I K K
18289 // C U U N N N I KKK
18290 // C U U N N N I K K
18291 // C C U U N NN I K K
18292 // CCCCC UUUUU N N III K K
18293
18294
18295 // VIF THU 20 NOV 2025 22:21:23 ** CUNIK ** DIAGNOSTICS PAGE 00474
18296
18297
18298 // VIF THU 20 NOV 2025 22:21:23 ** CUNIK ** GENERATED CODE PAGE 00475
18299
18300 int_4 _cunik (complex_8 _p_ zr_, real_4 _p_ fnu_, int_4 _p_ ikflg_, int_4 _p_ ipmtr_, real_4 _p_ tol_, int_4 _p_ init_,
18301 complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_)
18302 { // ** body not listed **
19213 }
19214
19215 // VIF THU 20 NOV 2025 22:21:23 ** CV ** CV PAGE 00493
19216
19217 // RRRRRR EEEEEEE A L 4
19218 // R R E A A L * * 4 4
19219 // R R E A A L * * 4 4
19220 // RRRRRR EEEEE A A L ******* 4444444
19221 // R R E AAAAAAA L * * 4
19222 // R R E A A L * * 4
19223 // R R EEEEEEE A A LLLLLLL 4
19224
19225 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
19226 // F U U NN N C C T I O O NN N
19227 // F U U N N N C T I O O N N N
19228 // FFFFF U U N N N C T I O O N N N
19229 // F U U N N N C T I O O N N N
19230 // F U U N NN C C T I O O N NN
19231 // F UUUUU N N CCCCC T III OOOOO N N
19232
19233 // CCCCC V V
19234 // C C V V
19235 // C V V
19236 // C V V
19237 // C V V
19238 // C C V V
19239 // CCCCC V
19240
19241
19242 // VIF THU 20 NOV 2025 22:21:23 ** CV ** DIAGNOSTICS PAGE 00494
19243
19244
19245 // VIF THU 20 NOV 2025 22:21:23 ** CV ** GENERATED CODE PAGE 00495
19246
19247 real_4 _cv (real_4 _p_ xval_, int_4 _p_ ndata_, int_4 _p_ nconst_, int_4 _p_ nord_, int_4 _p_ nbkpt_, real_4 _p_ bkpt_,
19248 real_4 _p_ w_)
19249 { // ** body not listed **
19279 }
19280
19281 // VIF THU 20 NOV 2025 22:21:23 ** D1MERG ** D1MERG PAGE 00496
19282
19283 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19284 // S S U U B B R R O O U U T I NN N E
19285 // S U U B B R R O O U U T I N N N E
19286 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19287 // S U U B B R R O O U U T I N N N E
19288 // S S U U B B R R O O U U T I N NN E
19289 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19290
19291 // DDDDDD 1 M M EEEEEEE RRRRRR GGGGG
19292 // D D 11 MM MM E R R G G
19293 // D D 1 1 M M M M E R R G
19294 // D D 1 M M M EEEEE RRRRRR G GGGG
19295 // D D 1 M M E R R G G
19296 // D D 1 M M E R R G G
19297 // DDDDDD 11111 M M EEEEEEE R R GGGGG
19298
19299
19300 // VIF THU 20 NOV 2025 22:21:23 ** D1MERG ** DIAGNOSTICS PAGE 00497
19301
19302
19303 // VIF THU 20 NOV 2025 22:21:23 ** D1MERG ** GENERATED CODE PAGE 00498
19304
19305 int_4 _d1merg (real_8 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
19306 { // ** body not listed **
19345 }
19346
19347 // VIF THU 20 NOV 2025 22:21:23 ** D1MPYQ ** D1MPYQ PAGE 00499
19348
19349 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19350 // S S U U B B R R O O U U T I NN N E
19351 // S U U B B R R O O U U T I N N N E
19352 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19353 // S U U B B R R O O U U T I N N N E
19354 // S S U U B B R R O O U U T I N NN E
19355 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19356
19357 // DDDDDD 1 M M PPPPPP Y Y QQQQQ
19358 // D D 11 MM MM P P Y Y Q Q
19359 // D D 1 1 M M M M P P Y Y Q Q
19360 // D D 1 M M M PPPPPP Y Q Q
19361 // D D 1 M M P Y Q Q Q
19362 // D D 1 M M P Y Q Q
19363 // DDDDDD 11111 M M P Y QQQQ Q
19364
19365
19366 // VIF THU 20 NOV 2025 22:21:23 ** D1MPYQ ** DIAGNOSTICS PAGE 00500
19367
19368
19369 // VIF THU 20 NOV 2025 22:21:23 ** D1MPYQ ** GENERATED CODE PAGE 00501
19370
19371 int_4 _d1mpyq (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ lda_, real_8 _p_ v_, real_8 _p_ w_)
19372 { // ** body not listed **
19438 }
19439
19440 // VIF THU 20 NOV 2025 22:21:23 ** D1UPDT ** D1UPDT PAGE 00503
19441
19442 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19443 // S S U U B B R R O O U U T I NN N E
19444 // S U U B B R R O O U U T I N N N E
19445 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19446 // S U U B B R R O O U U T I N N N E
19447 // S S U U B B R R O O U U T I N NN E
19448 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19449
19450 // DDDDDD 1 U U PPPPPP DDDDDD TTTTTTT
19451 // D D 11 U U P P D D T
19452 // D D 1 1 U U P P D D T
19453 // D D 1 U U PPPPPP D D T
19454 // D D 1 U U P D D T
19455 // D D 1 U U P D D T
19456 // DDDDDD 11111 UUUUU P DDDDDD T
19457
19458
19459 // VIF THU 20 NOV 2025 22:21:23 ** D1UPDT ** DIAGNOSTICS PAGE 00504
19460
19461
19462 // VIF THU 20 NOV 2025 22:21:23 ** D1UPDT ** GENERATED CODE PAGE 00505
19463
19464 int_4 _d1updt (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ s_, int_4 _p_ ls_, real_8 _p_ u_, real_8 _p_ v_, real_8 _p_ w_,
19465 logical_4 _p_ sing_)
19466 { // ** body not listed **
19605 }
19606
19607 // VIF THU 20 NOV 2025 22:21:23 ** DASYIK ** DASYIK PAGE 00508
19608
19609 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19610 // S S U U B B R R O O U U T I NN N E
19611 // S U U B B R R O O U U T I N N N E
19612 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19613 // S U U B B R R O O U U T I N N N E
19614 // S S U U B B R R O O U U T I N NN E
19615 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19616
19617 // DDDDDD A SSSSS Y Y III K K
19618 // D D A A S S Y Y I K K
19619 // D D A A S Y Y I K K
19620 // D D A A SSSSS Y I KKK
19621 // D D AAAAAAA S Y I K K
19622 // D D A A S S Y I K K
19623 // DDDDDD A A SSSSS Y III K K
19624
19625
19626 // VIF THU 20 NOV 2025 22:21:23 ** DASYIK ** DIAGNOSTICS PAGE 00509
19627
19628
19629 // VIF THU 20 NOV 2025 22:21:23 ** DASYIK ** GENERATED CODE PAGE 00510
19630
19631 int_4 _dasyik (real_8 _p_ x_, real_8 _p_ fnu_, int_4 _p_ kode_, real_8 _p_ flgik_, real_8 _p_ ra_, real_8 _p_ arg_,
19632 int_4 _p_ in_, real_8 _p_ y_)
19633 { // ** body not listed **
20127 }
20128
20129 // VIF THU 20 NOV 2025 22:21:23 ** DAVINT ** DAVINT PAGE 00520
20130
20131 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20132 // S S U U B B R R O O U U T I NN N E
20133 // S U U B B R R O O U U T I N N N E
20134 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20135 // S U U B B R R O O U U T I N N N E
20136 // S S U U B B R R O O U U T I N NN E
20137 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20138
20139 // DDDDDD A V V III N N TTTTTTT
20140 // D D A A V V I NN N T
20141 // D D A A V V I N N N T
20142 // D D A A V V I N N N T
20143 // D D AAAAAAA V V I N N N T
20144 // D D A A V V I N NN T
20145 // DDDDDD A A V III N N T
20146
20147
20148 // VIF THU 20 NOV 2025 22:21:23 ** DAVINT ** DIAGNOSTICS PAGE 00521
20149
20150
20151 // VIF THU 20 NOV 2025 22:21:23 ** DAVINT ** GENERATED CODE PAGE 00522
20152
20153 int_4 _davint (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ n_, real_8 _p_ xlo_, real_8 _p_ xup_, real_8 _p_ ans_, int_4 _p_
20154 ierr_)
20155 { // ** body not listed **
20303 }
20304
20305 // VIF THU 20 NOV 2025 22:21:23 ** DBDIFF ** DBDIFF PAGE 00525
20306
20307 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20308 // S S U U B B R R O O U U T I NN N E
20309 // S U U B B R R O O U U T I N N N E
20310 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20311 // S U U B B R R O O U U T I N N N E
20312 // S S U U B B R R O O U U T I N NN E
20313 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20314
20315 // DDDDDD BBBBBB DDDDDD III FFFFFFF FFFFFFF
20316 // D D B B D D I F F
20317 // D D B B D D I F F
20318 // D D BBBBBB D D I FFFFF FFFFF
20319 // D D B B D D I F F
20320 // D D B B D D I F F
20321 // DDDDDD BBBBBB DDDDDD III F F
20322
20323
20324 // VIF THU 20 NOV 2025 22:21:23 ** DBDIFF ** DIAGNOSTICS PAGE 00526
20325
20326
20327 // VIF THU 20 NOV 2025 22:21:23 ** DBDIFF ** GENERATED CODE PAGE 00527
20328
20329 int_4 _dbdiff (int_4 _p_ l_, real_8 _p_ v_)
20330 { // ** body not listed **
20345 }
20346
20347 // VIF THU 20 NOV 2025 22:21:23 ** DBKSOL ** DBKSOL PAGE 00528
20348
20349 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20350 // S S U U B B R R O O U U T I NN N E
20351 // S U U B B R R O O U U T I N N N E
20352 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20353 // S U U B B R R O O U U T I N N N E
20354 // S S U U B B R R O O U U T I N NN E
20355 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20356
20357 // DDDDDD BBBBBB K K SSSSS OOOOO L
20358 // D D B B K K S S O O L
20359 // D D B B K K S O O L
20360 // D D BBBBBB KKK SSSSS O O L
20361 // D D B B K K S O O L
20362 // D D B B K K S S O O L
20363 // DDDDDD BBBBBB K K SSSSS OOOOO LLLLLLL
20364
20365
20366 // VIF THU 20 NOV 2025 22:21:23 ** DBKSOL ** DIAGNOSTICS PAGE 00529
20367
20368
20369 // VIF THU 20 NOV 2025 22:21:23 ** DBKSOL ** GENERATED CODE PAGE 00530
20370
20371 int_4 _dbksol (int_4 _p_ n_, real_8 _p_ a_, real_8 _p_ x_)
20372 { // ** body not listed **
20389 }
20390
20391 // VIF THU 20 NOV 2025 22:21:23 ** DBNDAC ** DBNDAC PAGE 00531
20392
20393 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20394 // S S U U B B R R O O U U T I NN N E
20395 // S U U B B R R O O U U T I N N N E
20396 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20397 // S U U B B R R O O U U T I N N N E
20398 // S S U U B B R R O O U U T I N NN E
20399 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20400
20401 // DDDDDD BBBBBB N N DDDDDD A CCCCC
20402 // D D B B NN N D D A A C C
20403 // D D B B N N N D D A A C
20404 // D D BBBBBB N N N D D A A C
20405 // D D B B N N N D D AAAAAAA C
20406 // D D B B N NN D D A A C C
20407 // DDDDDD BBBBBB N N DDDDDD A A CCCCC
20408
20409
20410 // VIF THU 20 NOV 2025 22:21:23 ** DBNDAC ** DIAGNOSTICS PAGE 00532
20411
20412
20413 // VIF THU 20 NOV 2025 22:21:23 ** DBNDAC ** GENERATED CODE PAGE 00533
20414
20415 int_4 _dbndac (real_8 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, int_4 _p_ mt_, int_4 _p_ jt_
20416 )
20417 { // ** body not listed **
20495 }
20496
20497 // VIF THU 20 NOV 2025 22:21:23 ** DBNDSL ** DBNDSL PAGE 00535
20498
20499 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20500 // S S U U B B R R O O U U T I NN N E
20501 // S U U B B R R O O U U T I N N N E
20502 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20503 // S U U B B R R O O U U T I N N N E
20504 // S S U U B B R R O O U U T I N NN E
20505 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20506
20507 // DDDDDD BBBBBB N N DDDDDD SSSSS L
20508 // D D B B NN N D D S S L
20509 // D D B B N N N D D S L
20510 // D D BBBBBB N N N D D SSSSS L
20511 // D D B B N N N D D S L
20512 // D D B B N NN D D S S L
20513 // DDDDDD BBBBBB N N DDDDDD SSSSS LLLLLLL
20514
20515
20516 // VIF THU 20 NOV 2025 22:21:23 ** DBNDSL ** DIAGNOSTICS PAGE 00536
20517
20518
20519 // VIF THU 20 NOV 2025 22:21:23 ** DBNDSL ** GENERATED CODE PAGE 00537
20520
20521 int_4 _dbndsl (int_4 _p_ mode_, real_8 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, real_8 _p_
20522 x_, int_4 _p_ n_, real_8 _p_ rnorm_)
20523 { // ** body not listed **
20613 }
20614
20615 // VIF THU 20 NOV 2025 22:21:23 ** DBOCLS ** DBOCLS PAGE 00539
20616
20617 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20618 // S S U U B B R R O O U U T I NN N E
20619 // S U U B B R R O O U U T I N N N E
20620 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20621 // S U U B B R R O O U U T I N N N E
20622 // S S U U B B R R O O U U T I N NN E
20623 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20624
20625 // DDDDDD BBBBBB OOOOO CCCCC L SSSSS
20626 // D D B B O O C C L S S
20627 // D D B B O O C L S
20628 // D D BBBBBB O O C L SSSSS
20629 // D D B B O O C L S
20630 // D D B B O O C C L S S
20631 // DDDDDD BBBBBB OOOOO CCCCC LLLLLLL SSSSS
20632
20633
20634 // VIF THU 20 NOV 2025 22:21:23 ** DBOCLS ** DIAGNOSTICS PAGE 00540
20635
20636
20637 // VIF THU 20 NOV 2025 22:21:23 ** DBOCLS ** GENERATED CODE PAGE 00541
20638
20639 int_4 _dbocls (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mcon_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_8 _p_ bl_,
20640 real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnormc_, real_8 _p_ rnorm_, int_4 _p_ mode_,
20641 real_8 _p_ rw_, int_4 _p_ iw_)
20642 { // ** body not listed **
22259 }
22260
22261 // VIF THU 20 NOV 2025 22:21:23 ** DBOLS ** DBOLS PAGE 00573
22262
22263 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
22264 // S S U U B B R R O O U U T I NN N E
22265 // S U U B B R R O O U U T I N N N E
22266 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
22267 // S U U B B R R O O U U T I N N N E
22268 // S S U U B B R R O O U U T I N NN E
22269 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
22270
22271 // DDDDDD BBBBBB OOOOO L SSSSS
22272 // D D B B O O L S S
22273 // D D B B O O L S
22274 // D D BBBBBB O O L SSSSS
22275 // D D B B O O L S
22276 // D D B B O O L S S
22277 // DDDDDD BBBBBB OOOOO LLLLLLL SSSSS
22278
22279
22280 // VIF THU 20 NOV 2025 22:21:23 ** DBOLS ** DIAGNOSTICS PAGE 00574
22281
22282
22283 // VIF THU 20 NOV 2025 22:21:23 ** DBOLS ** GENERATED CODE PAGE 00575
22284
22285 int_4 _dbols (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_8 _p_ bl_, real_8 _p_ bu_, int_4
22286 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, int_4 _p_ iw_)
22287 { // ** body not listed **
23702 }
23703
23704 // VIF THU 20 NOV 2025 22:21:23 ** DBOLSM ** DBOLSM PAGE 00603
23705
23706 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23707 // S S U U B B R R O O U U T I NN N E
23708 // S U U B B R R O O U U T I N N N E
23709 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23710 // S U U B B R R O O U U T I N N N E
23711 // S S U U B B R R O O U U T I N NN E
23712 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23713
23714 // DDDDDD BBBBBB OOOOO L SSSSS M M
23715 // D D B B O O L S S MM MM
23716 // D D B B O O L S M M M M
23717 // D D BBBBBB O O L SSSSS M M M
23718 // D D B B O O L S M M
23719 // D D B B O O L S S M M
23720 // DDDDDD BBBBBB OOOOO LLLLLLL SSSSS M M
23721
23722
23723 // VIF THU 20 NOV 2025 22:21:23 ** DBOLSM ** DIAGNOSTICS PAGE 00604
23724
23725
23726 // VIF THU 20 NOV 2025 22:21:23 ** DBOLSM ** GENERATED CODE PAGE 00605
23727
23728 int_4 _dbolsm (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ minput_, int_4 _p_ ncols_, real_8 _p_ bl_, real_8 _p_ bu_,
23729 int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, real_8 _p_ ww_,
23730 real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
23731 { // ** body not listed **
25545 }
25546 // VIF THU 20 NOV 2025 22:21:23 ** DBOLSM ** GENERATED CODE PAGE 00640
25547
25548
25549 // VIF THU 20 NOV 2025 22:21:23 ** DBSGQ8 ** DBSGQ8 PAGE 00641
25550
25551 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25552 // S S U U B B R R O O U U T I NN N E
25553 // S U U B B R R O O U U T I N N N E
25554 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25555 // S U U B B R R O O U U T I N N N E
25556 // S S U U B B R R O O U U T I N NN E
25557 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25558
25559 // DDDDDD BBBBBB SSSSS GGGGG QQQQQ 88888
25560 // D D B B S S G G Q Q 8 8
25561 // D D B B S G Q Q 8 8
25562 // D D BBBBBB SSSSS G GGGG Q Q 88888
25563 // D D B B S G G Q Q Q 8 8
25564 // D D B B S S G G Q Q 8 8
25565 // DDDDDD BBBBBB SSSSS GGGGG QQQQ Q 88888
25566
25567
25568 // VIF THU 20 NOV 2025 22:21:23 ** DBSGQ8 ** DIAGNOSTICS PAGE 00642
25569
25570
25571 // VIF THU 20 NOV 2025 22:21:23 ** DBSGQ8 ** GENERATED CODE PAGE 00643
25572
25573 int_4 _dbsgq8 (real_8 (*_fun)(), real_8 _p_ xt_, real_8 _p_ bc_, int_4 _p_ n_, int_4 _p_ kk_, int_4 _p_ id_, real_8 _p_
25574 a_, real_8 _p_ b_, int_4 _p_ inbv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_, real_8 _p_ work_)
25575 { // ** body not listed **
25868 }
25869
25870 // VIF THU 20 NOV 2025 22:21:23 ** DCFOD ** DCFOD PAGE 00649
25871
25872 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25873 // S S U U B B R R O O U U T I NN N E
25874 // S U U B B R R O O U U T I N N N E
25875 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25876 // S U U B B R R O O U U T I N N N E
25877 // S S U U B B R R O O U U T I N NN E
25878 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25879
25880 // DDDDDD CCCCC FFFFFFF OOOOO DDDDDD
25881 // D D C C F O O D D
25882 // D D C F O O D D
25883 // D D C FFFFF O O D D
25884 // D D C F O O D D
25885 // D D C C F O O D D
25886 // DDDDDD CCCCC F OOOOO DDDDDD
25887
25888
25889 // VIF THU 20 NOV 2025 22:21:23 ** DCFOD ** DIAGNOSTICS PAGE 00650
25890
25891
25892 // VIF THU 20 NOV 2025 22:21:23 ** DCFOD ** GENERATED CODE PAGE 00651
25893
25894 int_4 _dcfod (int_4 _p_ meth_, real_8 _p_ elco_, real_8 _p_ tesco_)
25895 { // ** body not listed **
25972 }
25973
25974 // VIF THU 20 NOV 2025 22:21:23 ** DCKDER ** DCKDER PAGE 00653
25975
25976 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25977 // S S U U B B R R O O U U T I NN N E
25978 // S U U B B R R O O U U T I N N N E
25979 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25980 // S U U B B R R O O U U T I N N N E
25981 // S S U U B B R R O O U U T I N NN E
25982 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25983
25984 // DDDDDD CCCCC K K DDDDDD EEEEEEE RRRRRR
25985 // D D C C K K D D E R R
25986 // D D C K K D D E R R
25987 // D D C KKK D D EEEEE RRRRRR
25988 // D D C K K D D E R R
25989 // D D C C K K D D E R R
25990 // DDDDDD CCCCC K K DDDDDD EEEEEEE R R
25991
25992
25993 // VIF THU 20 NOV 2025 22:21:23 ** DCKDER ** DIAGNOSTICS PAGE 00654
25994
25995
25996 // VIF THU 20 NOV 2025 22:21:23 ** DCKDER ** GENERATED CODE PAGE 00655
25997
25998 int_4 _dckder (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4 _p_ ldfjac_, real_8
25999 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_)
26000 { // ** body not listed **
26077 }
26078
26079 // VIF THU 20 NOV 2025 22:21:23 ** DCOEF ** DCOEF PAGE 00657
26080
26081 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26082 // S S U U B B R R O O U U T I NN N E
26083 // S U U B B R R O O U U T I N N N E
26084 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26085 // S U U B B R R O O U U T I N N N E
26086 // S S U U B B R R O O U U T I N NN E
26087 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26088
26089 // DDDDDD CCCCC OOOOO EEEEEEE FFFFFFF
26090 // D D C C O O E F
26091 // D D C O O E F
26092 // D D C O O EEEEE FFFFF
26093 // D D C O O E F
26094 // D D C C O O E F
26095 // DDDDDD CCCCC OOOOO EEEEEEE F
26096
26097
26098 // VIF THU 20 NOV 2025 22:21:23 ** DCOEF ** DIAGNOSTICS PAGE 00658
26099
26100
26101 // VIF THU 20 NOV 2025 22:21:23 ** DCOEF ** GENERATED CODE PAGE 00659
26102
26103 int_4 _dcoef (real_8 _p_ yh_, real_8 _p_ yp_, int_4 _p_ ncomp_, int_4 _p_ nrowb_, int_4 _p_ nfc_, int_4 _p_ nic_,
26104 real_8 _p_ b_, real_8 _p_ beta_, real_8 _p_ coef_, int_4 _p_ inhomo_, real_8 _p_ re_, real_8 _p_ ae_, real_8 _p_ by_,
26105 real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
26106 { // ** body not listed **
26244 }
26245
26246 // VIF THU 20 NOV 2025 22:21:23 ** DCOV ** DCOV PAGE 00662
26247
26248 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26249 // S S U U B B R R O O U U T I NN N E
26250 // S U U B B R R O O U U T I N N N E
26251 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26252 // S U U B B R R O O U U T I N N N E
26253 // S S U U B B R R O O U U T I N NN E
26254 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26255
26256 // DDDDDD CCCCC OOOOO V V
26257 // D D C C O O V V
26258 // D D C O O V V
26259 // D D C O O V V
26260 // D D C O O V V
26261 // D D C C O O V V
26262 // DDDDDD CCCCC OOOOO V
26263
26264
26265 // VIF THU 20 NOV 2025 22:21:23 ** DCOV ** DIAGNOSTICS PAGE 00663
26266
26267
26268 // VIF THU 20 NOV 2025 22:21:23 ** DCOV ** GENERATED CODE PAGE 00664
26269
26270 int_4 _dcov (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_
26271 r_, int_4 _p_ ldr_, int_4 _p_ info_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
26272 { // ** body not listed **
26417 }
26418
26419 // VIF THU 20 NOV 2025 22:21:23 ** DCSCAL ** DCSCAL PAGE 00667
26420
26421 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26422 // S S U U B B R R O O U U T I NN N E
26423 // S U U B B R R O O U U T I N N N E
26424 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26425 // S U U B B R R O O U U T I N N N E
26426 // S S U U B B R R O O U U T I N NN E
26427 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26428
26429 // DDDDDD CCCCC SSSSS CCCCC A L
26430 // D D C C S S C C A A L
26431 // D D C S C A A L
26432 // D D C SSSSS C A A L
26433 // D D C S C AAAAAAA L
26434 // D D C C S S C C A A L
26435 // DDDDDD CCCCC SSSSS CCCCC A A LLLLLLL
26436
26437
26438 // VIF THU 20 NOV 2025 22:21:23 ** DCSCAL ** DIAGNOSTICS PAGE 00668
26439
26440
26441 // VIF THU 20 NOV 2025 22:21:23 ** DCSCAL ** GENERATED CODE PAGE 00669
26442
26443 int_4 _dcscal (real_8 _p_ a_, int_4 _p_ nrda_, int_4 _p_ nrow_, int_4 _p_ ncol_, real_8 _p_ cols_, real_8 _p_ colsav_,
26444 real_8 _p_ rows_, real_8 _p_ rowsav_, real_8 _p_ anorm_, real_8 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
26445 { // ** body not listed **
26533 }
26534
26535 // VIF THU 20 NOV 2025 22:21:23 ** DCV ** DCV PAGE 00671
26536
26537 // RRRRRR EEEEEEE A L 88888
26538 // R R E A A L * * 8 8
26539 // R R E A A L * * 8 8
26540 // RRRRRR EEEEE A A L ******* 88888
26541 // R R E AAAAAAA L * * 8 8
26542 // R R E A A L * * 8 8
26543 // R R EEEEEEE A A LLLLLLL 88888
26544
26545 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
26546 // F U U NN N C C T I O O NN N
26547 // F U U N N N C T I O O N N N
26548 // FFFFF U U N N N C T I O O N N N
26549 // F U U N N N C T I O O N N N
26550 // F U U N NN C C T I O O N NN
26551 // F UUUUU N N CCCCC T III OOOOO N N
26552
26553 // DDDDDD CCCCC V V
26554 // D D C C V V
26555 // D D C V V
26556 // D D C V V
26557 // D D C V V
26558 // D D C C V V
26559 // DDDDDD CCCCC V
26560
26561
26562 // VIF THU 20 NOV 2025 22:21:23 ** DCV ** DIAGNOSTICS PAGE 00672
26563
26564
26565 // VIF THU 20 NOV 2025 22:21:23 ** DCV ** GENERATED CODE PAGE 00673
26566
26567 real_8 _dcv (real_8 _p_ xval_, int_4 _p_ ndata_, int_4 _p_ nconst_, int_4 _p_ nord_, int_4 _p_ nbkpt_, real_8 _p_ bkpt_
26568 , real_8 _p_ w_)
26569 { // ** body not listed **
26599 }
26600
26601 // VIF THU 20 NOV 2025 22:21:23 ** DDES ** DDES PAGE 00674
26602
26603 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26604 // S S U U B B R R O O U U T I NN N E
26605 // S U U B B R R O O U U T I N N N E
26606 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26607 // S U U B B R R O O U U T I N N N E
26608 // S S U U B B R R O O U U T I N NN E
26609 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26610
26611 // DDDDDD DDDDDD EEEEEEE SSSSS
26612 // D D D D E S S
26613 // D D D D E S
26614 // D D D D EEEEE SSSSS
26615 // D D D D E S
26616 // D D D D E S S
26617 // DDDDDD DDDDDD EEEEEEE SSSSS
26618
26619
26620 // VIF THU 20 NOV 2025 22:21:23 ** DDES ** DIAGNOSTICS PAGE 00675
26621
26622
26623 // VIF THU 20 NOV 2025 22:21:23 ** DDES ** GENERATED CODE PAGE 00676
26624
26625 int_4 _ddes (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ tout_, int_4 _p_ info_, real_8
26626 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ ypout_, real_8 _p_ yp_, real_8 _p_ yy_, real_8 _p_ wt_, real_8
26627 _p_ p_, real_8 _p_ phi_, real_8 _p_ alpha_, real_8 _p_ beta_, real_8 _p_ psi_, real_8 _p_ v_, real_8 _p_ w_, real_8 _p_
26628 sig_, real_8 _p_ g_, real_8 _p_ gi_, real_8 _p_ h_, real_8 _p_ eps_, real_8 _p_ x_, real_8 _p_ xold_, real_8 _p_ hold_,
26629 real_8 _p_ told_, real_8 _p_ delsgn_, real_8 _p_ tstop_, real_8 _p_ twou_, real_8 _p_ fouru_, logical_4 _p_ start_,
26630 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
26631 kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_, int_4
26632 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_)
26633 { // ** body not listed **
27564 }
27565
27566 // VIF THU 20 NOV 2025 22:21:23 ** DDOGLG ** DDOGLG PAGE 00695
27567
27568 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
27569 // S S U U B B R R O O U U T I NN N E
27570 // S U U B B R R O O U U T I N N N E
27571 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
27572 // S U U B B R R O O U U T I N N N E
27573 // S S U U B B R R O O U U T I N NN E
27574 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
27575
27576 // DDDDDD DDDDDD OOOOO GGGGG L GGGGG
27577 // D D D D O O G G L G G
27578 // D D D D O O G L G
27579 // D D D D O O G GGGG L G GGGG
27580 // D D D D O O G G L G G
27581 // D D D D O O G G L G G
27582 // DDDDDD DDDDDD OOOOO GGGGG LLLLLLL GGGGG
27583
27584
27585 // VIF THU 20 NOV 2025 22:21:23 ** DDOGLG ** DIAGNOSTICS PAGE 00696
27586
27587
27588 // VIF THU 20 NOV 2025 22:21:23 ** DDOGLG ** GENERATED CODE PAGE 00697
27589
27590 int_4 _ddoglg (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ lr_, real_8 _p_ diag_, real_8 _p_ qtb_, real_8 _p_ delta_, real_8
27591 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_)
27592 { // ** body not listed **
27707 }
27708
27709 // VIF THU 20 NOV 2025 22:21:23 ** DEFCMN ** DEFCMN PAGE 00700
27710
27711 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
27712 // S S U U B B R R O O U U T I NN N E
27713 // S U U B B R R O O U U T I N N N E
27714 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
27715 // S U U B B R R O O U U T I N N N E
27716 // S S U U B B R R O O U U T I N NN E
27717 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
27718
27719 // DDDDDD EEEEEEE FFFFFFF CCCCC M M N N
27720 // D D E F C C MM MM NN N
27721 // D D E F C M M M M N N N
27722 // D D EEEEE FFFFF C M M M N N N
27723 // D D E F C M M N N N
27724 // D D E F C C M M N NN
27725 // DDDDDD EEEEEEE F CCCCC M M N N
27726
27727
27728 // VIF THU 20 NOV 2025 22:21:23 ** DEFCMN ** DIAGNOSTICS PAGE 00701
27729
27730
27731 // VIF THU 20 NOV 2025 22:21:23 ** DEFCMN ** GENERATED CODE PAGE 00702
27732
27733 int_4 _defcmn (int_4 _p_ ndata_, real_8 _p_ xdata_, real_8 _p_ ydata_, real_8 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
27734 nbkpt_, real_8 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8 _p_ xtemp_,
27735 real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_ g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ lw_)
27736 { // ** body not listed **
27941 }
27942
27943 // VIF THU 20 NOV 2025 22:21:23 ** DEFE4 ** DEFE4 PAGE 00707
27944
27945 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
27946 // S S U U B B R R O O U U T I NN N E
27947 // S U U B B R R O O U U T I N N N E
27948 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
27949 // S U U B B R R O O U U T I N N N E
27950 // S S U U B B R R O O U U T I N NN E
27951 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
27952
27953 // DDDDDD EEEEEEE FFFFFFF EEEEEEE 4
27954 // D D E F E 4 4
27955 // D D E F E 4 4
27956 // D D EEEEE FFFFF EEEEE 4444444
27957 // D D E F E 4
27958 // D D E F E 4
27959 // DDDDDD EEEEEEE F EEEEEEE 4
27960
27961
27962 // VIF THU 20 NOV 2025 22:21:23 ** DEFE4 ** DIAGNOSTICS PAGE 00708
27963
27964
27965 // VIF THU 20 NOV 2025 22:21:23 ** DEFE4 ** GENERATED CODE PAGE 00709
27966
27967 int_4 _defe4 (int_4 (*_cofx)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
27968 { // ** body not listed **
28000 }
28001
28002 // VIF THU 20 NOV 2025 22:21:23 ** DEFEHL ** DEFEHL PAGE 00710
28003
28004 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
28005 // S S U U B B R R O O U U T I NN N E
28006 // S U U B B R R O O U U T I N N N E
28007 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
28008 // S U U B B R R O O U U T I N N N E
28009 // S S U U B B R R O O U U T I N NN E
28010 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
28011
28012 // DDDDDD EEEEEEE FFFFFFF EEEEEEE H H L
28013 // D D E F E H H L
28014 // D D E F E H H L
28015 // D D EEEEE FFFFF EEEEE HHHHHHH L
28016 // D D E F E H H L
28017 // D D E F E H H L
28018 // DDDDDD EEEEEEE F EEEEEEE H H LLLLLLL
28019
28020
28021 // VIF THU 20 NOV 2025 22:21:23 ** DEFEHL ** DIAGNOSTICS PAGE 00711
28022
28023
28024 // VIF THU 20 NOV 2025 22:21:23 ** DEFEHL ** GENERATED CODE PAGE 00712
28025
28026 int_4 _defehl (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ h_, real_4 _p_ yp_, real_4 _p_
28027 f1_, real_4 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ rpar_, int_4 _p_ ipar_)
28028 { // ** body not listed **
28066 }
28067
28068 // VIF THU 20 NOV 2025 22:21:23 ** DEFER ** DEFER PAGE 00713
28069
28070 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
28071 // S S U U B B R R O O U U T I NN N E
28072 // S U U B B R R O O U U T I N N N E
28073 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
28074 // S U U B B R R O O U U T I N N N E
28075 // S S U U B B R R O O U U T I N NN E
28076 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
28077
28078 // DDDDDD EEEEEEE FFFFFFF EEEEEEE RRRRRR
28079 // D D E F E R R
28080 // D D E F E R R
28081 // D D EEEEE FFFFF EEEEE RRRRRR
28082 // D D E F E R R
28083 // D D E F E R R
28084 // DDDDDD EEEEEEE F EEEEEEE R R
28085
28086
28087 // VIF THU 20 NOV 2025 22:21:23 ** DEFER ** DIAGNOSTICS PAGE 00714
28088
28089
28090 // VIF THU 20 NOV 2025 22:21:23 ** DEFER ** GENERATED CODE PAGE 00715
28091
28092 int_4 _defer (int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
28093 { // ** body not listed **
28127 }
28128
28129 // VIF THU 20 NOV 2025 22:21:23 ** DENORM ** DENORM PAGE 00716
28130
28131 // RRRRRR EEEEEEE A L 88888
28132 // R R E A A L * * 8 8
28133 // R R E A A L * * 8 8
28134 // RRRRRR EEEEE A A L ******* 88888
28135 // R R E AAAAAAA L * * 8 8
28136 // R R E A A L * * 8 8
28137 // R R EEEEEEE A A LLLLLLL 88888
28138
28139 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
28140 // F U U NN N C C T I O O NN N
28141 // F U U N N N C T I O O N N N
28142 // FFFFF U U N N N C T I O O N N N
28143 // F U U N N N C T I O O N N N
28144 // F U U N NN C C T I O O N NN
28145 // F UUUUU N N CCCCC T III OOOOO N N
28146
28147 // DDDDDD EEEEEEE N N OOOOO RRRRRR M M
28148 // D D E NN N O O R R MM MM
28149 // D D E N N N O O R R M M M M
28150 // D D EEEEE N N N O O RRRRRR M M M
28151 // D D E N N N O O R R M M
28152 // D D E N NN O O R R M M
28153 // DDDDDD EEEEEEE N N OOOOO R R M M
28154
28155
28156 // VIF THU 20 NOV 2025 22:21:23 ** DENORM ** DIAGNOSTICS PAGE 00717
28157
28158
28159 // VIF THU 20 NOV 2025 22:21:23 ** DENORM ** GENERATED CODE PAGE 00718
28160
28161 real_8 _denorm (int_4 _p_ n_, real_8 _p_ x_)
28162 { // ** body not listed **
28267 }
28268
28269 // VIF THU 20 NOV 2025 22:21:23 ** DERKFS ** DERKFS PAGE 00721
28270
28271 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
28272 // S S U U B B R R O O U U T I NN N E
28273 // S U U B B R R O O U U T I N N N E
28274 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
28275 // S U U B B R R O O U U T I N N N E
28276 // S S U U B B R R O O U U T I N NN E
28277 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
28278
28279 // DDDDDD EEEEEEE RRRRRR K K FFFFFFF SSSSS
28280 // D D E R R K K F S S
28281 // D D E R R K K F S
28282 // D D EEEEE RRRRRR KKK FFFFF SSSSS
28283 // D D E R R K K F S
28284 // D D E R R K K F S S
28285 // DDDDDD EEEEEEE R R K K F SSSSS
28286
28287
28288 // VIF THU 20 NOV 2025 22:21:23 ** DERKFS ** DIAGNOSTICS PAGE 00722
28289
28290
28291 // VIF THU 20 NOV 2025 22:21:23 ** DERKFS ** GENERATED CODE PAGE 00723
28292
28293 int_4 _derkfs (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ tout_, int_4 _p_ info_, real_4
28294 _p_ rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ h_, real_4 _p_ tolfac_, real_4 _p_ yp_, real_4 _p_ f1_, real_4
28295 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ told_, real_4 _p_ dtsign_, real_4
28296 _p_ u26_, real_4 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_, logical_4 _p_ stiff_,
28297 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_)
28298 { // ** body not listed **
29187 }
29188
29189 // VIF THU 20 NOV 2025 22:21:23 ** DES ** DES PAGE 00741
29190
29191 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
29192 // S S U U B B R R O O U U T I NN N E
29193 // S U U B B R R O O U U T I N N N E
29194 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
29195 // S U U B B R R O O U U T I N N N E
29196 // S S U U B B R R O O U U T I N NN E
29197 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
29198
29199 // DDDDDD EEEEEEE SSSSS
29200 // D D E S S
29201 // D D E S
29202 // D D EEEEE SSSSS
29203 // D D E S
29204 // D D E S S
29205 // DDDDDD EEEEEEE SSSSS
29206
29207
29208 // VIF THU 20 NOV 2025 22:21:23 ** DES ** DIAGNOSTICS PAGE 00742
29209
29210
29211 // VIF THU 20 NOV 2025 22:21:23 ** DES ** GENERATED CODE PAGE 00743
29212
29213 int_4 _des (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ tout_, int_4 _p_ info_, real_4 _p_
29214 rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ ypout_, real_4 _p_ yp_, real_4 _p_ yy_, real_4 _p_ wt_, real_4 _p_
29215 p_, real_4 _p_ phi_, real_4 _p_ alpha_, real_4 _p_ beta_, real_4 _p_ psi_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_
29216 sig_, real_4 _p_ g_, real_4 _p_ gi_, real_4 _p_ h_, real_4 _p_ eps_, real_4 _p_ x_, real_4 _p_ xold_, real_4 _p_ hold_,
29217 real_4 _p_ told_, real_4 _p_ delsgn_, real_4 _p_ tstop_, real_4 _p_ twou_, real_4 _p_ fouru_, logical_4 _p_ start_,
29218 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
29219 kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_, int_4
29220 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_)
29221 { // ** body not listed **
30153 }
30154
30155 // VIF THU 20 NOV 2025 22:21:23 ** DFCMN ** DFCMN PAGE 00762
30156
30157 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
30158 // S S U U B B R R O O U U T I NN N E
30159 // S U U B B R R O O U U T I N N N E
30160 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
30161 // S U U B B R R O O U U T I N N N E
30162 // S S U U B B R R O O U U T I N NN E
30163 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
30164
30165 // DDDDDD FFFFFFF CCCCC M M N N
30166 // D D F C C MM MM NN N
30167 // D D F C M M M M N N N
30168 // D D FFFFF C M M M N N N
30169 // D D F C M M N N N
30170 // D D F C C M M N NN
30171 // DDDDDD F CCCCC M M N N
30172
30173
30174 // VIF THU 20 NOV 2025 22:21:23 ** DFCMN ** DIAGNOSTICS PAGE 00763
30175
30176
30177 // VIF THU 20 NOV 2025 22:21:23 ** DFCMN ** GENERATED CODE PAGE 00764
30178
30179 int_4 _dfcmn (int_4 _p_ ndata_, real_8 _p_ xdata_, real_8 _p_ ydata_, real_8 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
30180 nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
30181 mode_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8 _p_ xtemp_, real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_ g_, int_4
30182 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_)
30183 { // ** body not listed **
30565 }
30566
30567 // VIF THU 20 NOV 2025 22:21:23 ** DFDJC1 ** DFDJC1 PAGE 00772
30568
30569 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
30570 // S S U U B B R R O O U U T I NN N E
30571 // S U U B B R R O O U U T I N N N E
30572 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
30573 // S U U B B R R O O U U T I N N N E
30574 // S S U U B B R R O O U U T I N NN E
30575 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
30576
30577 // DDDDDD FFFFFFF DDDDDD J CCCCC 1
30578 // D D F D D J C C 11
30579 // D D F D D J C 1 1
30580 // D D FFFFF D D J C 1
30581 // D D F D D J J C 1
30582 // D D F D D J J C C 1
30583 // DDDDDD F DDDDDD JJJJJ CCCCC 11111
30584
30585
30586 // VIF THU 20 NOV 2025 22:21:23 ** DFDJC1 ** DIAGNOSTICS PAGE 00773
30587
30588
30589 // VIF THU 20 NOV 2025 22:21:23 ** DFDJC1 ** GENERATED CODE PAGE 00774
30590
30591 int_4 _dfdjc1 (int_4 (*_fcn)(), int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4 _p_ ldfjac_,
30592 int_4 _p_ iflag_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_, real_8 _p_ wa1_, real_8 _p_ wa2_)
30593 { // ** body not listed **
30668 }
30669
30670 // VIF THU 20 NOV 2025 22:21:23 ** DFDJC3 ** DFDJC3 PAGE 00776
30671
30672 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
30673 // S S U U B B R R O O U U T I NN N E
30674 // S U U B B R R O O U U T I N N N E
30675 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
30676 // S U U B B R R O O U U T I N N N E
30677 // S S U U B B R R O O U U T I N NN E
30678 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
30679
30680 // DDDDDD FFFFFFF DDDDDD J CCCCC 33333
30681 // D D F D D J C C 3 3
30682 // D D F D D J C 3
30683 // D D FFFFF D D J C 33333
30684 // D D F D D J J C 3
30685 // D D F D D J J C C 3 3
30686 // DDDDDD F DDDDDD JJJJJ CCCCC 33333
30687
30688
30689 // VIF THU 20 NOV 2025 22:21:23 ** DFDJC3 ** DIAGNOSTICS PAGE 00777
30690
30691
30692 // VIF THU 20 NOV 2025 22:21:23 ** DFDJC3 ** GENERATED CODE PAGE 00778
30693
30694 int_4 _dfdjc3 (int_4 (*_fcn)(), int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4
30695 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_)
30696 { // ** body not listed **
30735 }
30736
30737 // VIF THU 20 NOV 2025 22:21:23 ** DFEHL ** DFEHL PAGE 00779
30738
30739 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
30740 // S S U U B B R R O O U U T I NN N E
30741 // S U U B B R R O O U U T I N N N E
30742 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
30743 // S U U B B R R O O U U T I N N N E
30744 // S S U U B B R R O O U U T I N NN E
30745 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
30746
30747 // DDDDDD FFFFFFF EEEEEEE H H L
30748 // D D F E H H L
30749 // D D F E H H L
30750 // D D FFFFF EEEEE HHHHHHH L
30751 // D D F E H H L
30752 // D D F E H H L
30753 // DDDDDD F EEEEEEE H H LLLLLLL
30754
30755
30756 // VIF THU 20 NOV 2025 22:21:23 ** DFEHL ** DIAGNOSTICS PAGE 00780
30757
30758
30759 // VIF THU 20 NOV 2025 22:21:23 ** DFEHL ** GENERATED CODE PAGE 00781
30760
30761 int_4 _dfehl (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ h_, real_8 _p_ yp_, real_8 _p_
30762 f1_, real_8 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ rpar_, int_4 _p_ ipar_)
30763 { // ** body not listed **
30801 }
30802
30803 // VIF THU 20 NOV 2025 22:21:23 ** DFSPVD ** DFSPVD PAGE 00782
30804
30805 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
30806 // S S U U B B R R O O U U T I NN N E
30807 // S U U B B R R O O U U T I N N N E
30808 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
30809 // S U U B B R R O O U U T I N N N E
30810 // S S U U B B R R O O U U T I N NN E
30811 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
30812
30813 // DDDDDD FFFFFFF SSSSS PPPPPP V V DDDDDD
30814 // D D F S S P P V V D D
30815 // D D F S P P V V D D
30816 // D D FFFFF SSSSS PPPPPP V V D D
30817 // D D F S P V V D D
30818 // D D F S S P V V D D
30819 // DDDDDD F SSSSS P V DDDDDD
30820
30821
30822 // VIF THU 20 NOV 2025 22:21:23 ** DFSPVD ** DIAGNOSTICS PAGE 00783
30823
30824
30825 // VIF THU 20 NOV 2025 22:21:23 ** DFSPVD ** GENERATED CODE PAGE 00784
30826
30827 int_4 _dfspvd (real_8 _p_ t_, int_4 _p_ k_, real_8 _p_ x_, int_4 _p_ ileft_, real_8 _p_ vnikx_, int_4 _p_ nderiv_)
30828 { // ** body not listed **
30896 }
30897
30898 // VIF THU 20 NOV 2025 22:21:23 ** DFSPVN ** DFSPVN PAGE 00786
30899
30900 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
30901 // S S U U B B R R O O U U T I NN N E
30902 // S U U B B R R O O U U T I N N N E
30903 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
30904 // S U U B B R R O O U U T I N N N E
30905 // S S U U B B R R O O U U T I N NN E
30906 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
30907
30908 // DDDDDD FFFFFFF SSSSS PPPPPP V V N N
30909 // D D F S S P P V V NN N
30910 // D D F S P P V V N N N
30911 // D D FFFFF SSSSS PPPPPP V V N N N
30912 // D D F S P V V N N N
30913 // D D F S S P V V N NN
30914 // DDDDDD F SSSSS P V N N
30915
30916
30917 // VIF THU 20 NOV 2025 22:21:23 ** DFSPVN ** DIAGNOSTICS PAGE 00787
30918
30919
30920 // VIF THU 20 NOV 2025 22:21:23 ** DFSPVN ** GENERATED CODE PAGE 00788
30921
30922 int_4 _dfspvn (real_8 _p_ t_, int_4 _p_ jhigh_, int_4 _p_ index_, real_8 _p_ x_, int_4 _p_ ileft_, real_8 _p_ vnikx_)
30923 { // ** body not listed **
31033 }
31034
31035 // VIF THU 20 NOV 2025 22:21:23 ** DFULMT ** DFULMT PAGE 00791
31036
31037 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
31038 // S S U U B B R R O O U U T I NN N E
31039 // S U U B B R R O O U U T I N N N E
31040 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
31041 // S U U B B R R O O U U T I N N N E
31042 // S S U U B B R R O O U U T I N NN E
31043 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
31044
31045 // DDDDDD FFFFFFF U U L M M TTTTTTT
31046 // D D F U U L MM MM T
31047 // D D F U U L M M M M T
31048 // D D FFFFF U U L M M M T
31049 // D D F U U L M M T
31050 // D D F U U L M M T
31051 // DDDDDD F UUUUU LLLLLLL M M T
31052
31053
31054 // VIF THU 20 NOV 2025 22:21:23 ** DFULMT ** DIAGNOSTICS PAGE 00792
31055
31056
31057 // VIF THU 20 NOV 2025 22:21:23 ** DFULMT ** GENERATED CODE PAGE 00793
31058
31059 int_4 _dfulmt (int_4 _p_ i_, int_4 _p_ j_, real_8 _p_ aij_, int_4 _p_ indcat_, real_8 _p_ prgopt_, real_8 _p_ dattrv_,
31060 int_4 _p_ iflag_)
31061 { // ** body not listed **
31134 }
31135
31136 // VIF THU 20 NOV 2025 22:21:23 ** DFZERO ** DFZERO PAGE 00795
31137
31138 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
31139 // S S U U B B R R O O U U T I NN N E
31140 // S U U B B R R O O U U T I N N N E
31141 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
31142 // S U U B B R R O O U U T I N N N E
31143 // S S U U B B R R O O U U T I N NN E
31144 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
31145
31146 // DDDDDD FFFFFFF ZZZZZZZ EEEEEEE RRRRRR OOOOO
31147 // D D F Z E R R O O
31148 // D D F Z E R R O O
31149 // D D FFFFF Z EEEEE RRRRRR O O
31150 // D D F Z E R R O O
31151 // D D F * E R R O O
31152 // DDDDDD F ZZZZZZZ EEEEEEE R R OOOOO
31153
31154
31155 // VIF THU 20 NOV 2025 22:21:23 ** DFZERO ** DIAGNOSTICS PAGE 00796
31156
31157
31158 // VIF THU 20 NOV 2025 22:21:23 ** DFZERO ** GENERATED CODE PAGE 00797
31159
31160 int_4 _dfzero (real_8 (*_f)(), real_8 _p_ b_, real_8 _p_ c_, real_8 _p_ r_, real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_
31161 iflag_)
31162 { // ** body not listed **
31296 }
31297
31298 // VIF THU 20 NOV 2025 22:21:23 ** DGAUS8 ** DGAUS8 PAGE 00800
31299
31300 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
31301 // S S U U B B R R O O U U T I NN N E
31302 // S U U B B R R O O U U T I N N N E
31303 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
31304 // S U U B B R R O O U U T I N N N E
31305 // S S U U B B R R O O U U T I N NN E
31306 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
31307
31308 // DDDDDD GGGGG A U U SSSSS 88888
31309 // D D G G A A U U S S 8 8
31310 // D D G A A U U S 8 8
31311 // D D G GGGG A A U U SSSSS 88888
31312 // D D G G AAAAAAA U U S 8 8
31313 // D D G G A A U U S S 8 8
31314 // DDDDDD GGGGG A A UUUUU SSSSS 88888
31315
31316
31317 // VIF THU 20 NOV 2025 22:21:23 ** DGAUS8 ** DIAGNOSTICS PAGE 00801
31318
31319
31320 // VIF THU 20 NOV 2025 22:21:23 ** DGAUS8 ** GENERATED CODE PAGE 00802
31321
31322 int_4 _dgaus8 (real_8 (*_fun)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_)
31323 { // ** body not listed **
31596 }
31597
31598 // VIF THU 20 NOV 2025 22:21:23 ** DGEFS ** DGEFS PAGE 00808
31599
31600 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
31601 // S S U U B B R R O O U U T I NN N E
31602 // S U U B B R R O O U U T I N N N E
31603 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
31604 // S U U B B R R O O U U T I N N N E
31605 // S S U U B B R R O O U U T I N NN E
31606 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
31607
31608 // DDDDDD GGGGG EEEEEEE FFFFFFF SSSSS
31609 // D D G G E F S S
31610 // D D G E F S
31611 // D D G GGGG EEEEE FFFFF SSSSS
31612 // D D G G E F S
31613 // D D G G E F S S
31614 // DDDDDD GGGGG EEEEEEE F SSSSS
31615
31616
31617 // VIF THU 20 NOV 2025 22:21:23 ** DGEFS ** DIAGNOSTICS PAGE 00809
31618
31619
31620 // VIF THU 20 NOV 2025 22:21:23 ** DGEFS ** GENERATED CODE PAGE 00810
31621
31622 int_4 _dgefs (real_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_
31623 work_, int_4 _p_ iwork_)
31624 { // ** body not listed **
31825 }
31826
31827 // VIF THU 20 NOV 2025 22:21:23 ** DGLSS ** DGLSS PAGE 00814
31828
31829 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
31830 // S S U U B B R R O O U U T I NN N E
31831 // S U U B B R R O O U U T I N N N E
31832 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
31833 // S U U B B R R O O U U T I N N N E
31834 // S S U U B B R R O O U U T I N NN E
31835 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
31836
31837 // DDDDDD GGGGG L SSSSS SSSSS
31838 // D D G G L S S S S
31839 // D D G L S S
31840 // D D G GGGG L SSSSS SSSSS
31841 // D D G G L S S
31842 // D D G G L S S S S
31843 // DDDDDD GGGGG LLLLLLL SSSSS SSSSS
31844
31845
31846 // VIF THU 20 NOV 2025 22:21:23 ** DGLSS ** DIAGNOSTICS PAGE 00815
31847
31848
31849 // VIF THU 20 NOV 2025 22:21:23 ** DGLSS ** GENERATED CODE PAGE 00816
31850
31851 int_4 _dglss (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
31852 real_8 _p_ rnorm_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
31853 { // ** body not listed **
31881 }
31882
31883 // VIF THU 20 NOV 2025 22:21:23 ** DH12 ** DH12 PAGE 00817
31884
31885 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
31886 // S S U U B B R R O O U U T I NN N E
31887 // S U U B B R R O O U U T I N N N E
31888 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
31889 // S U U B B R R O O U U T I N N N E
31890 // S S U U B B R R O O U U T I N NN E
31891 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
31892
31893 // DDDDDD H H 1 22222
31894 // D D H H 11 2 2
31895 // D D H H 1 1 2
31896 // D D HHHHHHH 1 22222
31897 // D D H H 1 2
31898 // D D H H 1 2
31899 // DDDDDD H H 11111 2222222
31900
31901
31902 // VIF THU 20 NOV 2025 22:21:23 ** DH12 ** DIAGNOSTICS PAGE 00818
31903
31904
31905 // VIF THU 20 NOV 2025 22:21:23 ** DH12 ** GENERATED CODE PAGE 00819
31906
31907 int_4 _dh12 (int_4 _p_ mode_, int_4 _p_ lpivot_, int_4 _p_ l1_, int_4 _p_ m_, real_8 _p_ u_, int_4 _p_ iue_, real_8 _p_
31908 up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
31909 { // ** body not listed **
32015 }
32016
32017 // VIF THU 20 NOV 2025 22:21:23 ** DHFTI ** DHFTI PAGE 00822
32018
32019 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
32020 // S S U U B B R R O O U U T I NN N E
32021 // S U U B B R R O O U U T I N N N E
32022 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
32023 // S U U B B R R O O U U T I N N N E
32024 // S S U U B B R R O O U U T I N NN E
32025 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
32026
32027 // DDDDDD H H FFFFFFF TTTTTTT III
32028 // D D H H F T I
32029 // D D H H F T I
32030 // D D HHHHHHH FFFFF T I
32031 // D D H H F T I
32032 // D D H H F T I
32033 // DDDDDD H H F T III
32034
32035
32036 // VIF THU 20 NOV 2025 22:21:23 ** DHFTI ** DIAGNOSTICS PAGE 00823
32037
32038
32039 // VIF THU 20 NOV 2025 22:21:23 ** DHFTI ** GENERATED CODE PAGE 00824
32040
32041 int_4 _dhfti (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
32042 real_8 _p_ tau_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ g_, int_4 _p_ ip_)
32043 { // ** body not listed **
32234 }
32235
32236 // VIF THU 20 NOV 2025 22:21:23 ** DHSTRT ** DHSTRT PAGE 00828
32237
32238 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
32239 // S S U U B B R R O O U U T I NN N E
32240 // S U U B B R R O O U U T I N N N E
32241 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
32242 // S U U B B R R O O U U T I N N N E
32243 // S S U U B B R R O O U U T I N NN E
32244 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
32245
32246 // DDDDDD H H SSSSS TTTTTTT RRRRRR TTTTTTT
32247 // D D H H S S T R R T
32248 // D D H H S T R R T
32249 // D D HHHHHHH SSSSS T RRRRRR T
32250 // D D H H S T R R T
32251 // D D H H S S T R R T
32252 // DDDDDD H H SSSSS T R R T
32253
32254
32255 // VIF THU 20 NOV 2025 22:21:23 ** DHSTRT ** DIAGNOSTICS PAGE 00829
32256
32257
32258 // VIF THU 20 NOV 2025 22:21:23 ** DHSTRT ** GENERATED CODE PAGE 00830
32259
32260 int_4 _dhstrt (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ y_, real_8 _p_ yprime_, real_8
32261 _p_ etol_, int_4 _p_ morder_, real_8 _p_ small_, real_8 _p_ big_, real_8 _p_ spy_, real_8 _p_ pv_, real_8 _p_ yp_,
32262 real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_)
32263 { // ** body not listed **
32412 }
32413
32414 // VIF THU 20 NOV 2025 22:21:23 ** DHVNRM ** DHVNRM PAGE 00833
32415
32416 // RRRRRR EEEEEEE A L 88888
32417 // R R E A A L * * 8 8
32418 // R R E A A L * * 8 8
32419 // RRRRRR EEEEE A A L ******* 88888
32420 // R R E AAAAAAA L * * 8 8
32421 // R R E A A L * * 8 8
32422 // R R EEEEEEE A A LLLLLLL 88888
32423
32424 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
32425 // F U U NN N C C T I O O NN N
32426 // F U U N N N C T I O O N N N
32427 // FFFFF U U N N N C T I O O N N N
32428 // F U U N N N C T I O O N N N
32429 // F U U N NN C C T I O O N NN
32430 // F UUUUU N N CCCCC T III OOOOO N N
32431
32432 // DDDDDD H H V V N N RRRRRR M M
32433 // D D H H V V NN N R R MM MM
32434 // D D H H V V N N N R R M M M M
32435 // D D HHHHHHH V V N N N RRRRRR M M M
32436 // D D H H V V N N N R R M M
32437 // D D H H V V N NN R R M M
32438 // DDDDDD H H V N N R R M M
32439
32440
32441 // VIF THU 20 NOV 2025 22:21:23 ** DHVNRM ** DIAGNOSTICS PAGE 00834
32442
32443
32444 // VIF THU 20 NOV 2025 22:21:23 ** DHVNRM ** GENERATED CODE PAGE 00835
32445
32446 real_8 _dhvnrm (real_8 _p_ v_, int_4 _p_ ncomp_)
32447 { // ** body not listed **
32456 }
32457
32458 // VIF THU 20 NOV 2025 22:21:23 ** DJAIRY ** DJAIRY PAGE 00836
32459
32460 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
32461 // S S U U B B R R O O U U T I NN N E
32462 // S U U B B R R O O U U T I N N N E
32463 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
32464 // S U U B B R R O O U U T I N N N E
32465 // S S U U B B R R O O U U T I N NN E
32466 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
32467
32468 // DDDDDD J A III RRRRRR Y Y
32469 // D D J A A I R R Y Y
32470 // D D J A A I R R Y Y
32471 // D D J A A I RRRRRR Y
32472 // D D J J AAAAAAA I R R Y
32473 // D D J J A A I R R Y
32474 // DDDDDD JJJJJ A A III R R Y
32475
32476
32477 // VIF THU 20 NOV 2025 22:21:23 ** DJAIRY ** DIAGNOSTICS PAGE 00837
32478
32479
32480 // VIF THU 20 NOV 2025 22:21:23 ** DJAIRY ** GENERATED CODE PAGE 00838
32481
32482 int_4 _djairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ ai_, real_8 _p_ dai_)
32483 { // ** body not listed **
34406 }
34407
34408 // VIF THU 20 NOV 2025 22:21:23 ** DLLSIA ** DLLSIA PAGE 00876
34409
34410 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
34411 // S S U U B B R R O O U U T I NN N E
34412 // S U U B B R R O O U U T I N N N E
34413 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
34414 // S U U B B R R O O U U T I N N N E
34415 // S S U U B B R R O O U U T I N NN E
34416 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
34417
34418 // DDDDDD L L SSSSS III A
34419 // D D L L S S I A A
34420 // D D L L S I A A
34421 // D D L L SSSSS I A A
34422 // D D L L S I AAAAAAA
34423 // D D L L S S I A A
34424 // DDDDDD LLLLLLL LLLLLLL SSSSS III A A
34425
34426
34427 // VIF THU 20 NOV 2025 22:21:23 ** DLLSIA ** DIAGNOSTICS PAGE 00877
34428
34429
34430 // VIF THU 20 NOV 2025 22:21:23 ** DLLSIA ** GENERATED CODE PAGE 00878
34431
34432 int_4 _dllsia (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
34433 real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
34434 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
34435 { // ** body not listed **
34694 }
34695
34696 // VIF THU 20 NOV 2025 22:21:23 ** DLPDP ** DLPDP PAGE 00884
34697
34698 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
34699 // S S U U B B R R O O U U T I NN N E
34700 // S U U B B R R O O U U T I N N N E
34701 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
34702 // S U U B B R R O O U U T I N N N E
34703 // S S U U B B R R O O U U T I N NN E
34704 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
34705
34706 // DDDDDD L PPPPPP DDDDDD PPPPPP
34707 // D D L P P D D P P
34708 // D D L P P D D P P
34709 // D D L PPPPPP D D PPPPPP
34710 // D D L P D D P
34711 // D D L P D D P
34712 // DDDDDD LLLLLLL P DDDDDD P
34713
34714
34715 // VIF THU 20 NOV 2025 22:21:23 ** DLPDP ** DIAGNOSTICS PAGE 00885
34716
34717
34718 // VIF THU 20 NOV 2025 22:21:23 ** DLPDP ** GENERATED CODE PAGE 00886
34719
34720 int_4 _dlpdp (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n1_, int_4 _p_ n2_, real_8 _p_ prgopt_, real_8 _p_
34721 x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_)
34722 { // ** body not listed **
34890 }
34891
34892 // VIF THU 20 NOV 2025 22:21:23 ** DLSEI ** DLSEI PAGE 00890
34893
34894 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
34895 // S S U U B B R R O O U U T I NN N E
34896 // S U U B B R R O O U U T I N N N E
34897 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
34898 // S U U B B R R O O U U T I N N N E
34899 // S S U U B B R R O O U U T I N NN E
34900 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
34901
34902 // DDDDDD L SSSSS EEEEEEE III
34903 // D D L S S E I
34904 // D D L S E I
34905 // D D L SSSSS EEEEE I
34906 // D D L S E I
34907 // D D L S S E I
34908 // DDDDDD LLLLLLL SSSSS EEEEEEE III
34909
34910
34911 // VIF THU 20 NOV 2025 22:21:23 ** DLSEI ** DIAGNOSTICS PAGE 00891
34912
34913
34914 // VIF THU 20 NOV 2025 22:21:23 ** DLSEI ** GENERATED CODE PAGE 00892
34915
34916 int_4 _dlsei (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_8 _p_
34917 prgopt_, real_8 _p_ x_, real_8 _p_ rnorme_, real_8 _p_ rnorml_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_)
34918 { // ** body not listed **
35449 }
35450
35451 // VIF THU 20 NOV 2025 22:21:23 ** DLSI ** DLSI PAGE 00903
35452
35453 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
35454 // S S U U B B R R O O U U T I NN N E
35455 // S U U B B R R O O U U T I N N N E
35456 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
35457 // S U U B B R R O O U U T I N N N E
35458 // S S U U B B R R O O U U T I N NN E
35459 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
35460
35461 // DDDDDD L SSSSS III
35462 // D D L S S I
35463 // D D L S I
35464 // D D L SSSSS I
35465 // D D L S I
35466 // D D L S S I
35467 // DDDDDD LLLLLLL SSSSS III
35468
35469
35470 // VIF THU 20 NOV 2025 22:21:23 ** DLSI ** DIAGNOSTICS PAGE 00904
35471
35472
35473 // VIF THU 20 NOV 2025 22:21:23 ** DLSI ** GENERATED CODE PAGE 00905
35474
35475 int_4 _dlsi (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_8 _p_ prgopt_, real_8 _p_
35476 x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_)
35477 { // ** body not listed **
35703 }
35704
35705 // VIF THU 20 NOV 2025 22:21:23 ** DLSSUD ** DLSSUD PAGE 00910
35706
35707 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
35708 // S S U U B B R R O O U U T I NN N E
35709 // S U U B B R R O O U U T I N N N E
35710 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
35711 // S U U B B R R O O U U T I N N N E
35712 // S S U U B B R R O O U U T I N NN E
35713 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
35714
35715 // DDDDDD L SSSSS SSSSS U U DDDDDD
35716 // D D L S S S S U U D D
35717 // D D L S S U U D D
35718 // D D L SSSSS SSSSS U U D D
35719 // D D L S S U U D D
35720 // D D L S S S S U U D D
35721 // DDDDDD LLLLLLL SSSSS SSSSS UUUUU DDDDDD
35722
35723
35724 // VIF THU 20 NOV 2025 22:21:23 ** DLSSUD ** DIAGNOSTICS PAGE 00911
35725
35726
35727 // VIF THU 20 NOV 2025 22:21:23 ** DLSSUD ** GENERATED CODE PAGE 00912
35728
35729 int_4 _dlssud (real_8 _p_ a_, real_8 _p_ x_, real_8 _p_ b_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, real_8 _p_ u_,
35730 int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_8 _p_ q_, real_8 _p_
35731 diag_, int_4 _p_ kpivot_, real_8 _p_ s_, real_8 _p_ div_, real_8 _p_ td_, int_4 _p_ isflg_, real_8 _p_ scales_)
35732 { // ** body not listed **
35910 }
35911
35912 // VIF THU 20 NOV 2025 22:21:23 ** DMACON ** DMACON PAGE 00916
35913
35914 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
35915 // S S U U B B R R O O U U T I NN N E
35916 // S U U B B R R O O U U T I N N N E
35917 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
35918 // S U U B B R R O O U U T I N N N E
35919 // S S U U B B R R O O U U T I N NN E
35920 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
35921
35922 // DDDDDD M M A CCCCC OOOOO N N
35923 // D D MM MM A A C C O O NN N
35924 // D D M M M M A A C O O N N N
35925 // D D M M M A A C O O N N N
35926 // D D M M AAAAAAA C O O N N N
35927 // D D M M A A C C O O N NN
35928 // DDDDDD M M A A CCCCC OOOOO N N
35929
35930
35931 // VIF THU 20 NOV 2025 22:21:23 ** DMACON ** DIAGNOSTICS PAGE 00917
35932
35933
35934 // VIF THU 20 NOV 2025 22:21:23 ** DMACON ** GENERATED CODE PAGE 00918
35935
35936 int_4 _dmacon (void)
35937 { // ** body not listed **
35953 }
35954
35955 // VIF THU 20 NOV 2025 22:21:23 ** DMGSBV ** DMGSBV PAGE 00919
35956
35957 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
35958 // S S U U B B R R O O U U T I NN N E
35959 // S U U B B R R O O U U T I N N N E
35960 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
35961 // S U U B B R R O O U U T I N N N E
35962 // S S U U B B R R O O U U T I N NN E
35963 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
35964
35965 // DDDDDD M M GGGGG SSSSS BBBBBB V V
35966 // D D MM MM G G S S B B V V
35967 // D D M M M M G S B B V V
35968 // D D M M M G GGGG SSSSS BBBBBB V V
35969 // D D M M G G S B B V V
35970 // D D M M G G S S B B V V
35971 // DDDDDD M M GGGGG SSSSS BBBBBB V
35972
35973
35974 // VIF THU 20 NOV 2025 22:21:23 ** DMGSBV ** DIAGNOSTICS PAGE 00920
35975
35976
35977 // VIF THU 20 NOV 2025 22:21:23 ** DMGSBV ** GENERATED CODE PAGE 00921
35978
35979 int_4 _dmgsbv (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ ia_, int_4 _p_ niv_, int_4 _p_ iflag_, real_8 _p_
35980 s_, real_8 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_8 _p_ v_, real_8 _p_ w_, real_8 _p_ wcnd_)
35981 { // ** body not listed **
36228 }
36229
36230 // VIF THU 20 NOV 2025 22:21:23 ** DMPAR ** DMPAR PAGE 00926
36231
36232 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
36233 // S S U U B B R R O O U U T I NN N E
36234 // S U U B B R R O O U U T I N N N E
36235 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
36236 // S U U B B R R O O U U T I N N N E
36237 // S S U U B B R R O O U U T I N NN E
36238 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
36239
36240 // DDDDDD M M PPPPPP A RRRRRR
36241 // D D MM MM P P A A R R
36242 // D D M M M M P P A A R R
36243 // D D M M M PPPPPP A A RRRRRR
36244 // D D M M P AAAAAAA R R
36245 // D D M M P A A R R
36246 // DDDDDD M M P A A R R
36247
36248
36249 // VIF THU 20 NOV 2025 22:21:23 ** DMPAR ** DIAGNOSTICS PAGE 00927
36250
36251
36252 // VIF THU 20 NOV 2025 22:21:23 ** DMPAR ** GENERATED CODE PAGE 00928
36253
36254 int_4 _dmpar (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ ipvt_, real_8 _p_ diag_, real_8 _p_ qtb_, real_8
36255 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_)
36256 { // ** body not listed **
36424 }
36425
36426 // VIF THU 20 NOV 2025 22:21:23 ** DNBCO ** DNBCO PAGE 00932
36427
36428 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
36429 // S S U U B B R R O O U U T I NN N E
36430 // S U U B B R R O O U U T I N N N E
36431 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
36432 // S U U B B R R O O U U T I N N N E
36433 // S S U U B B R R O O U U T I N NN E
36434 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
36435
36436 // DDDDDD N N BBBBBB CCCCC OOOOO
36437 // D D NN N B B C C O O
36438 // D D N N N B B C O O
36439 // D D N N N BBBBBB C O O
36440 // D D N N N B B C O O
36441 // D D N NN B B C C O O
36442 // DDDDDD N N BBBBBB CCCCC OOOOO
36443
36444
36445 // VIF THU 20 NOV 2025 22:21:23 ** DNBCO ** DIAGNOSTICS PAGE 00933
36446
36447
36448 // VIF THU 20 NOV 2025 22:21:23 ** DNBCO ** GENERATED CODE PAGE 00934
36449
36450 int_4 _dnbco (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_8 _p_
36451 rcond_, real_8 _p_ z_)
36452 { // ** body not listed **
36607 }
36608
36609 // VIF THU 20 NOV 2025 22:21:23 ** DNBDI ** DNBDI PAGE 00938
36610
36611 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
36612 // S S U U B B R R O O U U T I NN N E
36613 // S U U B B R R O O U U T I N N N E
36614 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
36615 // S U U B B R R O O U U T I N N N E
36616 // S S U U B B R R O O U U T I N NN E
36617 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
36618
36619 // DDDDDD N N BBBBBB DDDDDD III
36620 // D D NN N B B D D I
36621 // D D N N N B B D D I
36622 // D D N N N BBBBBB D D I
36623 // D D N N N B B D D I
36624 // D D N NN B B D D I
36625 // DDDDDD N N BBBBBB DDDDDD III
36626
36627
36628 // VIF THU 20 NOV 2025 22:21:23 ** DNBDI ** DIAGNOSTICS PAGE 00939
36629
36630
36631 // VIF THU 20 NOV 2025 22:21:23 ** DNBDI ** GENERATED CODE PAGE 00940
36632
36633 int_4 _dnbdi (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_8 _p_
36634 det_)
36635 { // ** body not listed **
36669 }
36670
36671 // VIF THU 20 NOV 2025 22:21:23 ** DNBFA ** DNBFA PAGE 00941
36672
36673 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
36674 // S S U U B B R R O O U U T I NN N E
36675 // S U U B B R R O O U U T I N N N E
36676 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
36677 // S U U B B R R O O U U T I N N N E
36678 // S S U U B B R R O O U U T I N NN E
36679 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
36680
36681 // DDDDDD N N BBBBBB FFFFFFF A
36682 // D D NN N B B F A A
36683 // D D N N N B B F A A
36684 // D D N N N BBBBBB FFFFF A A
36685 // D D N N N B B F AAAAAAA
36686 // D D N NN B B F A A
36687 // DDDDDD N N BBBBBB F A A
36688
36689
36690 // VIF THU 20 NOV 2025 22:21:23 ** DNBFA ** DIAGNOSTICS PAGE 00942
36691
36692
36693 // VIF THU 20 NOV 2025 22:21:23 ** DNBFA ** GENERATED CODE PAGE 00943
36694
36695 int_4 _dnbfa (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, int_4 _p_
36696 info_)
36697 { // ** body not listed **
36754 }
36755
36756 // VIF THU 20 NOV 2025 22:21:23 ** DNBFS ** DNBFS PAGE 00945
36757
36758 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
36759 // S S U U B B R R O O U U T I NN N E
36760 // S U U B B R R O O U U T I N N N E
36761 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
36762 // S U U B B R R O O U U T I N N N E
36763 // S S U U B B R R O O U U T I N NN E
36764 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
36765
36766 // DDDDDD N N BBBBBB FFFFFFF SSSSS
36767 // D D NN N B B F S S
36768 // D D N N N B B F S
36769 // D D N N N BBBBBB FFFFF SSSSS
36770 // D D N N N B B F S
36771 // D D N NN B B F S S
36772 // DDDDDD N N BBBBBB F SSSSS
36773
36774
36775 // VIF THU 20 NOV 2025 22:21:23 ** DNBFS ** DIAGNOSTICS PAGE 00946
36776
36777
36778 // VIF THU 20 NOV 2025 22:21:23 ** DNBFS ** GENERATED CODE PAGE 00947
36779
36780 int_4 _dnbfs (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ v_, int_4 _p_
36781 itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_)
36782 { // ** body not listed **
37075 }
37076
37077 // VIF THU 20 NOV 2025 22:21:23 ** DNBSL ** DNBSL PAGE 00953
37078
37079 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
37080 // S S U U B B R R O O U U T I NN N E
37081 // S U U B B R R O O U U T I N N N E
37082 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
37083 // S U U B B R R O O U U T I N N N E
37084 // S S U U B B R R O O U U T I N NN E
37085 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
37086
37087 // DDDDDD N N BBBBBB SSSSS L
37088 // D D NN N B B S S L
37089 // D D N N N B B S L
37090 // D D N N N BBBBBB SSSSS L
37091 // D D N N N B B S L
37092 // D D N NN B B S S L
37093 // DDDDDD N N BBBBBB SSSSS LLLLLLL
37094
37095
37096 // VIF THU 20 NOV 2025 22:21:23 ** DNBSL ** DIAGNOSTICS PAGE 00954
37097
37098
37099 // VIF THU 20 NOV 2025 22:21:23 ** DNBSL ** GENERATED CODE PAGE 00955
37100
37101 int_4 _dnbsl (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_8 _p_
37102 b_, int_4 _p_ job_)
37103 { // ** body not listed **
37175 }
37176
37177 // VIF THU 20 NOV 2025 22:21:23 ** DNLS1E ** DNLS1E PAGE 00957
37178
37179 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
37180 // S S U U B B R R O O U U T I NN N E
37181 // S U U B B R R O O U U T I N N N E
37182 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
37183 // S U U B B R R O O U U T I N N N E
37184 // S S U U B B R R O O U U T I N NN E
37185 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
37186
37187 // DDDDDD N N L SSSSS 1 EEEEEEE
37188 // D D NN N L S S 11 E
37189 // D D N N N L S 1 1 E
37190 // D D N N N L SSSSS 1 EEEEE
37191 // D D N N N L S 1 E
37192 // D D N NN L S S 1 E
37193 // DDDDDD N N LLLLLLL SSSSS 11111 EEEEEEE
37194
37195
37196 // VIF THU 20 NOV 2025 22:21:23 ** DNLS1E ** DIAGNOSTICS PAGE 00958
37197
37198
37199 // VIF THU 20 NOV 2025 22:21:23 ** DNLS1E ** GENERATED CODE PAGE 00959
37200
37201 int_4 _dnls1e (real_8 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8
37202 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_)
37203 { // ** body not listed **
37257 }
37258
37259 // VIF THU 20 NOV 2025 22:21:23 ** DNLS1 ** DNLS1 PAGE 00961
37260
37261 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
37262 // S S U U B B R R O O U U T I NN N E
37263 // S U U B B R R O O U U T I N N N E
37264 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
37265 // S U U B B R R O O U U T I N N N E
37266 // S S U U B B R R O O U U T I N NN E
37267 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
37268
37269 // DDDDDD N N L SSSSS 1
37270 // D D NN N L S S 11
37271 // D D N N N L S 1 1
37272 // D D N N N L SSSSS 1
37273 // D D N N N L S 1
37274 // D D N NN L S S 1
37275 // DDDDDD N N LLLLLLL SSSSS 11111
37276
37277
37278 // VIF THU 20 NOV 2025 22:21:23 ** DNLS1 ** DIAGNOSTICS PAGE 00962
37279
37280
37281 // VIF THU 20 NOV 2025 22:21:23 ** DNLS1 ** GENERATED CODE PAGE 00963
37282
37283 int_4 _dnls1 (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_
37284 fjac_, int_4 _p_ ldfjac_, real_8 _p_ ftol_, real_8 _p_ xtol_, real_8 _p_ gtol_, int_4 _p_ maxfev_, real_8 _p_ epsfcn_,
37285 real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
37286 njev_, int_4 _p_ ipvt_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
37287 { // ** body not listed **
37894 }
37895
37896 // VIF THU 20 NOV 2025 22:21:23 ** DNSQE ** DNSQE PAGE 00975
37897
37898 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
37899 // S S U U B B R R O O U U T I NN N E
37900 // S U U B B R R O O U U T I N N N E
37901 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
37902 // S U U B B R R O O U U T I N N N E
37903 // S S U U B B R R O O U U T I N NN E
37904 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
37905
37906 // DDDDDD N N SSSSS QQQQQ EEEEEEE
37907 // D D NN N S S Q Q E
37908 // D D N N N S Q Q E
37909 // D D N N N SSSSS Q Q EEEEE
37910 // D D N N N S Q Q Q E
37911 // D D N NN S S Q Q E
37912 // DDDDDD N N SSSSS QQQQ Q EEEEEEE
37913
37914
37915 // VIF THU 20 NOV 2025 22:21:23 ** DNSQE ** DIAGNOSTICS PAGE 00976
37916
37917
37918 // VIF THU 20 NOV 2025 22:21:23 ** DNSQE ** GENERATED CODE PAGE 00977
37919
37920 int_4 _dnsqe (real_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8
37921 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_)
37922 { // ** body not listed **
37983 }
37984
37985 // VIF THU 20 NOV 2025 22:21:23 ** DNSQ ** DNSQ PAGE 00979
37986
37987 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
37988 // S S U U B B R R O O U U T I NN N E
37989 // S U U B B R R O O U U T I N N N E
37990 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
37991 // S U U B B R R O O U U T I N N N E
37992 // S S U U B B R R O O U U T I N NN E
37993 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
37994
37995 // DDDDDD N N SSSSS QQQQQ
37996 // D D NN N S S Q Q
37997 // D D N N N S Q Q
37998 // D D N N N SSSSS Q Q
37999 // D D N N N S Q Q Q
38000 // D D N NN S S Q Q
38001 // DDDDDD N N SSSSS QQQQ Q
38002
38003
38004 // VIF THU 20 NOV 2025 22:21:23 ** DNSQ ** DIAGNOSTICS PAGE 00980
38005
38006
38007 // VIF THU 20 NOV 2025 22:21:23 ** DNSQ ** GENERATED CODE PAGE 00981
38008
38009 int_4 _dnsq (int_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8
38010 _p_ fjac_, int_4 _p_ ldfjac_, real_8 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_,
38011 real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
38012 njev_, real_8 _p_ r_, int_4 _p_ lr_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_
38013 wa4_)
38014 { // ** body not listed **
38345 }
38346
38347 // VIF THU 20 NOV 2025 22:21:23 ** DOHTRL ** DOHTRL PAGE 00988
38348
38349 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
38350 // S S U U B B R R O O U U T I NN N E
38351 // S U U B B R R O O U U T I N N N E
38352 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
38353 // S U U B B R R O O U U T I N N N E
38354 // S S U U B B R R O O U U T I N NN E
38355 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
38356
38357 // DDDDDD OOOOO H H TTTTTTT RRRRRR L
38358 // D D O O H H T R R L
38359 // D D O O H H T R R L
38360 // D D O O HHHHHHH T RRRRRR L
38361 // D D O O H H T R R L
38362 // D D O O H H T R R L
38363 // DDDDDD OOOOO H H T R R LLLLLLL
38364
38365
38366 // VIF THU 20 NOV 2025 22:21:23 ** DOHTRL ** DIAGNOSTICS PAGE 00989
38367
38368
38369 // VIF THU 20 NOV 2025 22:21:23 ** DOHTRL ** GENERATED CODE PAGE 00990
38370
38371 int_4 _dohtrl (real_8 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_8 _p_ diag_, int_4 _p_ irank_, real_8 _p_ div_,
38372 real_8 _p_ td_)
38373 { // ** body not listed **
38406 }
38407
38408 // VIF THU 20 NOV 2025 22:21:23 ** DORTHR ** DORTHR PAGE 00991
38409
38410 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
38411 // S S U U B B R R O O U U T I NN N E
38412 // S U U B B R R O O U U T I N N N E
38413 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
38414 // S U U B B R R O O U U T I N N N E
38415 // S S U U B B R R O O U U T I N NN E
38416 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
38417
38418 // DDDDDD OOOOO RRRRRR TTTTTTT H H RRRRRR
38419 // D D O O R R T H H R R
38420 // D D O O R R T H H R R
38421 // D D O O RRRRRR T HHHHHHH RRRRRR
38422 // D D O O R R T H H R R
38423 // D D O O R R T H H R R
38424 // DDDDDD OOOOO R R T H H R R
38425
38426
38427 // VIF THU 20 NOV 2025 22:21:23 ** DORTHR ** DIAGNOSTICS PAGE 00992
38428
38429
38430 // VIF THU 20 NOV 2025 22:21:23 ** DORTHR ** GENERATED CODE PAGE 00993
38431
38432 int_4 _dorthr (real_8 _p_ a_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_, int_4
38433 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_)
38434 { // ** body not listed **
38544 }
38545
38546 // VIF THU 20 NOV 2025 22:21:23 ** DP1VLU ** DP1VLU PAGE 00996
38547
38548 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
38549 // S S U U B B R R O O U U T I NN N E
38550 // S U U B B R R O O U U T I N N N E
38551 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
38552 // S U U B B R R O O U U T I N N N E
38553 // S S U U B B R R O O U U T I N NN E
38554 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
38555
38556 // DDDDDD PPPPPP 1 V V L U U
38557 // D D P P 11 V V L U U
38558 // D D P P 1 1 V V L U U
38559 // D D PPPPPP 1 V V L U U
38560 // D D P 1 V V L U U
38561 // D D P 1 V V L U U
38562 // DDDDDD P 11111 V LLLLLLL UUUUU
38563
38564
38565 // VIF THU 20 NOV 2025 22:21:23 ** DP1VLU ** DIAGNOSTICS PAGE 00997
38566
38567
38568 // VIF THU 20 NOV 2025 22:21:23 ** DP1VLU ** GENERATED CODE PAGE 00998
38569
38570 int_4 _dp1vlu (int_4 _p_ l_, int_4 _p_ nder_, real_8 _p_ x_, real_8 _p_ yfit_, real_8 _p_ yp_, real_8 _p_ a_)
38571 { // ** body not listed **
38752 }
38753
38754 // VIF THU 20 NOV 2025 22:21:23 ** DPCHNG ** DPCHNG PAGE 01002
38755
38756 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
38757 // S S U U B B R R O O U U T I NN N E
38758 // S U U B B R R O O U U T I N N N E
38759 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
38760 // S U U B B R R O O U U T I N N N E
38761 // S S U U B B R R O O U U T I N NN E
38762 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
38763
38764 // DDDDDD PPPPPP CCCCC H H N N GGGGG
38765 // D D P P C C H H NN N G G
38766 // D D P P C H H N N N G
38767 // D D PPPPPP C HHHHHHH N N N G GGGG
38768 // D D P C H H N N N G G
38769 // D D P C C H H N NN G G
38770 // DDDDDD P CCCCC H H N N GGGGG
38771
38772
38773 // VIF THU 20 NOV 2025 22:21:23 ** DPCHNG ** DIAGNOSTICS PAGE 01003
38774
38775
38776 // VIF THU 20 NOV 2025 22:21:23 ** DPCHNG ** GENERATED CODE PAGE 01004
38777
38778 int_4 _dpchng (int_4 _p_ ii_, real_8 _p_ xval_, int_4 _p_ iplace_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
38779 { // ** body not listed **
38999 }
39000
39001 // VIF THU 20 NOV 2025 22:21:23 ** DPCOEF ** DPCOEF PAGE 01009
39002
39003 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
39004 // S S U U B B R R O O U U T I NN N E
39005 // S U U B B R R O O U U T I N N N E
39006 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
39007 // S U U B B R R O O U U T I N N N E
39008 // S S U U B B R R O O U U T I N NN E
39009 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
39010
39011 // DDDDDD PPPPPP CCCCC OOOOO EEEEEEE FFFFFFF
39012 // D D P P C C O O E F
39013 // D D P P C O O E F
39014 // D D PPPPPP C O O EEEEE FFFFF
39015 // D D P C O O E F
39016 // D D P C C O O E F
39017 // DDDDDD P CCCCC OOOOO EEEEEEE F
39018
39019
39020 // VIF THU 20 NOV 2025 22:21:23 ** DPCOEF ** DIAGNOSTICS PAGE 01010
39021
39022
39023 // VIF THU 20 NOV 2025 22:21:23 ** DPCOEF ** GENERATED CODE PAGE 01011
39024
39025 int_4 _dpcoef (int_4 _p_ l_, real_8 _p_ c_, real_8 _p_ tc_, real_8 _p_ a_)
39026 { // ** body not listed **
39055 }
39056
39057 // VIF THU 20 NOV 2025 22:21:23 ** DPINCW ** DPINCW PAGE 01012
39058
39059 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
39060 // S S U U B B R R O O U U T I NN N E
39061 // S U U B B R R O O U U T I N N N E
39062 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
39063 // S U U B B R R O O U U T I N N N E
39064 // S S U U B B R R O O U U T I N NN E
39065 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
39066
39067 // DDDDDD PPPPPP III N N CCCCC W W
39068 // D D P P I NN N C C W W
39069 // D D P P I N N N C W W
39070 // D D PPPPPP I N N N C W W W
39071 // D D P I N N N C W W W
39072 // D D P I N NN C C W W W
39073 // DDDDDD P III N N CCCCC WW WW
39074
39075
39076 // VIF THU 20 NOV 2025 22:21:23 ** DPINCW ** DIAGNOSTICS PAGE 01013
39077
39078
39079 // VIF THU 20 NOV 2025 22:21:23 ** DPINCW ** GENERATED CODE PAGE 01014
39080
39081 int_4 _dpincw (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ npp_, int_4 _p_ jstrt_,
39082 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
39083 real_8 _p_ costsc_, real_8 _p_ gg_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
39084 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ costs_, real_8 _p_ colnrm_,
39085 real_8 _p_ duals_, logical_4 _p_ stpedg_)
39086 { // ** body not listed **
39222 }
39223
39224 // VIF THU 20 NOV 2025 22:21:23 ** DPINIT ** DPINIT PAGE 01017
39225
39226 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
39227 // S S U U B B R R O O U U T I NN N E
39228 // S U U B B R R O O U U T I N N N E
39229 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
39230 // S U U B B R R O O U U T I N N N E
39231 // S S U U B B R R O O U U T I N NN E
39232 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
39233
39234 // DDDDDD PPPPPP III N N III TTTTTTT
39235 // D D P P I NN N I T
39236 // D D P P I N N N I T
39237 // D D PPPPPP I N N N I T
39238 // D D P I N N N I T
39239 // D D P I N NN I T
39240 // DDDDDD P III N N III T
39241
39242
39243 // VIF THU 20 NOV 2025 22:21:23 ** DPINIT ** DIAGNOSTICS PAGE 01018
39244
39245
39246 // VIF THU 20 NOV 2025 22:21:23 ** DPINIT ** GENERATED CODE PAGE 01019
39247
39248 int_4 _dpinit (int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_,
39249 real_8 _p_ primal_, int_4 _p_ info_, real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ costsc_, real_8 _p_ colnrm_, real_8
39250 _p_ xlamda_, real_8 _p_ anorm_, real_8 _p_ rhs_, real_8 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_
39251 , logical_4 _p_ lopt_)
39252 { // ** body not listed **
39534 }
39535
39536 // VIF THU 20 NOV 2025 22:21:23 ** DPINTM ** DPINTM PAGE 01025
39537
39538 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
39539 // S S U U B B R R O O U U T I NN N E
39540 // S U U B B R R O O U U T I N N N E
39541 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
39542 // S U U B B R R O O U U T I N N N E
39543 // S S U U B B R R O O U U T I N NN E
39544 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
39545
39546 // DDDDDD PPPPPP III N N TTTTTTT M M
39547 // D D P P I NN N T MM MM
39548 // D D P P I N N N T M M M M
39549 // D D PPPPPP I N N N T M M M
39550 // D D P I N N N T M M
39551 // D D P I N NN T M M
39552 // DDDDDD P III N N T M M
39553
39554
39555 // VIF THU 20 NOV 2025 22:21:23 ** DPINTM ** DIAGNOSTICS PAGE 01026
39556
39557
39558 // VIF THU 20 NOV 2025 22:21:23 ** DPINTM ** GENERATED CODE PAGE 01027
39559
39560 int_4 _dpintm (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_ lmx_, int_4 _p_ ipagef_)
39561 { // ** body not listed **
39638 }
39639
39640 // VIF THU 20 NOV 2025 22:21:23 ** DPLINT ** DPLINT PAGE 01029
39641
39642 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
39643 // S S U U B B R R O O U U T I NN N E
39644 // S U U B B R R O O U U T I N N N E
39645 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
39646 // S U U B B R R O O U U T I N N N E
39647 // S S U U B B R R O O U U T I N NN E
39648 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
39649
39650 // DDDDDD PPPPPP L III N N TTTTTTT
39651 // D D P P L I NN N T
39652 // D D P P L I N N N T
39653 // D D PPPPPP L I N N N T
39654 // D D P L I N N N T
39655 // D D P L I N NN T
39656 // DDDDDD P LLLLLLL III N N T
39657
39658
39659 // VIF THU 20 NOV 2025 22:21:23 ** DPLINT ** DIAGNOSTICS PAGE 01030
39660
39661
39662 // VIF THU 20 NOV 2025 22:21:23 ** DPLINT ** GENERATED CODE PAGE 01031
39663
39664 int_4 _dplint (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ c_)
39665 { // ** body not listed **
39696 }
39697
39698 // VIF THU 20 NOV 2025 22:21:23 ** DPLPCE ** DPLPCE PAGE 01032
39699
39700 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
39701 // S S U U B B R R O O U U T I NN N E
39702 // S U U B B R R O O U U T I N N N E
39703 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
39704 // S U U B B R R O O U U T I N N N E
39705 // S S U U B B R R O O U U T I N NN E
39706 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
39707
39708 // DDDDDD PPPPPP L PPPPPP CCCCC EEEEEEE
39709 // D D P P L P P C C E
39710 // D D P P L P P C E
39711 // D D PPPPPP L PPPPPP C EEEEE
39712 // D D P L P C E
39713 // D D P L P C C E
39714 // DDDDDD P LLLLLLL P CCCCC EEEEEEE
39715
39716
39717 // VIF THU 20 NOV 2025 22:21:23 ** DPLPCE ** DIAGNOSTICS PAGE 01033
39718
39719
39720 // VIF THU 20 NOV 2025 22:21:23 ** DPLPCE ** GENERATED CODE PAGE 01034
39721
39722 int_4 _dplpce (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ itlp_, int_4 _p_ itbrc_,
39723 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
39724 real_8 _p_ erdnrm_, real_8 _p_ eps_, real_8 _p_ tune_, real_8 _p_ gg_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_
39725 csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ primal_, real_8 _p_ erd_, real_8 _p_ erp_, logical_4 _p_ singlr_,
39726 logical_4 _p_ redbas_)
39727 { // ** body not listed **
39926 }
39927
39928 // VIF THU 20 NOV 2025 22:21:23 ** DPLPDM ** DPLPDM PAGE 01038
39929
39930 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
39931 // S S U U B B R R O O U U T I NN N E
39932 // S U U B B R R O O U U T I N N N E
39933 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
39934 // S U U B B R R O O U U T I N N N E
39935 // S S U U B B R R O O U U T I N NN E
39936 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
39937
39938 // DDDDDD PPPPPP L PPPPPP DDDDDD M M
39939 // D D P P L P P D D MM MM
39940 // D D P P L P P D D M M M M
39941 // D D PPPPPP L PPPPPP D D M M M
39942 // D D P L P D D M M
39943 // D D P L P D D M M
39944 // DDDDDD P LLLLLLL P DDDDDD M M
39945
39946
39947 // VIF THU 20 NOV 2025 22:21:23 ** DPLPDM ** DIAGNOSTICS PAGE 01039
39948
39949
39950 // VIF THU 20 NOV 2025 22:21:23 ** DPLPDM ** GENERATED CODE PAGE 01040
39951
39952 int_4 _dplpdm (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
39953 int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_,
39954 int_4 _p_ ibb_, real_8 _p_ anorm_, real_8 _p_ eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ amat_, real_8 _p_
39955 basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
39956 { // ** body not listed **
40058 }
40059
40060 // VIF THU 20 NOV 2025 22:21:23 ** DPLPFE ** DPLPFE PAGE 01043
40061
40062 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
40063 // S S U U B B R R O O U U T I NN N E
40064 // S U U B B R R O O U U T I N N N E
40065 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
40066 // S U U B B R R O O U U T I N N N E
40067 // S S U U B B R R O O U U T I N NN E
40068 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
40069
40070 // DDDDDD PPPPPP L PPPPPP FFFFFFF EEEEEEE
40071 // D D P P L P P F E
40072 // D D P P L P P F E
40073 // D D PPPPPP L PPPPPP FFFFF EEEEE
40074 // D D P L P F E
40075 // D D P L P F E
40076 // DDDDDD P LLLLLLL P F EEEEEEE
40077
40078
40079 // VIF THU 20 NOV 2025 22:21:23 ** DPLPFE ** DIAGNOSTICS PAGE 01044
40080
40081
40082 // VIF THU 20 NOV 2025 22:21:23 ** DPLPFE ** GENERATED CODE PAGE 01045
40083
40084 int_4 _dplpfe (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ ienter_, int_4 _p_
40085 ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_
40086 erdnrm_, real_8 _p_ eps_, real_8 _p_ gg_, real_8 _p_ dulnrm_, real_8 _p_ dirnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
40087 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ rz_, real_8 _p_ rg_, real_8
40088 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_)
40089 { // ** body not listed **
40244 }
40245
40246 // VIF THU 20 NOV 2025 22:21:23 ** DPLPFL ** DPLPFL PAGE 01049
40247
40248 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
40249 // S S U U B B R R O O U U T I NN N E
40250 // S U U B B R R O O U U T I N N N E
40251 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
40252 // S U U B B R R O O U U T I N N N E
40253 // S S U U B B R R O O U U T I N NN E
40254 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
40255
40256 // DDDDDD PPPPPP L PPPPPP FFFFFFF L
40257 // D D P P L P P F L
40258 // D D P P L P P F L
40259 // D D PPPPPP L PPPPPP FFFFF L
40260 // D D P L P F L
40261 // D D P L P F L
40262 // DDDDDD P LLLLLLL P F LLLLLLL
40263
40264
40265 // VIF THU 20 NOV 2025 22:21:23 ** DPLPFL ** DIAGNOSTICS PAGE 01050
40266
40267
40268 // VIF THU 20 NOV 2025 22:21:23 ** DPLPFL ** GENERATED CODE PAGE 01051
40269
40270 int_4 _dplpfl (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ ibasis_, int_4 _p_
40271 ind_, int_4 _p_ ibb_, real_8 _p_ theta_, real_8 _p_ dirnrm_, real_8 _p_ rprnrm_, real_8 _p_ csc_, real_8 _p_ ww_,
40272 real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ erp_, real_8 _p_ rprim_, real_8 _p_ primal_, logical_4 _p_ finite_,
40273 logical_4 _p_ zerolv_)
40274 { // ** body not listed **
40430 }
40431
40432 // VIF THU 20 NOV 2025 22:21:23 ** DPLPMN ** DPLPMN PAGE 01055
40433
40434 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
40435 // S S U U B B R R O O U U T I NN N E
40436 // S U U B B R R O O U U T I N N N E
40437 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
40438 // S U U B B R R O O U U T I N N N E
40439 // S S U U B B R R O O U U T I N NN E
40440 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
40441
40442 // DDDDDD PPPPPP L PPPPPP M M N N
40443 // D D P P L P P MM MM NN N
40444 // D D P P L P P M M M M N N N
40445 // D D PPPPPP L PPPPPP M M M N N N
40446 // D D P L P M M N N N
40447 // D D P L P M M N NN
40448 // DDDDDD P LLLLLLL P M M N N
40449
40450
40451 // VIF THU 20 NOV 2025 22:21:23 ** DPLPMN ** DIAGNOSTICS PAGE 01056
40452
40453
40454 // VIF THU 20 NOV 2025 22:21:23 ** DPLPMN ** GENERATED CODE PAGE 01057
40455
40456 int_4 _dplpmn (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
40457 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_, real_8 _p_ duals_,
40458 real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ colnrm_, real_8 _p_ erd_, real_8 _p_ erp_, real_8 _p_ basmat_, real_8 _p_
40459 wr_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ rprim_, real_8 _p_ rhs_, real_8 _p_ ww_, int_4 _p_ lmx_, int_4 _p_ lbm_
40460 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
40461 { // ** body not listed **
41779 }
41780
41781 // VIF THU 20 NOV 2025 22:21:23 ** DPLPMU ** DPLPMU PAGE 01083
41782
41783 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
41784 // S S U U B B R R O O U U T I NN N E
41785 // S U U B B R R O O U U T I N N N E
41786 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
41787 // S U U B B R R O O U U T I N N N E
41788 // S S U U B B R R O O U U T I N NN E
41789 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
41790
41791 // DDDDDD PPPPPP L PPPPPP M M U U
41792 // D D P P L P P MM MM U U
41793 // D D P P L P P M M M M U U
41794 // D D PPPPPP L PPPPPP M M M U U
41795 // D D P L P M M U U
41796 // D D P L P M M U U
41797 // DDDDDD P LLLLLLL P M M UUUUU
41798
41799
41800 // VIF THU 20 NOV 2025 22:21:23 ** DPLPMU ** DIAGNOSTICS PAGE 01084
41801
41802
41803 // VIF THU 20 NOV 2025 22:21:23 ** DPLPMU ** GENERATED CODE PAGE 01085
41804
41805 int_4 _dplpmu (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
41806 int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_, int_4 _p_
41807 imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ anorm_, real_8 _p_
41808 eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ rprnrm_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ theta_,
41809 real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_ csc_,
41810 real_8 _p_ wr_, real_8 _p_ rprim_, real_8 _p_ ww_, real_8 _p_ bu_, real_8 _p_ bl_, real_8 _p_ rhs_, real_8 _p_ erd_,
41811 real_8 _p_ erp_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ colnrm_, real_8 _p_ costs_, real_8 _p_ primal_, real_8 _p_
41812 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
41813 { // ** body not listed **
42289 }
42290
42291 // VIF THU 20 NOV 2025 22:21:23 ** DPLPUP ** DPLPUP PAGE 01095
42292
42293 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
42294 // S S U U B B R R O O U U T I NN N E
42295 // S U U B B R R O O U U T I N N N E
42296 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
42297 // S U U B B R R O O U U T I N N N E
42298 // S S U U B B R R O O U U T I N NN E
42299 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
42300
42301 // DDDDDD PPPPPP L PPPPPP U U PPPPPP
42302 // D D P P L P P U U P P
42303 // D D P P L P P U U P P
42304 // D D PPPPPP L PPPPPP U U PPPPPP
42305 // D D P L P U U P
42306 // D D P L P U U P
42307 // DDDDDD P LLLLLLL P UUUUU P
42308
42309
42310 // VIF THU 20 NOV 2025 22:21:23 ** DPLPUP ** DIAGNOSTICS PAGE 01096
42311
42312
42313 // VIF THU 20 NOV 2025 22:21:23 ** DPLPUP ** GENERATED CODE PAGE 01097
42314
42315 int_4 _dplpup (int_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ prgopt_, real_8 _p_ dattrv_, real_8
42316 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ amat_, int_4 _p_ imat_, logical_4 _p_ sizeup_,
42317 real_8 _p_ asmall_, real_8 _p_ abig_)
42318 { // ** body not listed **
42892 }
42893
42894 // VIF THU 20 NOV 2025 22:21:23 ** DPNNZR ** DPNNZR PAGE 01109
42895
42896 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
42897 // S S U U B B R R O O U U T I NN N E
42898 // S U U B B R R O O U U T I N N N E
42899 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
42900 // S U U B B R R O O U U T I N N N E
42901 // S S U U B B R R O O U U T I N NN E
42902 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
42903
42904 // DDDDDD PPPPPP N N N N ZZZZZZZ RRRRRR
42905 // D D P P NN N NN N Z R R
42906 // D D P P N N N N N N Z R R
42907 // D D PPPPPP N N N N N N Z RRRRRR
42908 // D D P N N N N N N Z R R
42909 // D D P N NN N NN * R R
42910 // DDDDDD P N N N N ZZZZZZZ R R
42911
42912
42913 // VIF THU 20 NOV 2025 22:21:23 ** DPNNZR ** DIAGNOSTICS PAGE 01110
42914
42915
42916 // VIF THU 20 NOV 2025 22:21:23 ** DPNNZR ** GENERATED CODE PAGE 01111
42917
42918 int_4 _dpnnzr (int_4 _p_ i_, real_8 _p_ xval_, int_4 _p_ iplace_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
42919 { // ** body not listed **
43132 }
43133
43134 // VIF THU 20 NOV 2025 22:21:23 ** DPOFS ** DPOFS PAGE 01116
43135
43136 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
43137 // S S U U B B R R O O U U T I NN N E
43138 // S U U B B R R O O U U T I N N N E
43139 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
43140 // S U U B B R R O O U U T I N N N E
43141 // S S U U B B R R O O U U T I N NN E
43142 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
43143
43144 // DDDDDD PPPPPP OOOOO FFFFFFF SSSSS
43145 // D D P P O O F S S
43146 // D D P P O O F S
43147 // D D PPPPPP O O FFFFF SSSSS
43148 // D D P O O F S
43149 // D D P O O F S S
43150 // DDDDDD P OOOOO F SSSSS
43151
43152
43153 // VIF THU 20 NOV 2025 22:21:23 ** DPOFS ** DIAGNOSTICS PAGE 01117
43154
43155
43156 // VIF THU 20 NOV 2025 22:21:23 ** DPOFS ** GENERATED CODE PAGE 01118
43157
43158 int_4 _dpofs (real_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_
43159 work_)
43160 { // ** body not listed **
43362 }
43363
43364 // VIF THU 20 NOV 2025 22:21:23 ** DPOLCF ** DPOLCF PAGE 01122
43365
43366 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
43367 // S S U U B B R R O O U U T I NN N E
43368 // S U U B B R R O O U U T I N N N E
43369 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
43370 // S U U B B R R O O U U T I N N N E
43371 // S S U U B B R R O O U U T I N NN E
43372 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
43373
43374 // DDDDDD PPPPPP OOOOO L CCCCC FFFFFFF
43375 // D D P P O O L C C F
43376 // D D P P O O L C F
43377 // D D PPPPPP O O L C FFFFF
43378 // D D P O O L C F
43379 // D D P O O L C C F
43380 // DDDDDD P OOOOO LLLLLLL CCCCC F
43381
43382
43383 // VIF THU 20 NOV 2025 22:21:23 ** DPOLCF ** DIAGNOSTICS PAGE 01123
43384
43385
43386 // VIF THU 20 NOV 2025 22:21:23 ** DPOLCF ** GENERATED CODE PAGE 01124
43387
43388 int_4 _dpolcf (real_8 _p_ xx_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ c_, real_8 _p_ d_, real_8 _p_ work_)
43389 { // ** body not listed **
43428 }
43429
43430 // VIF THU 20 NOV 2025 22:21:23 ** DPOLFT ** DPOLFT PAGE 01125
43431
43432 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
43433 // S S U U B B R R O O U U T I NN N E
43434 // S U U B B R R O O U U T I N N N E
43435 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
43436 // S U U B B R R O O U U T I N N N E
43437 // S S U U B B R R O O U U T I N NN E
43438 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
43439
43440 // DDDDDD PPPPPP OOOOO L FFFFFFF TTTTTTT
43441 // D D P P O O L F T
43442 // D D P P O O L F T
43443 // D D PPPPPP O O L FFFFF T
43444 // D D P O O L F T
43445 // D D P O O L F T
43446 // DDDDDD P OOOOO LLLLLLL F T
43447
43448
43449 // VIF THU 20 NOV 2025 22:21:23 ** DPOLFT ** DIAGNOSTICS PAGE 01126
43450
43451
43452 // VIF THU 20 NOV 2025 22:21:23 ** DPOLFT ** GENERATED CODE PAGE 01127
43453
43454 int_4 _dpolft (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ w_, int_4 _p_ maxdeg_, int_4 _p_ ndeg_, real_8
43455 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_)
43456 { // ** body not listed **
43789 }
43790
43791 // VIF THU 20 NOV 2025 22:21:23 ** DPOLVL ** DPOLVL PAGE 01134
43792
43793 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
43794 // S S U U B B R R O O U U T I NN N E
43795 // S U U B B R R O O U U T I N N N E
43796 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
43797 // S U U B B R R O O U U T I N N N E
43798 // S S U U B B R R O O U U T I N NN E
43799 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
43800
43801 // DDDDDD PPPPPP OOOOO L V V L
43802 // D D P P O O L V V L
43803 // D D P P O O L V V L
43804 // D D PPPPPP O O L V V L
43805 // D D P O O L V V L
43806 // D D P O O L V V L
43807 // DDDDDD P OOOOO LLLLLLL V LLLLLLL
43808
43809
43810 // VIF THU 20 NOV 2025 22:21:23 ** DPOLVL ** DIAGNOSTICS PAGE 01135
43811
43812
43813 // VIF THU 20 NOV 2025 22:21:23 ** DPOLVL ** GENERATED CODE PAGE 01136
43814
43815 int_4 _dpolvl (int_4 _p_ nder_, real_8 _p_ xx_, real_8 _p_ yfit_, real_8 _p_ yp_, int_4 _p_ n_, real_8 _p_ x_, real_8
43816 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_)
43817 { // ** body not listed **
43913 }
43914
43915 // VIF THU 20 NOV 2025 22:21:23 ** DPOPT ** DPOPT PAGE 01138
43916
43917 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
43918 // S S U U B B R R O O U U T I NN N E
43919 // S U U B B R R O O U U T I N N N E
43920 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
43921 // S U U B B R R O O U U T I N N N E
43922 // S S U U B B R R O O U U T I N NN E
43923 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
43924
43925 // DDDDDD PPPPPP OOOOO PPPPPP TTTTTTT
43926 // D D P P O O P P T
43927 // D D P P O O P P T
43928 // D D PPPPPP O O PPPPPP T
43929 // D D P O O P T
43930 // D D P O O P T
43931 // DDDDDD P OOOOO P T
43932
43933
43934 // VIF THU 20 NOV 2025 22:21:23 ** DPOPT ** DIAGNOSTICS PAGE 01139
43935
43936
43937 // VIF THU 20 NOV 2025 22:21:23 ** DPOPT ** GENERATED CODE PAGE 01140
43938
43939 int_4 _dpopt (real_8 _p_ prgopt_, int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ info_, real_8 _p_ csc_, int_4 _p_
43940 ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
43941 { // ** body not listed **
44311 }
44312
44313 // VIF THU 20 NOV 2025 22:21:23 ** DPPERM ** DPPERM PAGE 01148
44314
44315 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
44316 // S S U U B B R R O O U U T I NN N E
44317 // S U U B B R R O O U U T I N N N E
44318 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
44319 // S U U B B R R O O U U T I N N N E
44320 // S S U U B B R R O O U U T I N NN E
44321 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
44322
44323 // DDDDDD PPPPPP PPPPPP EEEEEEE RRRRRR M M
44324 // D D P P P P E R R MM MM
44325 // D D P P P P E R R M M M M
44326 // D D PPPPPP PPPPPP EEEEE RRRRRR M M M
44327 // D D P P E R R M M
44328 // D D P P E R R M M
44329 // DDDDDD P P EEEEEEE R R M M
44330
44331
44332 // VIF THU 20 NOV 2025 22:21:23 ** DPPERM ** DIAGNOSTICS PAGE 01149
44333
44334
44335 // VIF THU 20 NOV 2025 22:21:23 ** DPPERM ** GENERATED CODE PAGE 01150
44336
44337 int_4 _dpperm (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
44338 { // ** body not listed **
44383 }
44384
44385 // VIF THU 20 NOV 2025 22:21:23 ** DPPGQ8 ** DPPGQ8 PAGE 01151
44386
44387 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
44388 // S S U U B B R R O O U U T I NN N E
44389 // S U U B B R R O O U U T I N N N E
44390 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
44391 // S U U B B R R O O U U T I N N N E
44392 // S S U U B B R R O O U U T I N NN E
44393 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
44394
44395 // DDDDDD PPPPPP PPPPPP GGGGG QQQQQ 88888
44396 // D D P P P P G G Q Q 8 8
44397 // D D P P P P G Q Q 8 8
44398 // D D PPPPPP PPPPPP G GGGG Q Q 88888
44399 // D D P P G G Q Q Q 8 8
44400 // D D P P G G Q Q 8 8
44401 // DDDDDD P P GGGGG QQQQ Q 88888
44402
44403
44404 // VIF THU 20 NOV 2025 22:21:23 ** DPPGQ8 ** DIAGNOSTICS PAGE 01152
44405
44406
44407 // VIF THU 20 NOV 2025 22:21:23 ** DPPGQ8 ** GENERATED CODE PAGE 01153
44408
44409 int_4 _dppgq8 (real_8 (*_fun)(), int_4 _p_ ldc_, real_8 _p_ c_, real_8 _p_ xi_, int_4 _p_ lxi_, int_4 _p_ kk_, int_4
44410 _p_ id_, real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ inppv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_)
44411 { // ** body not listed **
44704 }
44705
44706 // VIF THU 20 NOV 2025 22:21:23 ** DPRVEC ** DPRVEC PAGE 01159
44707
44708 // RRRRRR EEEEEEE A L 88888
44709 // R R E A A L * * 8 8
44710 // R R E A A L * * 8 8
44711 // RRRRRR EEEEE A A L ******* 88888
44712 // R R E AAAAAAA L * * 8 8
44713 // R R E A A L * * 8 8
44714 // R R EEEEEEE A A LLLLLLL 88888
44715
44716 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
44717 // F U U NN N C C T I O O NN N
44718 // F U U N N N C T I O O N N N
44719 // FFFFF U U N N N C T I O O N N N
44720 // F U U N N N C T I O O N N N
44721 // F U U N NN C C T I O O N NN
44722 // F UUUUU N N CCCCC T III OOOOO N N
44723
44724 // DDDDDD PPPPPP RRRRRR V V EEEEEEE CCCCC
44725 // D D P P R R V V E C C
44726 // D D P P R R V V E C
44727 // D D PPPPPP RRRRRR V V EEEEE C
44728 // D D P R R V V E C
44729 // D D P R R V V E C C
44730 // DDDDDD P R R V EEEEEEE CCCCC
44731
44732
44733 // VIF THU 20 NOV 2025 22:21:23 ** DPRVEC ** DIAGNOSTICS PAGE 01160
44734
44735
44736 // VIF THU 20 NOV 2025 22:21:23 ** DPRVEC ** GENERATED CODE PAGE 01161
44737
44738 real_8 _dprvec (int_4 _p_ m_, real_8 _p_ u_, real_8 _p_ v_)
44739 { // ** body not listed **
44750 }
44751
44752 // VIF THU 20 NOV 2025 22:21:23 ** DPRWPG ** DPRWPG PAGE 01162
44753
44754 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
44755 // S S U U B B R R O O U U T I NN N E
44756 // S U U B B R R O O U U T I N N N E
44757 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
44758 // S U U B B R R O O U U T I N N N E
44759 // S S U U B B R R O O U U T I N NN E
44760 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
44761
44762 // DDDDDD PPPPPP RRRRRR W W PPPPPP GGGGG
44763 // D D P P R R W W P P G G
44764 // D D P P R R W W P P G
44765 // D D PPPPPP RRRRRR W W W PPPPPP G GGGG
44766 // D D P R R W W W P G G
44767 // D D P R R W W W P G G
44768 // DDDDDD P R R WW WW P GGGGG
44769
44770
44771 // VIF THU 20 NOV 2025 22:21:23 ** DPRWPG ** DIAGNOSTICS PAGE 01163
44772
44773
44774 // VIF THU 20 NOV 2025 22:21:23 ** DPRWPG ** GENERATED CODE PAGE 01164
44775
44776 int_4 _dprwpg (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
44777 { // ** body not listed **
44797 }
44798
44799 // VIF THU 20 NOV 2025 22:21:23 ** DPRWVR ** DPRWVR PAGE 01165
44800
44801 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
44802 // S S U U B B R R O O U U T I NN N E
44803 // S U U B B R R O O U U T I N N N E
44804 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
44805 // S U U B B R R O O U U T I N N N E
44806 // S S U U B B R R O O U U T I N NN E
44807 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
44808
44809 // DDDDDD PPPPPP RRRRRR W W V V RRRRRR
44810 // D D P P R R W W V V R R
44811 // D D P P R R W W V V R R
44812 // D D PPPPPP RRRRRR W W W V V RRRRRR
44813 // D D P R R W W W V V R R
44814 // D D P R R W W W V V R R
44815 // DDDDDD P R R WW WW V R R
44816
44817
44818 // VIF THU 20 NOV 2025 22:21:23 ** DPRWVR ** DIAGNOSTICS PAGE 01166
44819
44820
44821 // VIF THU 20 NOV 2025 22:21:23 ** DPRWVR ** GENERATED CODE PAGE 01167
44822
44823 int_4 _dprwvr (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
44824 { // ** body not listed **
44871 }
44872
44873 // VIF THU 20 NOV 2025 22:21:23 ** DPSIXN ** DPSIXN PAGE 01168
44874
44875 // RRRRRR EEEEEEE A L 88888
44876 // R R E A A L * * 8 8
44877 // R R E A A L * * 8 8
44878 // RRRRRR EEEEE A A L ******* 88888
44879 // R R E AAAAAAA L * * 8 8
44880 // R R E A A L * * 8 8
44881 // R R EEEEEEE A A LLLLLLL 88888
44882
44883 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
44884 // F U U NN N C C T I O O NN N
44885 // F U U N N N C T I O O N N N
44886 // FFFFF U U N N N C T I O O N N N
44887 // F U U N N N C T I O O N N N
44888 // F U U N NN C C T I O O N NN
44889 // F UUUUU N N CCCCC T III OOOOO N N
44890
44891 // DDDDDD PPPPPP SSSSS III X X N N
44892 // D D P P S S I X X NN N
44893 // D D P P S I X X N N N
44894 // D D PPPPPP SSSSS I X N N N
44895 // D D P S I X X N N N
44896 // D D P S S I X X N NN
44897 // DDDDDD P SSSSS III X X N N
44898
44899
44900 // VIF THU 20 NOV 2025 22:21:23 ** DPSIXN ** DIAGNOSTICS PAGE 01169
44901
44902
44903 // VIF THU 20 NOV 2025 22:21:23 ** DPSIXN ** GENERATED CODE PAGE 01170
44904
44905 real_8 _dpsixn (int_4 _p_ n_)
44906 { // ** body not listed **
45639 }
45640
45641 // VIF THU 20 NOV 2025 22:21:23 ** DPSORT ** DPSORT PAGE 01185
45642
45643 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
45644 // S S U U B B R R O O U U T I NN N E
45645 // S U U B B R R O O U U T I N N N E
45646 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
45647 // S U U B B R R O O U U T I N N N E
45648 // S S U U B B R R O O U U T I N NN E
45649 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
45650
45651 // DDDDDD PPPPPP SSSSS OOOOO RRRRRR TTTTTTT
45652 // D D P P S S O O R R T
45653 // D D P P S O O R R T
45654 // D D PPPPPP SSSSS O O RRRRRR T
45655 // D D P S O O R R T
45656 // D D P S S O O R R T
45657 // DDDDDD P SSSSS OOOOO R R T
45658
45659
45660 // VIF THU 20 NOV 2025 22:21:23 ** DPSORT ** DIAGNOSTICS PAGE 01186
45661
45662
45663 // VIF THU 20 NOV 2025 22:21:23 ** DPSORT ** GENERATED CODE PAGE 01187
45664
45665 int_4 _dpsort (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
45666 { // ** body not listed **
45830 }
45831
45832 // VIF THU 20 NOV 2025 22:21:23 ** DQDOTA ** DQDOTA PAGE 01191
45833
45834 // RRRRRR EEEEEEE A L 88888
45835 // R R E A A L * * 8 8
45836 // R R E A A L * * 8 8
45837 // RRRRRR EEEEE A A L ******* 88888
45838 // R R E AAAAAAA L * * 8 8
45839 // R R E A A L * * 8 8
45840 // R R EEEEEEE A A LLLLLLL 88888
45841
45842 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
45843 // F U U NN N C C T I O O NN N
45844 // F U U N N N C T I O O N N N
45845 // FFFFF U U N N N C T I O O N N N
45846 // F U U N N N C T I O O N N N
45847 // F U U N NN C C T I O O N NN
45848 // F UUUUU N N CCCCC T III OOOOO N N
45849
45850 // DDDDDD QQQQQ DDDDDD OOOOO TTTTTTT A
45851 // D D Q Q D D O O T A A
45852 // D D Q Q D D O O T A A
45853 // D D Q Q D D O O T A A
45854 // D D Q Q Q D D O O T AAAAAAA
45855 // D D Q Q D D O O T A A
45856 // DDDDDD QQQQ Q DDDDDD OOOOO T A A
45857
45858
45859 // VIF THU 20 NOV 2025 22:21:23 ** DQDOTA ** DIAGNOSTICS PAGE 01192
45860
45861
45862 // VIF THU 20 NOV 2025 22:21:23 ** DQDOTA ** GENERATED CODE PAGE 01193
45863
45864 real_8 _dqdota (int_4 _p_ n_, real_8 _p_ db_, int_4 _p_ qc_, real_8 _p_ dx_, int_4 _p_ incx_, real_8 _p_ dy_, int_4 _p_
45865 incy_)
45866 { // ** body not listed **
45916 }
45917
45918 // VIF THU 20 NOV 2025 22:21:23 ** DQDOTI ** DQDOTI PAGE 01195
45919
45920 // RRRRRR EEEEEEE A L 88888
45921 // R R E A A L * * 8 8
45922 // R R E A A L * * 8 8
45923 // RRRRRR EEEEE A A L ******* 88888
45924 // R R E AAAAAAA L * * 8 8
45925 // R R E A A L * * 8 8
45926 // R R EEEEEEE A A LLLLLLL 88888
45927
45928 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
45929 // F U U NN N C C T I O O NN N
45930 // F U U N N N C T I O O N N N
45931 // FFFFF U U N N N C T I O O N N N
45932 // F U U N N N C T I O O N N N
45933 // F U U N NN C C T I O O N NN
45934 // F UUUUU N N CCCCC T III OOOOO N N
45935
45936 // DDDDDD QQQQQ DDDDDD OOOOO TTTTTTT III
45937 // D D Q Q D D O O T I
45938 // D D Q Q D D O O T I
45939 // D D Q Q D D O O T I
45940 // D D Q Q Q D D O O T I
45941 // D D Q Q D D O O T I
45942 // DDDDDD QQQQ Q DDDDDD OOOOO T III
45943
45944
45945 // VIF THU 20 NOV 2025 22:21:23 ** DQDOTI ** DIAGNOSTICS PAGE 01196
45946
45947
45948 // VIF THU 20 NOV 2025 22:21:23 ** DQDOTI ** GENERATED CODE PAGE 01197
45949
45950 real_8 _dqdoti (int_4 _p_ n_, real_8 _p_ db_, int_4 _p_ qc_, real_8 _p_ dx_, int_4 _p_ incx_, real_8 _p_ dy_, int_4 _p_
45951 incy_)
45952 { // ** body not listed **
46003 }
46004
46005 // VIF THU 20 NOV 2025 22:21:23 ** DQFORM ** DQFORM PAGE 01199
46006
46007 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
46008 // S S U U B B R R O O U U T I NN N E
46009 // S U U B B R R O O U U T I N N N E
46010 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
46011 // S U U B B R R O O U U T I N N N E
46012 // S S U U B B R R O O U U T I N NN E
46013 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
46014
46015 // DDDDDD QQQQQ FFFFFFF OOOOO RRRRRR M M
46016 // D D Q Q F O O R R MM MM
46017 // D D Q Q F O O R R M M M M
46018 // D D Q Q FFFFF O O RRRRRR M M M
46019 // D D Q Q Q F O O R R M M
46020 // D D Q Q F O O R R M M
46021 // DDDDDD QQQQ Q F OOOOO R R M M
46022
46023
46024 // VIF THU 20 NOV 2025 22:21:23 ** DQFORM ** DIAGNOSTICS PAGE 01200
46025
46026
46027 // VIF THU 20 NOV 2025 22:21:23 ** DQFORM ** GENERATED CODE PAGE 01201
46028
46029 int_4 _dqform (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ q_, int_4 _p_ ldq_, real_8 _p_ wa_)
46030 { // ** body not listed **
46100 }
46101
46102 // VIF THU 20 NOV 2025 22:21:23 ** DQRFAC ** DQRFAC PAGE 01203
46103
46104 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
46105 // S S U U B B R R O O U U T I NN N E
46106 // S U U B B R R O O U U T I N N N E
46107 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
46108 // S U U B B R R O O U U T I N N N E
46109 // S S U U B B R R O O U U T I N NN E
46110 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
46111
46112 // DDDDDD QQQQQ RRRRRR FFFFFFF A CCCCC
46113 // D D Q Q R R F A A C C
46114 // D D Q Q R R F A A C
46115 // D D Q Q RRRRRR FFFFF A A C
46116 // D D Q Q Q R R F AAAAAAA C
46117 // D D Q Q R R F A A C C
46118 // DDDDDD QQQQ Q R R F A A CCCCC
46119
46120
46121 // VIF THU 20 NOV 2025 22:21:23 ** DQRFAC ** DIAGNOSTICS PAGE 01204
46122
46123
46124 // VIF THU 20 NOV 2025 22:21:23 ** DQRFAC ** GENERATED CODE PAGE 01205
46125
46126 int_4 _dqrfac (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ lda_, logical_4 _p_ pivot_, int_4 _p_ ipvt_, int_4
46127 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_)
46128 { // ** body not listed **
46238 }
46239
46240 // VIF THU 20 NOV 2025 22:21:23 ** DQRSLV ** DQRSLV PAGE 01208
46241
46242 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
46243 // S S U U B B R R O O U U T I NN N E
46244 // S U U B B R R O O U U T I N N N E
46245 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
46246 // S U U B B R R O O U U T I N N N E
46247 // S S U U B B R R O O U U T I N NN E
46248 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
46249
46250 // DDDDDD QQQQQ RRRRRR SSSSS L V V
46251 // D D Q Q R R S S L V V
46252 // D D Q Q R R S L V V
46253 // D D Q Q RRRRRR SSSSS L V V
46254 // D D Q Q Q R R S L V V
46255 // D D Q Q R R S S L V V
46256 // DDDDDD QQQQ Q R R SSSSS LLLLLLL V
46257
46258
46259 // VIF THU 20 NOV 2025 22:21:23 ** DQRSLV ** DIAGNOSTICS PAGE 01209
46260
46261
46262 // VIF THU 20 NOV 2025 22:21:23 ** DQRSLV ** GENERATED CODE PAGE 01210
46263
46264 int_4 _dqrslv (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ ipvt_, real_8 _p_ diag_, real_8 _p_ qtb_, real_8
46265 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_)
46266 { // ** body not listed **
46382 }
46383
46384 // VIF THU 20 NOV 2025 22:21:23 ** DRC3JJ ** DRC3JJ PAGE 01213
46385
46386 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
46387 // S S U U B B R R O O U U T I NN N E
46388 // S U U B B R R O O U U T I N N N E
46389 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
46390 // S U U B B R R O O U U T I N N N E
46391 // S S U U B B R R O O U U T I N NN E
46392 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
46393
46394 // DDDDDD RRRRRR CCCCC 33333 J J
46395 // D D R R C C 3 3 J J
46396 // D D R R C 3 J J
46397 // D D RRRRRR C 33333 J J
46398 // D D R R C 3 J J J J
46399 // D D R R C C 3 3 J J J J
46400 // DDDDDD R R CCCCC 33333 JJJJJ JJJJJ
46401
46402
46403 // VIF THU 20 NOV 2025 22:21:23 ** DRC3JJ ** DIAGNOSTICS PAGE 01214
46404
46405
46406 // VIF THU 20 NOV 2025 22:21:23 ** DRC3JJ ** GENERATED CODE PAGE 01215
46407
46408 int_4 _drc3jj (real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ m2_, real_8 _p_ m3_, real_8 _p_ l1min_, real_8 _p_ l1max_,
46409 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
46410 { // ** body not listed **
46703 }
46704
46705 // VIF THU 20 NOV 2025 22:21:23 ** DRC3JM ** DRC3JM PAGE 01221
46706
46707 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
46708 // S S U U B B R R O O U U T I NN N E
46709 // S U U B B R R O O U U T I N N N E
46710 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
46711 // S U U B B R R O O U U T I N N N E
46712 // S S U U B B R R O O U U T I N NN E
46713 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
46714
46715 // DDDDDD RRRRRR CCCCC 33333 J M M
46716 // D D R R C C 3 3 J MM MM
46717 // D D R R C 3 J M M M M
46718 // D D RRRRRR C 33333 J M M M
46719 // D D R R C 3 J J M M
46720 // D D R R C C 3 3 J J M M
46721 // DDDDDD R R CCCCC 33333 JJJJJ M M
46722
46723
46724 // VIF THU 20 NOV 2025 22:21:23 ** DRC3JM ** DIAGNOSTICS PAGE 01222
46725
46726
46727 // VIF THU 20 NOV 2025 22:21:23 ** DRC3JM ** GENERATED CODE PAGE 01223
46728
46729 int_4 _drc3jm (real_8 _p_ l1_, real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ m1_, real_8 _p_ m2min_, real_8 _p_ m2max_,
46730 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
46731 { // ** body not listed **
47015 }
47016
47017 // VIF THU 20 NOV 2025 22:21:23 ** DRC6J ** DRC6J PAGE 01229
47018
47019 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
47020 // S S U U B B R R O O U U T I NN N E
47021 // S U U B B R R O O U U T I N N N E
47022 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
47023 // S U U B B R R O O U U T I N N N E
47024 // S S U U B B R R O O U U T I N NN E
47025 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
47026
47027 // DDDDDD RRRRRR CCCCC 66666 J
47028 // D D R R C C 6 6 J
47029 // D D R R C 6 J
47030 // D D RRRRRR C 666666 J
47031 // D D R R C 6 6 J J
47032 // D D R R C C 6 6 J J
47033 // DDDDDD R R CCCCC 66666 JJJJJ
47034
47035
47036 // VIF THU 20 NOV 2025 22:21:23 ** DRC6J ** DIAGNOSTICS PAGE 01230
47037
47038
47039 // VIF THU 20 NOV 2025 22:21:23 ** DRC6J ** GENERATED CODE PAGE 01231
47040
47041 int_4 _drc6j (real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ l4_, real_8 _p_ l5_, real_8 _p_ l6_, real_8 _p_ l1min_, real_8
47042 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
47043 { // ** body not listed **
47354 }
47355
47356 // VIF THU 20 NOV 2025 22:21:23 ** DRC ** DRC PAGE 01238
47357
47358 // RRRRRR EEEEEEE A L 88888
47359 // R R E A A L * * 8 8
47360 // R R E A A L * * 8 8
47361 // RRRRRR EEEEE A A L ******* 88888
47362 // R R E AAAAAAA L * * 8 8
47363 // R R E A A L * * 8 8
47364 // R R EEEEEEE A A LLLLLLL 88888
47365
47366 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
47367 // F U U NN N C C T I O O NN N
47368 // F U U N N N C T I O O N N N
47369 // FFFFF U U N N N C T I O O N N N
47370 // F U U N N N C T I O O N N N
47371 // F U U N NN C C T I O O N NN
47372 // F UUUUU N N CCCCC T III OOOOO N N
47373
47374 // DDDDDD RRRRRR CCCCC
47375 // D D R R C C
47376 // D D R R C
47377 // D D RRRRRR C
47378 // D D R R C
47379 // D D R R C C
47380 // DDDDDD R R CCCCC
47381
47382
47383 // VIF THU 20 NOV 2025 22:21:23 ** DRC ** DIAGNOSTICS PAGE 01239
47384
47385
47386 // VIF THU 20 NOV 2025 22:21:23 ** DRC ** GENERATED CODE PAGE 01240
47387
47388 real_8 _drc (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ ier_)
47389 { // ** body not listed **
47785 }
47786
47787 // VIF THU 20 NOV 2025 22:21:23 ** DRD ** DRD PAGE 01248
47788
47789 // RRRRRR EEEEEEE A L 88888
47790 // R R E A A L * * 8 8
47791 // R R E A A L * * 8 8
47792 // RRRRRR EEEEE A A L ******* 88888
47793 // R R E AAAAAAA L * * 8 8
47794 // R R E A A L * * 8 8
47795 // R R EEEEEEE A A LLLLLLL 88888
47796
47797 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
47798 // F U U NN N C C T I O O NN N
47799 // F U U N N N C T I O O N N N
47800 // FFFFF U U N N N C T I O O N N N
47801 // F U U N N N C T I O O N N N
47802 // F U U N NN C C T I O O N NN
47803 // F UUUUU N N CCCCC T III OOOOO N N
47804
47805 // DDDDDD RRRRRR DDDDDD
47806 // D D R R D D
47807 // D D R R D D
47808 // D D RRRRRR D D
47809 // D D R R D D
47810 // D D R R D D
47811 // DDDDDD R R DDDDDD
47812
47813
47814 // VIF THU 20 NOV 2025 22:21:23 ** DRD ** DIAGNOSTICS PAGE 01249
47815
47816
47817 // VIF THU 20 NOV 2025 22:21:23 ** DRD ** GENERATED CODE PAGE 01250
47818
47819 real_8 _drd (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
47820 { // ** body not listed **
48326 }
48327
48328 // VIF THU 20 NOV 2025 22:21:23 ** DREADP ** DREADP PAGE 01260
48329
48330 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
48331 // S S U U B B R R O O U U T I NN N E
48332 // S U U B B R R O O U U T I N N N E
48333 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
48334 // S U U B B R R O O U U T I N N N E
48335 // S S U U B B R R O O U U T I N NN E
48336 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
48337
48338 // DDDDDD RRRRRR EEEEEEE A DDDDDD PPPPPP
48339 // D D R R E A A D D P P
48340 // D D R R E A A D D P P
48341 // D D RRRRRR EEEEE A A D D PPPPPP
48342 // D D R R E AAAAAAA D D P
48343 // D D R R E A A D D P
48344 // DDDDDD R R EEEEEEE A A DDDDDD P
48345
48346
48347 // VIF THU 20 NOV 2025 22:21:23 ** DREADP ** DIAGNOSTICS PAGE 01261
48348
48349
48350 // VIF THU 20 NOV 2025 22:21:23 ** DREADP ** GENERATED CODE PAGE 01262
48351
48352 int_4 _dreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
48353 { // ** body not listed **
48464 }
48465
48466 // VIF THU 20 NOV 2025 22:21:23 ** DREORT ** DREORT PAGE 01265
48467
48468 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
48469 // S S U U B B R R O O U U T I NN N E
48470 // S U U B B R R O O U U T I N N N E
48471 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
48472 // S U U B B R R O O U U T I N N N E
48473 // S S U U B B R R O O U U T I N NN E
48474 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
48475
48476 // DDDDDD RRRRRR EEEEEEE OOOOO RRRRRR TTTTTTT
48477 // D D R R E O O R R T
48478 // D D R R E O O R R T
48479 // D D RRRRRR EEEEE O O RRRRRR T
48480 // D D R R E O O R R T
48481 // D D R R E O O R R T
48482 // DDDDDD R R EEEEEEE OOOOO R R T
48483
48484
48485 // VIF THU 20 NOV 2025 22:21:23 ** DREORT ** DIAGNOSTICS PAGE 01266
48486
48487
48488 // VIF THU 20 NOV 2025 22:21:23 ** DREORT ** GENERATED CODE PAGE 01267
48489
48490 int_4 _dreort (int_4 _p_ ncomp_, real_8 _p_ y_, real_8 _p_ yp_, real_8 _p_ yhp_, int_4 _p_ niv_, real_8 _p_ w_, real_8
48491 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_)
48492 { // ** body not listed **
48639 }
48640
48641 // VIF THU 20 NOV 2025 22:21:23 ** DRF ** DRF PAGE 01270
48642
48643 // RRRRRR EEEEEEE A L 88888
48644 // R R E A A L * * 8 8
48645 // R R E A A L * * 8 8
48646 // RRRRRR EEEEE A A L ******* 88888
48647 // R R E AAAAAAA L * * 8 8
48648 // R R E A A L * * 8 8
48649 // R R EEEEEEE A A LLLLLLL 88888
48650
48651 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
48652 // F U U NN N C C T I O O NN N
48653 // F U U N N N C T I O O N N N
48654 // FFFFF U U N N N C T I O O N N N
48655 // F U U N N N C T I O O N N N
48656 // F U U N NN C C T I O O N NN
48657 // F UUUUU N N CCCCC T III OOOOO N N
48658
48659 // DDDDDD RRRRRR FFFFFFF
48660 // D D R R F
48661 // D D R R F
48662 // D D RRRRRR FFFFF
48663 // D D R R F
48664 // D D R R F
48665 // DDDDDD R R F
48666
48667
48668 // VIF THU 20 NOV 2025 22:21:23 ** DRF ** DIAGNOSTICS PAGE 01271
48669
48670
48671 // VIF THU 20 NOV 2025 22:21:23 ** DRF ** GENERATED CODE PAGE 01272
48672
48673 real_8 _drf (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
48674 { // ** body not listed **
49210 }
49211
49212 // VIF THU 20 NOV 2025 22:21:23 ** DRJ ** DRJ PAGE 01283
49213
49214 // RRRRRR EEEEEEE A L 88888
49215 // R R E A A L * * 8 8
49216 // R R E A A L * * 8 8
49217 // RRRRRR EEEEE A A L ******* 88888
49218 // R R E AAAAAAA L * * 8 8
49219 // R R E A A L * * 8 8
49220 // R R EEEEEEE A A LLLLLLL 88888
49221
49222 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
49223 // F U U NN N C C T I O O NN N
49224 // F U U N N N C T I O O N N N
49225 // FFFFF U U N N N C T I O O N N N
49226 // F U U N N N C T I O O N N N
49227 // F U U N NN C C T I O O N NN
49228 // F UUUUU N N CCCCC T III OOOOO N N
49229
49230 // DDDDDD RRRRRR J
49231 // D D R R J
49232 // D D R R J
49233 // D D RRRRRR J
49234 // D D R R J J
49235 // D D R R J J
49236 // DDDDDD R R JJJJJ
49237
49238
49239 // VIF THU 20 NOV 2025 22:21:23 ** DRJ ** DIAGNOSTICS PAGE 01284
49240
49241
49242 // VIF THU 20 NOV 2025 22:21:23 ** DRJ ** GENERATED CODE PAGE 01285
49243
49244 real_8 _drj (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, real_8 _p_ p_, int_4 _p_ ier_)
49245 { // ** body not listed **
49879 }
49880
49881 // VIF THU 20 NOV 2025 22:21:23 ** DRKFS ** DRKFS PAGE 01298
49882
49883 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
49884 // S S U U B B R R O O U U T I NN N E
49885 // S U U B B R R O O U U T I N N N E
49886 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
49887 // S U U B B R R O O U U T I N N N E
49888 // S S U U B B R R O O U U T I N NN E
49889 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
49890
49891 // DDDDDD RRRRRR K K FFFFFFF SSSSS
49892 // D D R R K K F S S
49893 // D D R R K K F S
49894 // D D RRRRRR KKK FFFFF SSSSS
49895 // D D R R K K F S
49896 // D D R R K K F S S
49897 // DDDDDD R R K K F SSSSS
49898
49899
49900 // VIF THU 20 NOV 2025 22:21:23 ** DRKFS ** DIAGNOSTICS PAGE 01299
49901
49902
49903 // VIF THU 20 NOV 2025 22:21:23 ** DRKFS ** GENERATED CODE PAGE 01300
49904
49905 int_4 _drkfs (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ tout_, int_4 _p_ info_, real_8
49906 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ h_, real_8 _p_ tolfac_, real_8 _p_ yp_, real_8 _p_ f1_, real_8
49907 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ told_, real_8 _p_ dtsign_, real_8
49908 _p_ u26_, real_8 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_, logical_4 _p_ stiff_,
49909 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_)
49910 { // ** body not listed **
50813 }
50814
50815 // VIF THU 20 NOV 2025 22:21:23 ** DSORT ** DSORT PAGE 01318
50816
50817 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
50818 // S S U U B B R R O O U U T I NN N E
50819 // S U U B B R R O O U U T I N N N E
50820 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
50821 // S U U B B R R O O U U T I N N N E
50822 // S S U U B B R R O O U U T I N NN E
50823 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
50824
50825 // DDDDDD SSSSS OOOOO RRRRRR TTTTTTT
50826 // D D S S O O R R T
50827 // D D S O O R R T
50828 // D D SSSSS O O RRRRRR T
50829 // D D S O O R R T
50830 // D D S S O O R R T
50831 // DDDDDD SSSSS OOOOO R R T
50832
50833
50834 // VIF THU 20 NOV 2025 22:21:23 ** DSORT ** DIAGNOSTICS PAGE 01319
50835
50836
50837 // VIF THU 20 NOV 2025 22:21:23 ** DSORT ** GENERATED CODE PAGE 01320
50838
50839 int_4 _dsort (real_8 _p_ dx_, real_8 _p_ dy_, int_4 _p_ n_, int_4 _p_ kflag_)
50840 { // ** body not listed **
51091 }
51092
51093 // VIF THU 20 NOV 2025 22:21:23 ** DSOSEQ ** DSOSEQ PAGE 01325
51094
51095 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
51096 // S S U U B B R R O O U U T I NN N E
51097 // S U U B B R R O O U U T I N N N E
51098 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
51099 // S U U B B R R O O U U T I N N N E
51100 // S S U U B B R R O O U U T I N NN E
51101 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
51102
51103 // DDDDDD SSSSS OOOOO SSSSS EEEEEEE QQQQQ
51104 // D D S S O O S S E Q Q
51105 // D D S O O S E Q Q
51106 // D D SSSSS O O SSSSS EEEEE Q Q
51107 // D D S O O S E Q Q Q
51108 // D D S S O O S S E Q Q
51109 // DDDDDD SSSSS OOOOO SSSSS EEEEEEE QQQQ Q
51110
51111
51112 // VIF THU 20 NOV 2025 22:21:23 ** DSOSEQ ** DIAGNOSTICS PAGE 01326
51113
51114
51115 // VIF THU 20 NOV 2025 22:21:23 ** DSOSEQ ** GENERATED CODE PAGE 01327
51116
51117 int_4 _dsoseq (real_8 (*_fnc)(), int_4 _p_ n_, real_8 _p_ s_, real_8 _p_ rtolx_, real_8 _p_ atolx_, real_8 _p_ tolf_,
51118 int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_, real_8 _p_
51119 fmax_, real_8 _p_ c_, int_4 _p_ nc_, real_8 _p_ b_, real_8 _p_ p_, real_8 _p_ temp_, real_8 _p_ x_, real_8 _p_ y_,
51120 real_8 _p_ fac_, int_4 _p_ is_)
51121 { // ** body not listed **
51514 }
51515
51516 // VIF THU 20 NOV 2025 22:21:23 ** DSOS ** DSOS PAGE 01335
51517
51518 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
51519 // S S U U B B R R O O U U T I NN N E
51520 // S U U B B R R O O U U T I N N N E
51521 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
51522 // S U U B B R R O O U U T I N N N E
51523 // S S U U B B R R O O U U T I N NN E
51524 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
51525
51526 // DDDDDD SSSSS OOOOO SSSSS
51527 // D D S S O O S S
51528 // D D S O O S
51529 // D D SSSSS O O SSSSS
51530 // D D S O O S
51531 // D D S S O O S S
51532 // DDDDDD SSSSS OOOOO SSSSS
51533
51534
51535 // VIF THU 20 NOV 2025 22:21:23 ** DSOS ** DIAGNOSTICS PAGE 01336
51536
51537
51538 // VIF THU 20 NOV 2025 22:21:23 ** DSOS ** GENERATED CODE PAGE 01337
51539
51540 int_4 _dsos (real_8 (*_fnc)(), int_4 _p_ neq_, real_8 _p_ x_, real_8 _p_ rtolx_, real_8 _p_ atolx_, real_8 _p_ tolf_,
51541 int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
51542 { // ** body not listed **
51889 }
51890
51891 // VIF THU 20 NOV 2025 22:21:23 ** DSOSSL ** DSOSSL PAGE 01344
51892
51893 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
51894 // S S U U B B R R O O U U T I NN N E
51895 // S U U B B R R O O U U T I N N N E
51896 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
51897 // S U U B B R R O O U U T I N N N E
51898 // S S U U B B R R O O U U T I N NN E
51899 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
51900
51901 // DDDDDD SSSSS OOOOO SSSSS SSSSS L
51902 // D D S S O O S S S S L
51903 // D D S O O S S L
51904 // D D SSSSS O O SSSSS SSSSS L
51905 // D D S O O S S L
51906 // D D S S O O S S S S L
51907 // DDDDDD SSSSS OOOOO SSSSS SSSSS LLLLLLL
51908
51909
51910 // VIF THU 20 NOV 2025 22:21:23 ** DSOSSL ** DIAGNOSTICS PAGE 01345
51911
51912
51913 // VIF THU 20 NOV 2025 22:21:23 ** DSOSSL ** GENERATED CODE PAGE 01346
51914
51915 int_4 _dsossl (int_4 _p_ k_, int_4 _p_ n_, int_4 _p_ l_, real_8 _p_ x_, real_8 _p_ c_, real_8 _p_ b_, int_4 _p_ m_)
51916 { // ** body not listed **
51950 }
51951
51952 // VIF THU 20 NOV 2025 22:21:23 ** DSPLP ** DSPLP PAGE 01347
51953
51954 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
51955 // S S U U B B R R O O U U T I NN N E
51956 // S U U B B R R O O U U T I N N N E
51957 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
51958 // S U U B B R R O O U U T I N N N E
51959 // S S U U B B R R O O U U T I N NN E
51960 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
51961
51962 // DDDDDD SSSSS PPPPPP L PPPPPP
51963 // D D S S P P L P P
51964 // D D S P P L P P
51965 // D D SSSSS PPPPPP L PPPPPP
51966 // D D S P L P
51967 // D D S S P L P
51968 // DDDDDD SSSSS P LLLLLLL P
51969
51970
51971 // VIF THU 20 NOV 2025 22:21:23 ** DSPLP ** DIAGNOSTICS PAGE 01348
51972
51973
51974 // VIF THU 20 NOV 2025 22:21:23 ** DSPLP ** GENERATED CODE PAGE 01349
51975
51976 int_4 _dsplp (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
51977 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_, real_8 _p_ duals_,
51978 int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
51979 { // ** body not listed **
52295 }
52296
52297 // VIF THU 20 NOV 2025 22:21:23 ** DSTOR1 ** DSTOR1 PAGE 01356
52298
52299 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
52300 // S S U U B B R R O O U U T I NN N E
52301 // S U U B B R R O O U U T I N N N E
52302 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
52303 // S U U B B R R O O U U T I N N N E
52304 // S S U U B B R R O O U U T I N NN E
52305 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
52306
52307 // DDDDDD SSSSS TTTTTTT OOOOO RRRRRR 1
52308 // D D S S T O O R R 11
52309 // D D S T O O R R 1 1
52310 // D D SSSSS T O O RRRRRR 1
52311 // D D S T O O R R 1
52312 // D D S S T O O R R 1
52313 // DDDDDD SSSSS T OOOOO R R 11111
52314
52315
52316 // VIF THU 20 NOV 2025 22:21:23 ** DSTOR1 ** DIAGNOSTICS PAGE 01357
52317
52318
52319 // VIF THU 20 NOV 2025 22:21:23 ** DSTOR1 ** GENERATED CODE PAGE 01358
52320
52321 int_4 _dstor1 (real_8 _p_ u_, real_8 _p_ yh_, real_8 _p_ v_, real_8 _p_ yp_, int_4 _p_ ntemp_, int_4 _p_ ndisk_, int_4
52322 _p_ ntape_)
52323 { // ** body not listed **
52368 }
52369
52370 // VIF THU 20 NOV 2025 22:21:23 ** DSTWAY ** DSTWAY PAGE 01359
52371
52372 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
52373 // S S U U B B R R O O U U T I NN N E
52374 // S U U B B R R O O U U T I N N N E
52375 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
52376 // S U U B B R R O O U U T I N N N E
52377 // S S U U B B R R O O U U T I N NN E
52378 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
52379
52380 // DDDDDD SSSSS TTTTTTT W W A Y Y
52381 // D D S S T W W A A Y Y
52382 // D D S T W W A A Y Y
52383 // D D SSSSS T W W W A A Y
52384 // D D S T W W W AAAAAAA Y
52385 // D D S S T W W W A A Y
52386 // DDDDDD SSSSS T WW WW A A Y
52387
52388
52389 // VIF THU 20 NOV 2025 22:21:23 ** DSTWAY ** DIAGNOSTICS PAGE 01360
52390
52391
52392 // VIF THU 20 NOV 2025 22:21:23 ** DSTWAY ** GENERATED CODE PAGE 01361
52393
52394 int_4 _dstway (real_8 _p_ u_, real_8 _p_ v_, real_8 _p_ yhp_, int_4 _p_ inout_, real_8 _p_ stowa_)
52395 { // ** body not listed **
52455 }
52456
52457 // VIF THU 20 NOV 2025 22:21:23 ** DSUDS ** DSUDS PAGE 01363
52458
52459 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
52460 // S S U U B B R R O O U U T I NN N E
52461 // S U U B B R R O O U U T I N N N E
52462 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
52463 // S U U B B R R O O U U T I N N N E
52464 // S S U U B B R R O O U U T I N NN E
52465 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
52466
52467 // DDDDDD SSSSS U U DDDDDD SSSSS
52468 // D D S S U U D D S S
52469 // D D S U U D D S
52470 // D D SSSSS U U D D SSSSS
52471 // D D S U U D D S
52472 // D D S S U U D D S S
52473 // DDDDDD SSSSS UUUUU DDDDDD SSSSS
52474
52475
52476 // VIF THU 20 NOV 2025 22:21:23 ** DSUDS ** DIAGNOSTICS PAGE 01364
52477
52478
52479 // VIF THU 20 NOV 2025 22:21:23 ** DSUDS ** GENERATED CODE PAGE 01365
52480
52481 int_4 _dsuds (real_8 _p_ a_, real_8 _p_ x_, real_8 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_, int_4 _p_
52482 iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_)
52483 { // ** body not listed **
52496 }
52497
52498 // VIF THU 20 NOV 2025 22:21:23 ** DU11LS ** DU11LS PAGE 01366
52499
52500 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
52501 // S S U U B B R R O O U U T I NN N E
52502 // S U U B B R R O O U U T I N N N E
52503 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
52504 // S U U B B R R O O U U T I N N N E
52505 // S S U U B B R R O O U U T I N NN E
52506 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
52507
52508 // DDDDDD U U 1 1 L SSSSS
52509 // D D U U 11 11 L S S
52510 // D D U U 1 1 1 1 L S
52511 // D D U U 1 1 L SSSSS
52512 // D D U U 1 1 L S
52513 // D D U U 1 1 L S S
52514 // DDDDDD UUUUU 11111 11111 LLLLLLL SSSSS
52515
52516
52517 // VIF THU 20 NOV 2025 22:21:23 ** DU11LS ** DIAGNOSTICS PAGE 01367
52518
52519
52520 // VIF THU 20 NOV 2025 22:21:23 ** DU11LS ** GENERATED CODE PAGE 01368
52521
52522 int_4 _du11ls (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ ub_, real_8 _p_ db_, int_4 _p_
52523 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4 _p_ ic_,
52524 int_4 _p_ ir_)
52525 { // ** body not listed **
52817 }
52818
52819 // VIF THU 20 NOV 2025 22:21:23 ** DU11US ** DU11US PAGE 01374
52820
52821 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
52822 // S S U U B B R R O O U U T I NN N E
52823 // S U U B B R R O O U U T I N N N E
52824 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
52825 // S U U B B R R O O U U T I N N N E
52826 // S S U U B B R R O O U U T I N NN E
52827 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
52828
52829 // DDDDDD U U 1 1 U U SSSSS
52830 // D D U U 11 11 U U S S
52831 // D D U U 1 1 1 1 U U S
52832 // D D U U 1 1 U U SSSSS
52833 // D D U U 1 1 U U S
52834 // D D U U 1 1 U U S S
52835 // DDDDDD UUUUU 11111 11111 UUUUU SSSSS
52836
52837
52838 // VIF THU 20 NOV 2025 22:21:23 ** DU11US ** DIAGNOSTICS PAGE 01375
52839
52840
52841 // VIF THU 20 NOV 2025 22:21:23 ** DU11US ** GENERATED CODE PAGE 01376
52842
52843 int_4 _du11us (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ ub_, real_8 _p_ db_, int_4 _p_
52844 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4 _p_ ir_,
52845 int_4 _p_ ic_)
52846 { // ** body not listed **
53138 }
53139
53140 // VIF THU 20 NOV 2025 22:21:23 ** DU12LS ** DU12LS PAGE 01382
53141
53142 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
53143 // S S U U B B R R O O U U T I NN N E
53144 // S U U B B R R O O U U T I N N N E
53145 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
53146 // S U U B B R R O O U U T I N N N E
53147 // S S U U B B R R O O U U T I N NN E
53148 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
53149
53150 // DDDDDD U U 1 22222 L SSSSS
53151 // D D U U 11 2 2 L S S
53152 // D D U U 1 1 2 L S
53153 // D D U U 1 22222 L SSSSS
53154 // D D U U 1 2 L S
53155 // D D U U 1 2 L S S
53156 // DDDDDD UUUUU 11111 2222222 LLLLLLL SSSSS
53157
53158
53159 // VIF THU 20 NOV 2025 22:21:23 ** DU12LS ** DIAGNOSTICS PAGE 01383
53160
53161
53162 // VIF THU 20 NOV 2025 22:21:23 ** DU12LS ** GENERATED CODE PAGE 01384
53163
53164 int_4 _du12ls (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
53165 int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ic_, int_4 _p_ ir_)
53166 { // ** body not listed **
53311 }
53312
53313 // VIF THU 20 NOV 2025 22:21:23 ** DU12US ** DU12US PAGE 01387
53314
53315 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
53316 // S S U U B B R R O O U U T I NN N E
53317 // S U U B B R R O O U U T I N N N E
53318 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
53319 // S U U B B R R O O U U T I N N N E
53320 // S S U U B B R R O O U U T I N NN E
53321 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
53322
53323 // DDDDDD U U 1 22222 U U SSSSS
53324 // D D U U 11 2 2 U U S S
53325 // D D U U 1 1 2 U U S
53326 // D D U U 1 22222 U U SSSSS
53327 // D D U U 1 2 U U S
53328 // D D U U 1 2 U U S S
53329 // DDDDDD UUUUU 11111 2222222 UUUUU SSSSS
53330
53331
53332 // VIF THU 20 NOV 2025 22:21:23 ** DU12US ** DIAGNOSTICS PAGE 01388
53333
53334
53335 // VIF THU 20 NOV 2025 22:21:23 ** DU12US ** GENERATED CODE PAGE 01389
53336
53337 int_4 _du12us (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
53338 int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ir_, int_4 _p_ ic_)
53339 { // ** body not listed **
53483 }
53484
53485 // VIF THU 20 NOV 2025 22:21:23 ** DULSIA ** DULSIA PAGE 01392
53486
53487 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
53488 // S S U U B B R R O O U U T I NN N E
53489 // S U U B B R R O O U U T I N N N E
53490 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
53491 // S U U B B R R O O U U T I N N N E
53492 // S S U U B B R R O O U U T I N NN E
53493 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
53494
53495 // DDDDDD U U L SSSSS III A
53496 // D D U U L S S I A A
53497 // D D U U L S I A A
53498 // D D U U L SSSSS I A A
53499 // D D U U L S I AAAAAAA
53500 // D D U U L S S I A A
53501 // DDDDDD UUUUU LLLLLLL SSSSS III A A
53502
53503
53504 // VIF THU 20 NOV 2025 22:21:23 ** DULSIA ** DIAGNOSTICS PAGE 01393
53505
53506
53507 // VIF THU 20 NOV 2025 22:21:23 ** DULSIA ** GENERATED CODE PAGE 01394
53508
53509 int_4 _dulsia (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
53510 real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
53511 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
53512 { // ** body not listed **
53771 }
53772
53773 // VIF THU 20 NOV 2025 22:21:23 ** DUSRMT ** DUSRMT PAGE 01400
53774
53775 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
53776 // S S U U B B R R O O U U T I NN N E
53777 // S U U B B R R O O U U T I N N N E
53778 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
53779 // S U U B B R R O O U U T I N N N E
53780 // S S U U B B R R O O U U T I N NN E
53781 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
53782
53783 // DDDDDD U U SSSSS RRRRRR M M TTTTTTT
53784 // D D U U S S R R MM MM T
53785 // D D U U S R R M M M M T
53786 // D D U U SSSSS RRRRRR M M M T
53787 // D D U U S R R M M T
53788 // D D U U S S R R M M T
53789 // DDDDDD UUUUU SSSSS R R M M T
53790
53791
53792 // VIF THU 20 NOV 2025 22:21:23 ** DUSRMT ** DIAGNOSTICS PAGE 01401
53793
53794
53795 // VIF THU 20 NOV 2025 22:21:23 ** DUSRMT ** GENERATED CODE PAGE 01402
53796
53797 int_4 _dusrmt (int_4 _p_ i_, int_4 _p_ j_, real_8 _p_ aij_, int_4 _p_ indcat_, real_8 _p_ prgopt_, real_8 _p_ dattrv_,
53798 int_4 _p_ iflag_)
53799 { // ** body not listed **
53837 }
53838
53839 // VIF THU 20 NOV 2025 22:21:23 ** DVECS ** DVECS PAGE 01403
53840
53841 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
53842 // S S U U B B R R O O U U T I NN N E
53843 // S U U B B R R O O U U T I N N N E
53844 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
53845 // S U U B B R R O O U U T I N N N E
53846 // S S U U B B R R O O U U T I N NN E
53847 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
53848
53849 // DDDDDD V V EEEEEEE CCCCC SSSSS
53850 // D D V V E C C S S
53851 // D D V V E C S
53852 // D D V V EEEEE C SSSSS
53853 // D D V V E C S
53854 // D D V V E C C S S
53855 // DDDDDD V EEEEEEE CCCCC SSSSS
53856
53857
53858 // VIF THU 20 NOV 2025 22:21:23 ** DVECS ** DIAGNOSTICS PAGE 01404
53859
53860
53861 // VIF THU 20 NOV 2025 22:21:23 ** DVECS ** GENERATED CODE PAGE 01405
53862
53863 int_4 _dvecs (int_4 _p_ ncomp_, int_4 _p_ lnfc_, real_8 _p_ yhp_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ inhomo_
53864 , int_4 _p_ iflag_)
53865 { // ** body not listed **
53903 }
53904
53905 // VIF THU 20 NOV 2025 22:21:23 ** DVNRMS ** DVNRMS PAGE 01406
53906
53907 // RRRRRR EEEEEEE A L 88888
53908 // R R E A A L * * 8 8
53909 // R R E A A L * * 8 8
53910 // RRRRRR EEEEE A A L ******* 88888
53911 // R R E AAAAAAA L * * 8 8
53912 // R R E A A L * * 8 8
53913 // R R EEEEEEE A A LLLLLLL 88888
53914
53915 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
53916 // F U U NN N C C T I O O NN N
53917 // F U U N N N C T I O O N N N
53918 // FFFFF U U N N N C T I O O N N N
53919 // F U U N N N C T I O O N N N
53920 // F U U N NN C C T I O O N NN
53921 // F UUUUU N N CCCCC T III OOOOO N N
53922
53923 // DDDDDD V V N N RRRRRR M M SSSSS
53924 // D D V V NN N R R MM MM S S
53925 // D D V V N N N R R M M M M S
53926 // D D V V N N N RRRRRR M M M SSSSS
53927 // D D V V N N N R R M M S
53928 // D D V V N NN R R M M S S
53929 // DDDDDD V N N R R M M SSSSS
53930
53931
53932 // VIF THU 20 NOV 2025 22:21:23 ** DVNRMS ** DIAGNOSTICS PAGE 01407
53933
53934
53935 // VIF THU 20 NOV 2025 22:21:23 ** DVNRMS ** GENERATED CODE PAGE 01408
53936
53937 real_8 _dvnrms (int_4 _p_ n_, real_8 _p_ v_, real_8 _p_ w_)
53938 { // ** body not listed **
53950 }
53951
53952 // VIF THU 20 NOV 2025 22:21:23 ** DWNLIT ** DWNLIT PAGE 01409
53953
53954 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
53955 // S S U U B B R R O O U U T I NN N E
53956 // S U U B B R R O O U U T I N N N E
53957 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
53958 // S U U B B R R O O U U T I N N N E
53959 // S S U U B B R R O O U U T I N NN E
53960 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
53961
53962 // DDDDDD W W N N L III TTTTTTT
53963 // D D W W NN N L I T
53964 // D D W W N N N L I T
53965 // D D W W W N N N L I T
53966 // D D W W W N N N L I T
53967 // D D W W W N NN L I T
53968 // DDDDDD WW WW N N LLLLLLL III T
53969
53970
53971 // VIF THU 20 NOV 2025 22:21:23 ** DWNLIT ** DIAGNOSTICS PAGE 01410
53972
53973
53974 // VIF THU 20 NOV 2025 22:21:23 ** DWNLIT ** GENERATED CODE PAGE 01411
53975
53976 int_4 _dwnlit (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ l_, int_4 _p_ ipivot_, int_4 _p_
53977 itype_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ rnorm_, int_4 _p_ idope_, real_8 _p_ dope_, logical_4 _p_ done_)
53978 { // ** body not listed **
54149 }
54150
54151 // VIF THU 20 NOV 2025 22:21:23 ** DWNLSM ** DWNLSM PAGE 01415
54152
54153 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
54154 // S S U U B B R R O O U U T I NN N E
54155 // S U U B B R R O O U U T I N N N E
54156 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
54157 // S U U B B R R O O U U T I N N N E
54158 // S S U U B B R R O O U U T I N NN E
54159 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
54160
54161 // DDDDDD W W N N L SSSSS M M
54162 // D D W W NN N L S S MM MM
54163 // D D W W N N N L S M M M M
54164 // D D W W W N N N L SSSSS M M M
54165 // D D W W W N N N L S M M
54166 // D D W W W N NN L S S M M
54167 // DDDDDD WW WW N N LLLLLLL SSSSS M M
54168
54169
54170 // VIF THU 20 NOV 2025 22:21:23 ** DWNLSM ** DIAGNOSTICS PAGE 01416
54171
54172
54173 // VIF THU 20 NOV 2025 22:21:23 ** DWNLSM ** GENERATED CODE PAGE 01417
54174
54175 int_4 _dwnlsm (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mme_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_8 _p_
54176 prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_8 _p_ wd_, real_8
54177 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_)
54178 { // ** body not listed **
54623 }
54624
54625 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT1 ** DWNLT1 PAGE 01426
54626
54627 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
54628 // S S U U B B R R O O U U T I NN N E
54629 // S U U B B R R O O U U T I N N N E
54630 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
54631 // S U U B B R R O O U U T I N N N E
54632 // S S U U B B R R O O U U T I N NN E
54633 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
54634
54635 // DDDDDD W W N N L TTTTTTT 1
54636 // D D W W NN N L T 11
54637 // D D W W N N N L T 1 1
54638 // D D W W W N N N L T 1
54639 // D D W W W N N N L T 1
54640 // D D W W W N NN L T 1
54641 // DDDDDD WW WW N N LLLLLLL T 11111
54642
54643
54644 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT1 ** DIAGNOSTICS PAGE 01427
54645
54646
54647 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT1 ** GENERATED CODE PAGE 01428
54648
54649 int_4 _dwnlt1 (int_4 _p_ i_, int_4 _p_ lend_, int_4 _p_ mend_, int_4 _p_ ir_, int_4 _p_ mdw_, logical_4 _p_ recalc_,
54650 int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_)
54651 { // ** body not listed **
54676 }
54677
54678 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT2 ** DWNLT2 PAGE 01429
54679
54680 // L OOOOO GGGGG III CCCCC A L 4
54681 // L O O G G I C C A A L * * 4 4
54682 // L O O G I C A A L * * 4 4
54683 // L O O G GGGG I C A A L ******* 4444444
54684 // L O O G G I C AAAAAAA L * * 4
54685 // L O O G G I C C A A L * * 4
54686 // LLLLLLL OOOOO GGGGG III CCCCC A A LLLLLLL 4
54687
54688 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
54689 // F U U NN N C C T I O O NN N
54690 // F U U N N N C T I O O N N N
54691 // FFFFF U U N N N C T I O O N N N
54692 // F U U N N N C T I O O N N N
54693 // F U U N NN C C T I O O N NN
54694 // F UUUUU N N CCCCC T III OOOOO N N
54695
54696 // DDDDDD W W N N L TTTTTTT 22222
54697 // D D W W NN N L T 2 2
54698 // D D W W N N N L T 2
54699 // D D W W W N N N L T 22222
54700 // D D W W W N N N L T 2
54701 // D D W W W N NN L T 2
54702 // DDDDDD WW WW N N LLLLLLL T 2222222
54703
54704
54705 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT2 ** DIAGNOSTICS PAGE 01430
54706
54707
54708 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT2 ** GENERATED CODE PAGE 01431
54709
54710 logical_4 _dwnlt2 (int_4 _p_ me_, int_4 _p_ mend_, int_4 _p_ ir_, real_8 _p_ factor_, real_8 _p_ tau_, real_8 _p_
54711 scale_, real_8 _p_ wic_)
54712 { // ** body not listed **
54734 }
54735
54736 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT3 ** DWNLT3 PAGE 01432
54737
54738 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
54739 // S S U U B B R R O O U U T I NN N E
54740 // S U U B B R R O O U U T I N N N E
54741 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
54742 // S U U B B R R O O U U T I N N N E
54743 // S S U U B B R R O O U U T I N NN E
54744 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
54745
54746 // DDDDDD W W N N L TTTTTTT 33333
54747 // D D W W NN N L T 3 3
54748 // D D W W N N N L T 3
54749 // D D W W W N N N L T 33333
54750 // D D W W W N N N L T 3
54751 // D D W W W N NN L T 3 3
54752 // DDDDDD WW WW N N LLLLLLL T 33333
54753
54754
54755 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT3 ** DIAGNOSTICS PAGE 01433
54756
54757
54758 // VIF THU 20 NOV 2025 22:21:23 ** DWNLT3 ** GENERATED CODE PAGE 01434
54759
54760 int_4 _dwnlt3 (int_4 _p_ i_, int_4 _p_ imax_, int_4 _p_ m_, int_4 _p_ mdw_, int_4 _p_ ipivot_, real_8 _p_ h_, real_8
54761 _p_ w_)
54762 { // ** body not listed **
54777 }
54778
54779 // VIF THU 20 NOV 2025 22:21:23 ** DWNNLS ** DWNNLS PAGE 01435
54780
54781 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
54782 // S S U U B B R R O O U U T I NN N E
54783 // S U U B B R R O O U U T I N N N E
54784 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
54785 // S U U B B R R O O U U T I N N N E
54786 // S S U U B B R R O O U U T I N NN E
54787 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
54788
54789 // DDDDDD W W N N N N L SSSSS
54790 // D D W W NN N NN N L S S
54791 // D D W W N N N N N N L S
54792 // D D W W W N N N N N N L SSSSS
54793 // D D W W W N N N N N N L S
54794 // D D W W W N NN N NN L S S
54795 // DDDDDD WW WW N N N N LLLLLLL SSSSS
54796
54797
54798 // VIF THU 20 NOV 2025 22:21:23 ** DWNNLS ** DIAGNOSTICS PAGE 01436
54799
54800
54801 // VIF THU 20 NOV 2025 22:21:23 ** DWNNLS ** GENERATED CODE PAGE 01437
54802
54803 int_4 _dwnnls (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_8 _p_
54804 prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_)
54805 { // ** body not listed **
54933 }
54934
54935 // VIF THU 20 NOV 2025 22:21:23 ** DWRITP ** DWRITP PAGE 01440
54936
54937 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
54938 // S S U U B B R R O O U U T I NN N E
54939 // S U U B B R R O O U U T I N N N E
54940 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
54941 // S U U B B R R O O U U T I N N N E
54942 // S S U U B B R R O O U U T I N NN E
54943 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
54944
54945 // DDDDDD W W RRRRRR III TTTTTTT PPPPPP
54946 // D D W W R R I T P P
54947 // D D W W R R I T P P
54948 // D D W W W RRRRRR I T PPPPPP
54949 // D D W W W R R I T P
54950 // D D W W W R R I T P
54951 // DDDDDD WW WW R R III T P
54952
54953
54954 // VIF THU 20 NOV 2025 22:21:23 ** DWRITP ** DIAGNOSTICS PAGE 01441
54955
54956
54957 // VIF THU 20 NOV 2025 22:21:23 ** DWRITP ** GENERATED CODE PAGE 01442
54958
54959 int_4 _dwritp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
54960 { // ** body not listed **
55071 }
55072
55073 // VIF THU 20 NOV 2025 22:21:23 ** DWUPDT ** DWUPDT PAGE 01445
55074
55075 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
55076 // S S U U B B R R O O U U T I NN N E
55077 // S U U B B R R O O U U T I N N N E
55078 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
55079 // S U U B B R R O O U U T I N N N E
55080 // S S U U B B R R O O U U T I N NN E
55081 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
55082
55083 // DDDDDD W W U U PPPPPP DDDDDD TTTTTTT
55084 // D D W W U U P P D D T
55085 // D D W W U U P P D D T
55086 // D D W W W U U PPPPPP D D T
55087 // D D W W W U U P D D T
55088 // D D W W W U U P D D T
55089 // DDDDDD WW WW UUUUU P DDDDDD T
55090
55091
55092 // VIF THU 20 NOV 2025 22:21:23 ** DWUPDT ** DIAGNOSTICS PAGE 01446
55093
55094
55095 // VIF THU 20 NOV 2025 22:21:23 ** DWUPDT ** GENERATED CODE PAGE 01447
55096
55097 int_4 _dwupdt (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, real_8 _p_ w_, real_8 _p_ b_, real_8 _p_ alpha_, real_8 _p_
55098 cos_, real_8 _p_ sin_)
55099 { // ** body not listed **
55172 }
55173
55174 // VIF THU 20 NOV 2025 22:21:23 ** DX4 ** DX4 PAGE 01449
55175
55176 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
55177 // S S U U B B R R O O U U T I NN N E
55178 // S U U B B R R O O U U T I N N N E
55179 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
55180 // S U U B B R R O O U U T I N N N E
55181 // S S U U B B R R O O U U T I N NN E
55182 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
55183
55184 // DDDDDD X X 4
55185 // D D X X 4 4
55186 // D D X X 4 4
55187 // D D X 4444444
55188 // D D X X 4
55189 // D D X X 4
55190 // DDDDDD X X 4
55191
55192
55193 // VIF THU 20 NOV 2025 22:21:23 ** DX4 ** DIAGNOSTICS PAGE 01450
55194
55195
55196 // VIF THU 20 NOV 2025 22:21:23 ** DX4 ** GENERATED CODE PAGE 01451
55197
55198 int_4 _dx4 (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uxxx_, real_4 _p_ uxxxx_)
55199 { // ** body not listed **
55290 }
55291
55292 // VIF THU 20 NOV 2025 22:21:23 ** DXADJ ** DXADJ PAGE 01453
55293
55294 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
55295 // S S U U B B R R O O U U T I NN N E
55296 // S U U B B R R O O U U T I N N N E
55297 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
55298 // S U U B B R R O O U U T I N N N E
55299 // S S U U B B R R O O U U T I N NN E
55300 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
55301
55302 // DDDDDD X X A DDDDDD J
55303 // D D X X A A D D J
55304 // D D X X A A D D J
55305 // D D X A A D D J
55306 // D D X X AAAAAAA D D J J
55307 // D D X X A A D D J J
55308 // DDDDDD X X A A DDDDDD JJJJJ
55309
55310
55311 // VIF THU 20 NOV 2025 22:21:23 ** DXADJ ** DIAGNOSTICS PAGE 01454
55312
55313
55314 // VIF THU 20 NOV 2025 22:21:23 ** DXADJ ** GENERATED CODE PAGE 01455
55315
55316 int_4 _dxadj (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
55317 { // ** body not listed **
55373 }
55374
55375 // VIF THU 20 NOV 2025 22:21:23 ** DXC210 ** DXC210 PAGE 01457
55376
55377 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
55378 // S S U U B B R R O O U U T I NN N E
55379 // S U U B B R R O O U U T I N N N E
55380 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
55381 // S U U B B R R O O U U T I N N N E
55382 // S S U U B B R R O O U U T I N NN E
55383 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
55384
55385 // DDDDDD X X CCCCC 22222 1 000
55386 // D D X X C C 2 2 11 0 0
55387 // D D X X C 2 1 1 0 0
55388 // D D X C 22222 1 0 0
55389 // D D X X C 2 1 0 0
55390 // D D X X C C 2 1 0 0
55391 // DDDDDD X X CCCCC 2222222 11111 000
55392
55393
55394 // VIF THU 20 NOV 2025 22:21:23 ** DXC210 ** DIAGNOSTICS PAGE 01458
55395
55396
55397 // VIF THU 20 NOV 2025 22:21:23 ** DXC210 ** GENERATED CODE PAGE 01459
55398
55399 int_4 _dxc210 (int_4 _p_ k_, real_8 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
55400 { // ** body not listed **
55466 }
55467
55468 // VIF THU 20 NOV 2025 22:21:23 ** DX ** DX PAGE 01461
55469
55470 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
55471 // S S U U B B R R O O U U T I NN N E
55472 // S U U B B R R O O U U T I N N N E
55473 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
55474 // S U U B B R R O O U U T I N N N E
55475 // S S U U B B R R O O U U T I N NN E
55476 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
55477
55478 // DDDDDD X X
55479 // D D X X
55480 // D D X X
55481 // D D X
55482 // D D X X
55483 // D D X X
55484 // DDDDDD X X
55485
55486
55487 // VIF THU 20 NOV 2025 22:21:23 ** DX ** DIAGNOSTICS PAGE 01462
55488
55489
55490 // VIF THU 20 NOV 2025 22:21:23 ** DX ** GENERATED CODE PAGE 01463
55491
55492 int_4 _dx (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uxxx_, real_4 _p_ uxxxx_)
55493 { // ** body not listed **
55585 }
55586
55587 // VIF THU 20 NOV 2025 22:21:23 ** DXPSI ** DXPSI PAGE 01465
55588
55589 // RRRRRR EEEEEEE A L 88888
55590 // R R E A A L * * 8 8
55591 // R R E A A L * * 8 8
55592 // RRRRRR EEEEE A A L ******* 88888
55593 // R R E AAAAAAA L * * 8 8
55594 // R R E A A L * * 8 8
55595 // R R EEEEEEE A A LLLLLLL 88888
55596
55597 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
55598 // F U U NN N C C T I O O NN N
55599 // F U U N N N C T I O O N N N
55600 // FFFFF U U N N N C T I O O N N N
55601 // F U U N N N C T I O O N N N
55602 // F U U N NN C C T I O O N NN
55603 // F UUUUU N N CCCCC T III OOOOO N N
55604
55605 // DDDDDD X X PPPPPP SSSSS III
55606 // D D X X P P S S I
55607 // D D X X P P S I
55608 // D D X PPPPPP SSSSS I
55609 // D D X X P S I
55610 // D D X X P S S I
55611 // DDDDDD X X P SSSSS III
55612
55613
55614 // VIF THU 20 NOV 2025 22:21:23 ** DXPSI ** DIAGNOSTICS PAGE 01466
55615
55616
55617 // VIF THU 20 NOV 2025 22:21:23 ** DXPSI ** GENERATED CODE PAGE 01467
55618
55619 real_8 _dxpsi (real_8 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
55620 { // ** body not listed **
55807 }
55808
55809 // VIF THU 20 NOV 2025 22:21:23 ** DXRED ** DXRED PAGE 01471
55810
55811 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
55812 // S S U U B B R R O O U U T I NN N E
55813 // S U U B B R R O O U U T I N N N E
55814 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
55815 // S U U B B R R O O U U T I N N N E
55816 // S S U U B B R R O O U U T I N NN E
55817 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
55818
55819 // DDDDDD X X RRRRRR EEEEEEE DDDDDD
55820 // D D X X R R E D D
55821 // D D X X R R E D D
55822 // D D X RRRRRR EEEEE D D
55823 // D D X X R R E D D
55824 // D D X X R R E D D
55825 // DDDDDD X X R R EEEEEEE DDDDDD
55826
55827
55828 // VIF THU 20 NOV 2025 22:21:23 ** DXRED ** DIAGNOSTICS PAGE 01472
55829
55830
55831 // VIF THU 20 NOV 2025 22:21:23 ** DXRED ** GENERATED CODE PAGE 01473
55832
55833 int_4 _dxred (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
55834 { // ** body not listed **
55907 }
55908
55909 // VIF THU 20 NOV 2025 22:21:23 ** DY4 ** DY4 PAGE 01475
55910
55911 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
55912 // S S U U B B R R O O U U T I NN N E
55913 // S U U B B R R O O U U T I N N N E
55914 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
55915 // S U U B B R R O O U U T I N N N E
55916 // S S U U B B R R O O U U T I N NN E
55917 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
55918
55919 // DDDDDD Y Y 4
55920 // D D Y Y 4 4
55921 // D D Y Y 4 4
55922 // D D Y 4444444
55923 // D D Y 4
55924 // D D Y 4
55925 // DDDDDD Y 4
55926
55927
55928 // VIF THU 20 NOV 2025 22:21:23 ** DY4 ** DIAGNOSTICS PAGE 01476
55929
55930
55931 // VIF THU 20 NOV 2025 22:21:23 ** DY4 ** GENERATED CODE PAGE 01477
55932
55933 int_4 _dy4 (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uyyy_, real_4 _p_ uyyyy_)
55934 { // ** body not listed **
56024 }
56025
56026 // VIF THU 20 NOV 2025 22:21:23 ** DYAIRY ** DYAIRY PAGE 01479
56027
56028 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
56029 // S S U U B B R R O O U U T I NN N E
56030 // S U U B B R R O O U U T I N N N E
56031 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
56032 // S U U B B R R O O U U T I N N N E
56033 // S S U U B B R R O O U U T I N NN E
56034 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
56035
56036 // DDDDDD Y Y A III RRRRRR Y Y
56037 // D D Y Y A A I R R Y Y
56038 // D D Y Y A A I R R Y Y
56039 // D D Y A A I RRRRRR Y
56040 // D D Y AAAAAAA I R R Y
56041 // D D Y A A I R R Y
56042 // DDDDDD Y A A III R R Y
56043
56044
56045 // VIF THU 20 NOV 2025 22:21:23 ** DYAIRY ** DIAGNOSTICS PAGE 01480
56046
56047
56048 // VIF THU 20 NOV 2025 22:21:23 ** DYAIRY ** GENERATED CODE PAGE 01481
56049
56050 int_4 _dyairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ bi_, real_8 _p_ dbi_)
56051 { // ** body not listed **
58272 }
58273
58274 // VIF THU 20 NOV 2025 22:21:23 ** DY ** DY PAGE 01524
58275
58276 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
58277 // S S U U B B R R O O U U T I NN N E
58278 // S U U B B R R O O U U T I N N N E
58279 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
58280 // S U U B B R R O O U U T I N N N E
58281 // S S U U B B R R O O U U T I N NN E
58282 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
58283
58284 // DDDDDD Y Y
58285 // D D Y Y
58286 // D D Y Y
58287 // D D Y
58288 // D D Y
58289 // D D Y
58290 // DDDDDD Y
58291
58292
58293 // VIF THU 20 NOV 2025 22:21:23 ** DY ** DIAGNOSTICS PAGE 01525
58294
58295
58296 // VIF THU 20 NOV 2025 22:21:23 ** DY ** GENERATED CODE PAGE 01526
58297
58298 int_4 _dy (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uyyy_, real_4 _p_ uyyyy_)
58299 { // ** body not listed **
58391 }
58392
58393 // VIF THU 20 NOV 2025 22:21:23 ** EFCMN ** EFCMN PAGE 01528
58394
58395 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
58396 // S S U U B B R R O O U U T I NN N E
58397 // S U U B B R R O O U U T I N N N E
58398 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
58399 // S U U B B R R O O U U T I N N N E
58400 // S S U U B B R R O O U U T I N NN E
58401 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
58402
58403 // EEEEEEE FFFFFFF CCCCC M M N N
58404 // E F C C MM MM NN N
58405 // E F C M M M M N N N
58406 // EEEEE FFFFF C M M M N N N
58407 // E F C M M N N N
58408 // E F C C M M N NN
58409 // EEEEEEE F CCCCC M M N N
58410
58411
58412 // VIF THU 20 NOV 2025 22:21:23 ** EFCMN ** DIAGNOSTICS PAGE 01529
58413
58414
58415 // VIF THU 20 NOV 2025 22:21:23 ** EFCMN ** GENERATED CODE PAGE 01530
58416
58417 int_4 _efcmn (int_4 _p_ ndata_, real_4 _p_ xdata_, real_4 _p_ ydata_, real_4 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
58418 nbkpt_, real_4 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4 _p_ xtemp_,
58419 real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_ g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ lw_)
58420 { // ** body not listed **
58625 }
58626
58627 // VIF THU 20 NOV 2025 22:21:23 ** FCMN ** FCMN PAGE 01535
58628
58629 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
58630 // S S U U B B R R O O U U T I NN N E
58631 // S U U B B R R O O U U T I N N N E
58632 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
58633 // S U U B B R R O O U U T I N N N E
58634 // S S U U B B R R O O U U T I N NN E
58635 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
58636
58637 // FFFFFFF CCCCC M M N N
58638 // F C C MM MM NN N
58639 // F C M M M M N N N
58640 // FFFFF C M M M N N N
58641 // F C M M N N N
58642 // F C C M M N NN
58643 // F CCCCC M M N N
58644
58645
58646 // VIF THU 20 NOV 2025 22:21:23 ** FCMN ** DIAGNOSTICS PAGE 01536
58647
58648
58649 // VIF THU 20 NOV 2025 22:21:23 ** FCMN ** GENERATED CODE PAGE 01537
58650
58651 int_4 _fcmn (int_4 _p_ ndata_, real_4 _p_ xdata_, real_4 _p_ ydata_, real_4 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
58652 nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
58653 mode_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4 _p_ xtemp_, real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_ g_, int_4
58654 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_)
58655 { // ** body not listed **
59037 }
59038
59039 // VIF THU 20 NOV 2025 22:21:23 ** FDJAC3 ** FDJAC3 PAGE 01545
59040
59041 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
59042 // S S U U B B R R O O U U T I NN N E
59043 // S U U B B R R O O U U T I N N N E
59044 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
59045 // S U U B B R R O O U U T I N N N E
59046 // S S U U B B R R O O U U T I N NN E
59047 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
59048
59049 // FFFFFFF DDDDDD J A CCCCC 33333
59050 // F D D J A A C C 3 3
59051 // F D D J A A C 3
59052 // FFFFF D D J A A C 33333
59053 // F D D J J AAAAAAA C 3
59054 // F D D J J A A C C 3 3
59055 // F DDDDDD JJJJJ A A CCCCC 33333
59056
59057
59058 // VIF THU 20 NOV 2025 22:21:23 ** FDJAC3 ** DIAGNOSTICS PAGE 01546
59059
59060
59061 // VIF THU 20 NOV 2025 22:21:23 ** FDJAC3 ** GENERATED CODE PAGE 01547
59062
59063 int_4 _fdjac3 (int_4 (*_fcn)(), int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4 _p_ fjac_, int_4
59064 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_)
59065 { // ** body not listed **
59104 }
59105
59106 // VIF THU 20 NOV 2025 22:21:23 ** FDUMP ** FDUMP PAGE 01548
59107
59108 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
59109 // S S U U B B R R O O U U T I NN N E
59110 // S U U B B R R O O U U T I N N N E
59111 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
59112 // S U U B B R R O O U U T I N N N E
59113 // S S U U B B R R O O U U T I N NN E
59114 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
59115
59116 // FFFFFFF DDDDDD U U M M PPPPPP
59117 // F D D U U MM MM P P
59118 // F D D U U M M M M P P
59119 // FFFFF D D U U M M M PPPPPP
59120 // F D D U U M M P
59121 // F D D U U M M P
59122 // F DDDDDD UUUUU M M P
59123
59124
59125 // VIF THU 20 NOV 2025 22:21:23 ** FDUMP ** DIAGNOSTICS PAGE 01549
59126
59127
59128 // VIF THU 20 NOV 2025 22:21:23 ** FDUMP ** GENERATED CODE PAGE 01550
59129
59130 int_4 _fdump (void)
59131 { // ** body not listed **
59134 }
59135
59136 // VIF THU 20 NOV 2025 22:21:23 ** FFTDOC ** FFTDOC PAGE 01551
59137
59138 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
59139 // S S U U B B R R O O U U T I NN N E
59140 // S U U B B R R O O U U T I N N N E
59141 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
59142 // S U U B B R R O O U U T I N N N E
59143 // S S U U B B R R O O U U T I N NN E
59144 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
59145
59146 // FFFFFFF FFFFFFF TTTTTTT DDDDDD OOOOO CCCCC
59147 // F F T D D O O C C
59148 // F F T D D O O C
59149 // FFFFF FFFFF T D D O O C
59150 // F F T D D O O C
59151 // F F T D D O O C C
59152 // F F T DDDDDD OOOOO CCCCC
59153
59154
59155 // VIF THU 20 NOV 2025 22:21:23 ** FFTDOC ** DIAGNOSTICS PAGE 01552
59156
59157
59158 // VIF THU 20 NOV 2025 22:21:23 ** FFTDOC ** GENERATED CODE PAGE 01553
59159
59160 int_4 _fftdoc (void)
59161 { // ** body not listed **
59164 }
59165
59166 // VIF THU 20 NOV 2025 22:21:23 ** FULMAT ** FULMAT PAGE 01554
59167
59168 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
59169 // S S U U B B R R O O U U T I NN N E
59170 // S U U B B R R O O U U T I N N N E
59171 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
59172 // S U U B B R R O O U U T I N N N E
59173 // S S U U B B R R O O U U T I N NN E
59174 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
59175
59176 // FFFFFFF U U L M M A TTTTTTT
59177 // F U U L MM MM A A T
59178 // F U U L M M M M A A T
59179 // FFFFF U U L M M M A A T
59180 // F U U L M M AAAAAAA T
59181 // F U U L M M A A T
59182 // F UUUUU LLLLLLL M M A A T
59183
59184
59185 // VIF THU 20 NOV 2025 22:21:23 ** FULMAT ** DIAGNOSTICS PAGE 01555
59186
59187
59188 // VIF THU 20 NOV 2025 22:21:23 ** FULMAT ** GENERATED CODE PAGE 01556
59189
59190 int_4 _fulmat (int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ aij_, int_4 _p_ indcat_, real_4 _p_ prgopt_, real_4 _p_ dattrv_,
59191 int_4 _p_ iflag_)
59192 { // ** body not listed **
59266 }
59267
59268 // VIF THU 20 NOV 2025 22:21:23 ** FZERO ** FZERO PAGE 01558
59269
59270 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
59271 // S S U U B B R R O O U U T I NN N E
59272 // S U U B B R R O O U U T I N N N E
59273 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
59274 // S U U B B R R O O U U T I N N N E
59275 // S S U U B B R R O O U U T I N NN E
59276 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
59277
59278 // FFFFFFF ZZZZZZZ EEEEEEE RRRRRR OOOOO
59279 // F Z E R R O O
59280 // F Z E R R O O
59281 // FFFFF Z EEEEE RRRRRR O O
59282 // F Z E R R O O
59283 // F * E R R O O
59284 // F ZZZZZZZ EEEEEEE R R OOOOO
59285
59286
59287 // VIF THU 20 NOV 2025 22:21:23 ** FZERO ** DIAGNOSTICS PAGE 01559
59288
59289
59290 // VIF THU 20 NOV 2025 22:21:23 ** FZERO ** GENERATED CODE PAGE 01560
59291
59292 int_4 _fzero (real_4 (*_f)(), real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ r_, real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_
59293 iflag_)
59294 { // ** body not listed **
59428 }
59429
59430 // VIF THU 20 NOV 2025 22:21:23 ** GAMRN ** GAMRN PAGE 01563
59431
59432 // RRRRRR EEEEEEE A L 4
59433 // R R E A A L * * 4 4
59434 // R R E A A L * * 4 4
59435 // RRRRRR EEEEE A A L ******* 4444444
59436 // R R E AAAAAAA L * * 4
59437 // R R E A A L * * 4
59438 // R R EEEEEEE A A LLLLLLL 4
59439
59440 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
59441 // F U U NN N C C T I O O NN N
59442 // F U U N N N C T I O O N N N
59443 // FFFFF U U N N N C T I O O N N N
59444 // F U U N N N C T I O O N N N
59445 // F U U N NN C C T I O O N NN
59446 // F UUUUU N N CCCCC T III OOOOO N N
59447
59448 // GGGGG A M M RRRRRR N N
59449 // G G A A MM MM R R NN N
59450 // G A A M M M M R R N N N
59451 // G GGGG A A M M M RRRRRR N N N
59452 // G G AAAAAAA M M R R N N N
59453 // G G A A M M R R N NN
59454 // GGGGG A A M M R R N N
59455
59456
59457 // VIF THU 20 NOV 2025 22:21:23 ** GAMRN ** DIAGNOSTICS PAGE 01564
59458
59459
59460 // VIF THU 20 NOV 2025 22:21:23 ** GAMRN ** GENERATED CODE PAGE 01565
59461
59462 real_4 _gamrn (real_4 _p_ x_)
59463 { // ** body not listed **
59602 }
59603
59604 // VIF THU 20 NOV 2025 22:21:23 ** GAUS8 ** GAUS8 PAGE 01568
59605
59606 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
59607 // S S U U B B R R O O U U T I NN N E
59608 // S U U B B R R O O U U T I N N N E
59609 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
59610 // S U U B B R R O O U U T I N N N E
59611 // S S U U B B R R O O U U T I N NN E
59612 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
59613
59614 // GGGGG A U U SSSSS 88888
59615 // G G A A U U S S 8 8
59616 // G A A U U S 8 8
59617 // G GGGG A A U U SSSSS 88888
59618 // G G AAAAAAA U U S 8 8
59619 // G G A A U U S S 8 8
59620 // GGGGG A A UUUUU SSSSS 88888
59621
59622
59623 // VIF THU 20 NOV 2025 22:21:23 ** GAUS8 ** DIAGNOSTICS PAGE 01569
59624
59625
59626 // VIF THU 20 NOV 2025 22:21:23 ** GAUS8 ** GENERATED CODE PAGE 01570
59627
59628 int_4 _gaus8 (real_4 (*_fun)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_)
59629 { // ** body not listed **
59902 }
59903
59904 // VIF THU 20 NOV 2025 22:21:23 ** H12 ** H12 PAGE 01576
59905
59906 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
59907 // S S U U B B R R O O U U T I NN N E
59908 // S U U B B R R O O U U T I N N N E
59909 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
59910 // S U U B B R R O O U U T I N N N E
59911 // S S U U B B R R O O U U T I N NN E
59912 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
59913
59914 // H H 1 22222
59915 // H H 11 2 2
59916 // H H 1 1 2
59917 // HHHHHHH 1 22222
59918 // H H 1 2
59919 // H H 1 2
59920 // H H 11111 2222222
59921
59922
59923 // VIF THU 20 NOV 2025 22:21:23 ** H12 ** DIAGNOSTICS PAGE 01577
59924
59925
59926 // VIF THU 20 NOV 2025 22:21:23 ** H12 ** GENERATED CODE PAGE 01578
59927
59928 int_4 _h12 (int_4 _p_ mode_, int_4 _p_ lpivot_, int_4 _p_ l1_, int_4 _p_ m_, real_4 _p_ u_, int_4 _p_ iue_, real_4 _p_
59929 up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
59930 { // ** body not listed **
60064 }
60065
60066 // VIF THU 20 NOV 2025 22:21:23 ** HFTI ** HFTI PAGE 01581
60067
60068 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
60069 // S S U U B B R R O O U U T I NN N E
60070 // S U U B B R R O O U U T I N N N E
60071 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
60072 // S U U B B R R O O U U T I N N N E
60073 // S S U U B B R R O O U U T I N NN E
60074 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
60075
60076 // H H FFFFFFF TTTTTTT III
60077 // H H F T I
60078 // H H F T I
60079 // HHHHHHH FFFFF T I
60080 // H H F T I
60081 // H H F T I
60082 // H H F T III
60083
60084
60085 // VIF THU 20 NOV 2025 22:21:23 ** HFTI ** DIAGNOSTICS PAGE 01582
60086
60087
60088 // VIF THU 20 NOV 2025 22:21:23 ** HFTI ** GENERATED CODE PAGE 01583
60089
60090 int_4 _hfti (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
60091 real_4 _p_ tau_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ g_, int_4 _p_ ip_)
60092 { // ** body not listed **
60281 }
60282
60283 // VIF THU 20 NOV 2025 22:21:23 ** HKSEQ ** HKSEQ PAGE 01587
60284
60285 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
60286 // S S U U B B R R O O U U T I NN N E
60287 // S U U B B R R O O U U T I N N N E
60288 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
60289 // S U U B B R R O O U U T I N N N E
60290 // S S U U B B R R O O U U T I N NN E
60291 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
60292
60293 // H H K K SSSSS EEEEEEE QQQQQ
60294 // H H K K S S E Q Q
60295 // H H K K S E Q Q
60296 // HHHHHHH KKK SSSSS EEEEE Q Q
60297 // H H K K S E Q Q Q
60298 // H H K K S S E Q Q
60299 // H H K K SSSSS EEEEEEE QQQQ Q
60300
60301
60302 // VIF THU 20 NOV 2025 22:21:23 ** HKSEQ ** DIAGNOSTICS PAGE 01588
60303
60304
60305 // VIF THU 20 NOV 2025 22:21:23 ** HKSEQ ** GENERATED CODE PAGE 01589
60306
60307 int_4 _hkseq (real_4 _p_ x_, int_4 _p_ m_, real_4 _p_ h_, int_4 _p_ ierr_)
60308 { // ** body not listed **
60567 }
60568
60569 // VIF THU 20 NOV 2025 22:21:23 ** HPPERM ** HPPERM PAGE 01595
60570
60571 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
60572 // S S U U B B R R O O U U T I NN N E
60573 // S U U B B R R O O U U T I N N N E
60574 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
60575 // S U U B B R R O O U U T I N N N E
60576 // S S U U B B R R O O U U T I N NN E
60577 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
60578
60579 // H H PPPPPP PPPPPP EEEEEEE RRRRRR M M
60580 // H H P P P P E R R MM MM
60581 // H H P P P P E R R M M M M
60582 // HHHHHHH PPPPPP PPPPPP EEEEE RRRRRR M M M
60583 // H H P P E R R M M
60584 // H H P P E R R M M
60585 // H H P P EEEEEEE R R M M
60586
60587
60588 // VIF THU 20 NOV 2025 22:21:23 ** HPPERM ** DIAGNOSTICS PAGE 01596
60589
60590
60591 // VIF THU 20 NOV 2025 22:21:23 ** HPPERM ** GENERATED CODE PAGE 01597
60592
60593 int_4 _hpperm (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ iperm_, char _p_ work_, int_4 _p_ ier_)
60594 { // ** body not listed **
60645 }
60646
60647 // VIF THU 20 NOV 2025 22:21:23 ** HPSORT ** HPSORT PAGE 01599
60648
60649 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
60650 // S S U U B B R R O O U U T I NN N E
60651 // S U U B B R R O O U U T I N N N E
60652 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
60653 // S U U B B R R O O U U T I N N N E
60654 // S S U U B B R R O O U U T I N NN E
60655 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
60656
60657 // H H PPPPPP SSSSS OOOOO RRRRRR TTTTTTT
60658 // H H P P S S O O R R T
60659 // H H P P S O O R R T
60660 // HHHHHHH PPPPPP SSSSS O O RRRRRR T
60661 // H H P S O O R R T
60662 // H H P S S O O R R T
60663 // H H P SSSSS OOOOO R R T
60664
60665
60666 // VIF THU 20 NOV 2025 22:21:23 ** HPSORT ** DIAGNOSTICS PAGE 01600
60667
60668
60669 // VIF THU 20 NOV 2025 22:21:23 ** HPSORT ** GENERATED CODE PAGE 01601
60670
60671 int_4 _hpsort (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ strbeg_, int_4 _p_ strend_, int_4 _p_ iperm_, int_4 _p_ kflag_
60672 , char _p_ work_, int_4 _p_ ier_)
60673 { // ** body not listed **
60865 }
60866
60867 // VIF THU 20 NOV 2025 22:21:23 ** HSTART ** HSTART PAGE 01605
60868
60869 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
60870 // S S U U B B R R O O U U T I NN N E
60871 // S U U B B R R O O U U T I N N N E
60872 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
60873 // S U U B B R R O O U U T I N N N E
60874 // S S U U B B R R O O U U T I N NN E
60875 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
60876
60877 // H H SSSSS TTTTTTT A RRRRRR TTTTTTT
60878 // H H S S T A A R R T
60879 // H H S T A A R R T
60880 // HHHHHHH SSSSS T A A RRRRRR T
60881 // H H S T AAAAAAA R R T
60882 // H H S S T A A R R T
60883 // H H SSSSS T A A R R T
60884
60885
60886 // VIF THU 20 NOV 2025 22:21:23 ** HSTART ** DIAGNOSTICS PAGE 01606
60887
60888
60889 // VIF THU 20 NOV 2025 22:21:23 ** HSTART ** GENERATED CODE PAGE 01607
60890
60891 int_4 _hstart (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ y_, real_4 _p_ yprime_, real_4
60892 _p_ etol_, int_4 _p_ morder_, real_4 _p_ small_, real_4 _p_ big_, real_4 _p_ spy_, real_4 _p_ pv_, real_4 _p_ yp_,
60893 real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_)
60894 { // ** body not listed **
61080 }
61081
61082 // VIF THU 20 NOV 2025 22:21:23 ** HSTCS1 ** HSTCS1 PAGE 01611
61083
61084 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
61085 // S S U U B B R R O O U U T I NN N E
61086 // S U U B B R R O O U U T I N N N E
61087 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
61088 // S U U B B R R O O U U T I N N N E
61089 // S S U U B B R R O O U U T I N NN E
61090 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
61091
61092 // H H SSSSS TTTTTTT CCCCC SSSSS 1
61093 // H H S S T C C S S 11
61094 // H H S T C S 1 1
61095 // HHHHHHH SSSSS T C SSSSS 1
61096 // H H S T C S 1
61097 // H H S S T C C S S 1
61098 // H H SSSSS T CCCCC SSSSS 11111
61099
61100
61101 // VIF THU 20 NOV 2025 22:21:23 ** HSTCS1 ** DIAGNOSTICS PAGE 01612
61102
61103
61104 // VIF THU 20 NOV 2025 22:21:23 ** HSTCS1 ** GENERATED CODE PAGE 01613
61105
61106 int_4 _hstcs1 (int_4 _p_ intl_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bda_, real_4
61107 _p_ bdb_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ bdd_, real_4 _p_
61108 elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, int_4 _p_ ierr1_, real_4 _p_ am_, real_4 _p_ bm_, real_4
61109 _p_ cm_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ snth_, real_4 _p_ rsq_, real_4 _p_ wrk_)
61110 { // ** body not listed **
61350 }
61351
61352 // VIF THU 20 NOV 2025 22:21:23 ** HVNRM ** HVNRM PAGE 01618
61353
61354 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
61355 // F U U NN N C C T I O O NN N
61356 // F U U N N N C T I O O N N N
61357 // FFFFF U U N N N C T I O O N N N
61358 // F U U N N N C T I O O N N N
61359 // F U U N NN C C T I O O N NN
61360 // F UUUUU N N CCCCC T III OOOOO N N
61361
61362 // H H V V N N RRRRRR M M
61363 // H H V V NN N R R MM MM
61364 // H H V V N N N R R M M M M
61365 // HHHHHHH V V N N N RRRRRR M M M
61366 // H H V V N N N R R M M
61367 // H H V V N NN R R M M
61368 // H H V N N R R M M
61369
61370
61371 // VIF THU 20 NOV 2025 22:21:23 ** HVNRM ** DIAGNOSTICS PAGE 01619
61372
61373
61374 // VIF THU 20 NOV 2025 22:21:23 ** HVNRM ** GENERATED CODE PAGE 01620
61375
61376 real_4 _hvnrm (real_4 _p_ v_, int_4 _p_ ncomp_)
61377 { // ** body not listed **
61386 }
61387
61388
61389 // VIF THU 20 NOV 2025 22:21:23 ** HWSCS1 ** HWSCS1 PAGE 01621
61390
61391 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
61392 // S S U U B B R R O O U U T I NN N E
61393 // S U U B B R R O O U U T I N N N E
61394 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
61395 // S U U B B R R O O U U T I N N N E
61396 // S S U U B B R R O O U U T I N NN E
61397 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
61398
61399 // H H W W SSSSS CCCCC SSSSS 1
61400 // H H W W S S C C S S 11
61401 // H H W W S C S 1 1
61402 // HHHHHHH W W W SSSSS C SSSSS 1
61403 // H H W W W S C S 1
61404 // H H W W W S S C C S S 1
61405 // H H WW WW SSSSS CCCCC SSSSS 11111
61406
61407
61408 // VIF THU 20 NOV 2025 22:21:23 ** HWSCS1 ** DIAGNOSTICS PAGE 01622
61409
61410
61411 // VIF THU 20 NOV 2025 22:21:23 ** HWSCS1 ** GENERATED CODE PAGE 01623
61412
61413 int_4 _hwscs1 (int_4 _p_ intl_, real_4 _p_ ts_, real_4 _p_ tf_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bdts_,
61414 real_4 _p_ bdtf_, real_4 _p_ rs_, real_4 _p_ rf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdrs_, real_4 _p_ bdrf_,
61415 real_4 _p_ elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ w_, real_4 _p_ s_, real_4 _p_ an_,
61416 real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ r_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ sint_, real_4
61417 _p_ bmh_)
61418 { // ** body not listed **
61928 }
61929
61930 // VIF THU 20 NOV 2025 22:21:23 ** HWSSS1 ** HWSSS1 PAGE 01633
61931
61932 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
61933 // S S U U B B R R O O U U T I NN N E
61934 // S U U B B R R O O U U T I N N N E
61935 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
61936 // S U U B B R R O O U U T I N N N E
61937 // S S U U B B R R O O U U T I N NN E
61938 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
61939
61940 // H H W W SSSSS SSSSS SSSSS 1
61941 // H H W W S S S S S S 11
61942 // H H W W S S S 1 1
61943 // HHHHHHH W W W SSSSS SSSSS SSSSS 1
61944 // H H W W W S S S 1
61945 // H H W W W S S S S S S 1
61946 // H H WW WW SSSSS SSSSS SSSSS 11111
61947
61948
61949 // VIF THU 20 NOV 2025 22:21:23 ** HWSSS1 ** DIAGNOSTICS PAGE 01634
61950
61951
61952 // VIF THU 20 NOV 2025 22:21:23 ** HWSSS1 ** GENERATED CODE PAGE 01635
61953
61954 int_4 _hwsss1 (real_4 _p_ ts_, real_4 _p_ tf_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bdts_, real_4 _p_ bdtf_,
61955 real_4 _p_ ps_, real_4 _p_ pf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdps_, real_4 _p_ bdpf_, real_4 _p_ elmbda_
61956 , real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ sn_,
61957 real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_)
61958 { // ** body not listed **
62619 }
62620
62621 // VIF THU 20 NOV 2025 22:21:23 ** I1MERG ** I1MERG PAGE 01648
62622
62623 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
62624 // S S U U B B R R O O U U T I NN N E
62625 // S U U B B R R O O U U T I N N N E
62626 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
62627 // S U U B B R R O O U U T I N N N E
62628 // S S U U B B R R O O U U T I N NN E
62629 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
62630
62631 // III 1 M M EEEEEEE RRRRRR GGGGG
62632 // I 11 MM MM E R R G G
62633 // I 1 1 M M M M E R R G
62634 // I 1 M M M EEEEE RRRRRR G GGGG
62635 // I 1 M M E R R G G
62636 // I 1 M M E R R G G
62637 // III 11111 M M EEEEEEE R R GGGGG
62638
62639
62640 // VIF THU 20 NOV 2025 22:21:23 ** I1MERG ** DIAGNOSTICS PAGE 01649
62641
62642
62643 // VIF THU 20 NOV 2025 22:21:23 ** I1MERG ** GENERATED CODE PAGE 01650
62644
62645 int_4 _i1merg (real_4 _p_ icos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
62646 { // ** body not listed **
62685 }
62686
62687 // VIF THU 20 NOV 2025 22:21:23 ** IDLOC ** IDLOC PAGE 01651
62688
62689 // III N N TTTTTTT EEEEEEE GGGGG EEEEEEE RRRRRR 4
62690 // I NN N T E G G E R R * * 4 4
62691 // I N N N T E G E R R * * 4 4
62692 // I N N N T EEEEE G GGGG EEEEE RRRRRR ******* 4444444
62693 // I N N N T E G G E R R * * 4
62694 // I N NN T E G G E R R * * 4
62695 // III N N T EEEEEEE GGGGG EEEEEEE R R 4
62696
62697 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
62698 // F U U NN N C C T I O O NN N
62699 // F U U N N N C T I O O N N N
62700 // FFFFF U U N N N C T I O O N N N
62701 // F U U N N N C T I O O N N N
62702 // F U U N NN C C T I O O N NN
62703 // F UUUUU N N CCCCC T III OOOOO N N
62704
62705 // III DDDDDD L OOOOO CCCCC
62706 // I D D L O O C C
62707 // I D D L O O C
62708 // I D D L O O C
62709 // I D D L O O C
62710 // I D D L O O C C
62711 // III DDDDDD LLLLLLL OOOOO CCCCC
62712
62713
62714 // VIF THU 20 NOV 2025 22:21:23 ** IDLOC ** DIAGNOSTICS PAGE 01652
62715
62716
62717 // VIF THU 20 NOV 2025 22:21:23 ** IDLOC ** GENERATED CODE PAGE 01653
62718
62719 int_4 _idloc (int_4 _p_ loc_, real_8 _p_ sx_, int_4 _p_ ix_)
62720 { // ** body not listed **
62753 }
62754
62755 // VIF THU 20 NOV 2025 22:21:23 ** INDXA ** INDXA PAGE 01654
62756
62757 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
62758 // S S U U B B R R O O U U T I NN N E
62759 // S U U B B R R O O U U T I N N N E
62760 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
62761 // S U U B B R R O O U U T I N N N E
62762 // S S U U B B R R O O U U T I N NN E
62763 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
62764
62765 // III N N DDDDDD X X A
62766 // I NN N D D X X A A
62767 // I N N N D D X X A A
62768 // I N N N D D X A A
62769 // I N N N D D X X AAAAAAA
62770 // I N NN D D X X A A
62771 // III N N DDDDDD X X A A
62772
62773
62774 // VIF THU 20 NOV 2025 22:21:23 ** INDXA ** DIAGNOSTICS PAGE 01655
62775
62776
62777 // VIF THU 20 NOV 2025 22:21:23 ** INDXA ** GENERATED CODE PAGE 01656
62778
62779 int_4 _indxa (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
62780 { // ** body not listed **
62797 }
62798
62799 // VIF THU 20 NOV 2025 22:21:23 ** INDXB ** INDXB PAGE 01657
62800
62801 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
62802 // S S U U B B R R O O U U T I NN N E
62803 // S U U B B R R O O U U T I N N N E
62804 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
62805 // S U U B B R R O O U U T I N N N E
62806 // S S U U B B R R O O U U T I N NN E
62807 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
62808
62809 // III N N DDDDDD X X BBBBBB
62810 // I NN N D D X X B B
62811 // I N N N D D X X B B
62812 // I N N N D D X BBBBBB
62813 // I N N N D D X X B B
62814 // I N NN D D X X B B
62815 // III N N DDDDDD X X BBBBBB
62816
62817
62818 // VIF THU 20 NOV 2025 22:21:23 ** INDXB ** DIAGNOSTICS PAGE 01658
62819
62820
62821 // VIF THU 20 NOV 2025 22:21:23 ** INDXB ** GENERATED CODE PAGE 01659
62822
62823 int_4 _indxb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
62824 { // ** body not listed **
62884 }
62885
62886 // VIF THU 20 NOV 2025 22:21:23 ** INDXC ** INDXC PAGE 01661
62887
62888 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
62889 // S S U U B B R R O O U U T I NN N E
62890 // S U U B B R R O O U U T I N N N E
62891 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
62892 // S U U B B R R O O U U T I N N N E
62893 // S S U U B B R R O O U U T I N NN E
62894 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
62895
62896 // III N N DDDDDD X X CCCCC
62897 // I NN N D D X X C C
62898 // I N N N D D X X C
62899 // I N N N D D X C
62900 // I N N N D D X X C
62901 // I N NN D D X X C C
62902 // III N N DDDDDD X X CCCCC
62903
62904
62905 // VIF THU 20 NOV 2025 22:21:23 ** INDXC ** DIAGNOSTICS PAGE 01662
62906
62907
62908 // VIF THU 20 NOV 2025 22:21:23 ** INDXC ** GENERATED CODE PAGE 01663
62909
62910 int_4 _indxc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
62911 { // ** body not listed **
62928 }
62929
62930 // VIF THU 20 NOV 2025 22:21:23 ** INXCA ** INXCA PAGE 01664
62931
62932 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
62933 // S S U U B B R R O O U U T I NN N E
62934 // S U U B B R R O O U U T I N N N E
62935 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
62936 // S U U B B R R O O U U T I N N N E
62937 // S S U U B B R R O O U U T I N NN E
62938 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
62939
62940 // III N N X X CCCCC A
62941 // I NN N X X C C A A
62942 // I N N N X X C A A
62943 // I N N N X C A A
62944 // I N N N X X C AAAAAAA
62945 // I N NN X X C C A A
62946 // III N N X X CCCCC A A
62947
62948
62949 // VIF THU 20 NOV 2025 22:21:23 ** INXCA ** DIAGNOSTICS PAGE 01665
62950
62951
62952 // VIF THU 20 NOV 2025 22:21:23 ** INXCA ** GENERATED CODE PAGE 01666
62953
62954 int_4 _inxca (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
62955 { // ** body not listed **
62972 }
62973
62974 // VIF THU 20 NOV 2025 22:21:23 ** INXCB ** INXCB PAGE 01667
62975
62976 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
62977 // S S U U B B R R O O U U T I NN N E
62978 // S U U B B R R O O U U T I N N N E
62979 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
62980 // S U U B B R R O O U U T I N N N E
62981 // S S U U B B R R O O U U T I N NN E
62982 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
62983
62984 // III N N X X CCCCC BBBBBB
62985 // I NN N X X C C B B
62986 // I N N N X X C B B
62987 // I N N N X C BBBBBB
62988 // I N N N X X C B B
62989 // I N NN X X C C B B
62990 // III N N X X CCCCC BBBBBB
62991
62992
62993 // VIF THU 20 NOV 2025 22:21:23 ** INXCB ** DIAGNOSTICS PAGE 01668
62994
62995
62996 // VIF THU 20 NOV 2025 22:21:23 ** INXCB ** GENERATED CODE PAGE 01669
62997
62998 int_4 _inxcb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
62999 { // ** body not listed **
63058 }
63059
63060 // VIF THU 20 NOV 2025 22:21:23 ** INXCC ** INXCC PAGE 01671
63061
63062 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
63063 // S S U U B B R R O O U U T I NN N E
63064 // S U U B B R R O O U U T I N N N E
63065 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
63066 // S U U B B R R O O U U T I N N N E
63067 // S S U U B B R R O O U U T I N NN E
63068 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
63069
63070 // III N N X X CCCCC CCCCC
63071 // I NN N X X C C C C
63072 // I N N N X X C C
63073 // I N N N X C C
63074 // I N N N X X C C
63075 // I N NN X X C C C C
63076 // III N N X X CCCCC CCCCC
63077
63078
63079 // VIF THU 20 NOV 2025 22:21:23 ** INXCC ** DIAGNOSTICS PAGE 01672
63080
63081
63082 // VIF THU 20 NOV 2025 22:21:23 ** INXCC ** GENERATED CODE PAGE 01673
63083
63084 int_4 _inxcc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
63085 { // ** body not listed **
63102 }
63103
63104 // VIF THU 20 NOV 2025 22:21:23 ** IPLOC ** IPLOC PAGE 01674
63105
63106 // III N N TTTTTTT EEEEEEE GGGGG EEEEEEE RRRRRR 4
63107 // I NN N T E G G E R R * * 4 4
63108 // I N N N T E G E R R * * 4 4
63109 // I N N N T EEEEE G GGGG EEEEE RRRRRR ******* 4444444
63110 // I N N N T E G G E R R * * 4
63111 // I N NN T E G G E R R * * 4
63112 // III N N T EEEEEEE GGGGG EEEEEEE R R 4
63113
63114 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
63115 // F U U NN N C C T I O O NN N
63116 // F U U N N N C T I O O N N N
63117 // FFFFF U U N N N C T I O O N N N
63118 // F U U N N N C T I O O N N N
63119 // F U U N NN C C T I O O N NN
63120 // F UUUUU N N CCCCC T III OOOOO N N
63121
63122 // III PPPPPP L OOOOO CCCCC
63123 // I P P L O O C C
63124 // I P P L O O C
63125 // I PPPPPP L O O C
63126 // I P L O O C
63127 // I P L O O C C
63128 // III P LLLLLLL OOOOO CCCCC
63129
63130
63131 // VIF THU 20 NOV 2025 22:21:23 ** IPLOC ** DIAGNOSTICS PAGE 01675
63132
63133
63134 // VIF THU 20 NOV 2025 22:21:23 ** IPLOC ** GENERATED CODE PAGE 01676
63135
63136 int_4 _iploc (int_4 _p_ loc_, real_4 _p_ sx_, int_4 _p_ ix_)
63137 { // ** body not listed **
63170 }
63171
63172 // VIF THU 20 NOV 2025 22:21:23 ** IPPERM ** IPPERM PAGE 01677
63173
63174 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
63175 // S S U U B B R R O O U U T I NN N E
63176 // S U U B B R R O O U U T I N N N E
63177 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
63178 // S U U B B R R O O U U T I N N N E
63179 // S S U U B B R R O O U U T I N NN E
63180 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
63181
63182 // III PPPPPP PPPPPP EEEEEEE RRRRRR M M
63183 // I P P P P E R R MM MM
63184 // I P P P P E R R M M M M
63185 // I PPPPPP PPPPPP EEEEE RRRRRR M M M
63186 // I P P E R R M M
63187 // I P P E R R M M
63188 // III P P EEEEEEE R R M M
63189
63190
63191 // VIF THU 20 NOV 2025 22:21:23 ** IPPERM ** DIAGNOSTICS PAGE 01678
63192
63193
63194 // VIF THU 20 NOV 2025 22:21:23 ** IPPERM ** GENERATED CODE PAGE 01679
63195
63196 int_4 _ipperm (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
63197 { // ** body not listed **
63241 }
63242
63243 // VIF THU 20 NOV 2025 22:21:23 ** IPSORT ** IPSORT PAGE 01680
63244
63245 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
63246 // S S U U B B R R O O U U T I NN N E
63247 // S U U B B R R O O U U T I N N N E
63248 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
63249 // S U U B B R R O O U U T I N N N E
63250 // S S U U B B R R O O U U T I N NN E
63251 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
63252
63253 // III PPPPPP SSSSS OOOOO RRRRRR TTTTTTT
63254 // I P P S S O O R R T
63255 // I P P S O O R R T
63256 // I PPPPPP SSSSS O O RRRRRR T
63257 // I P S O O R R T
63258 // I P S S O O R R T
63259 // III P SSSSS OOOOO R R T
63260
63261
63262 // VIF THU 20 NOV 2025 22:21:23 ** IPSORT ** DIAGNOSTICS PAGE 01681
63263
63264
63265 // VIF THU 20 NOV 2025 22:21:23 ** IPSORT ** GENERATED CODE PAGE 01682
63266
63267 int_4 _ipsort (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
63268 { // ** body not listed **
63432 }
63433
63434 // VIF THU 20 NOV 2025 22:21:23 ** ISORT ** ISORT PAGE 01686
63435
63436 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
63437 // S S U U B B R R O O U U T I NN N E
63438 // S U U B B R R O O U U T I N N N E
63439 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
63440 // S U U B B R R O O U U T I N N N E
63441 // S S U U B B R R O O U U T I N NN E
63442 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
63443
63444 // III SSSSS OOOOO RRRRRR TTTTTTT
63445 // I S S O O R R T
63446 // I S O O R R T
63447 // I SSSSS O O RRRRRR T
63448 // I S O O R R T
63449 // I S S O O R R T
63450 // III SSSSS OOOOO R R T
63451
63452
63453 // VIF THU 20 NOV 2025 22:21:23 ** ISORT ** DIAGNOSTICS PAGE 01687
63454
63455
63456 // VIF THU 20 NOV 2025 22:21:23 ** ISORT ** GENERATED CODE PAGE 01688
63457
63458 int_4 _isort (int_4 _p_ ix_, int_4 _p_ iy_, int_4 _p_ n_, int_4 _p_ kflag_)
63459 { // ** body not listed **
63710 }
63711
63712 // VIF THU 20 NOV 2025 22:21:23 ** JAIRY ** JAIRY PAGE 01693
63713
63714 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
63715 // S S U U B B R R O O U U T I NN N E
63716 // S U U B B R R O O U U T I N N N E
63717 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
63718 // S U U B B R R O O U U T I N N N E
63719 // S S U U B B R R O O U U T I N NN E
63720 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
63721
63722 // J A III RRRRRR Y Y
63723 // J A A I R R Y Y
63724 // J A A I R R Y Y
63725 // J A A I RRRRRR Y
63726 // J J AAAAAAA I R R Y
63727 // J J A A I R R Y
63728 // JJJJJ A A III R R Y
63729
63730
63731 // VIF THU 20 NOV 2025 22:21:23 ** JAIRY ** DIAGNOSTICS PAGE 01694
63732
63733
63734 // VIF THU 20 NOV 2025 22:21:23 ** JAIRY ** GENERATED CODE PAGE 01695
63735
63736 int_4 _jairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ ai_, real_4 _p_ dai_)
63737 { // ** body not listed **
65660 }
65661
65662 // VIF THU 20 NOV 2025 22:21:23 ** LLSIA ** LLSIA PAGE 01733
65663
65664 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
65665 // S S U U B B R R O O U U T I NN N E
65666 // S U U B B R R O O U U T I N N N E
65667 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
65668 // S U U B B R R O O U U T I N N N E
65669 // S S U U B B R R O O U U T I N NN E
65670 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
65671
65672 // L L SSSSS III A
65673 // L L S S I A A
65674 // L L S I A A
65675 // L L SSSSS I A A
65676 // L L S I AAAAAAA
65677 // L L S S I A A
65678 // LLLLLLL LLLLLLL SSSSS III A A
65679
65680
65681 // VIF THU 20 NOV 2025 22:21:23 ** LLSIA ** DIAGNOSTICS PAGE 01734
65682
65683
65684 // VIF THU 20 NOV 2025 22:21:23 ** LLSIA ** GENERATED CODE PAGE 01735
65685
65686 int_4 _llsia (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
65687 real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
65688 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
65689 { // ** body not listed **
65948 }
65949
65950 // VIF THU 20 NOV 2025 22:21:23 ** LPDP ** LPDP PAGE 01741
65951
65952 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
65953 // S S U U B B R R O O U U T I NN N E
65954 // S U U B B R R O O U U T I N N N E
65955 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
65956 // S U U B B R R O O U U T I N N N E
65957 // S S U U B B R R O O U U T I N NN E
65958 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
65959
65960 // L PPPPPP DDDDDD PPPPPP
65961 // L P P D D P P
65962 // L P P D D P P
65963 // L PPPPPP D D PPPPPP
65964 // L P D D P
65965 // L P D D P
65966 // LLLLLLL P DDDDDD P
65967
65968
65969 // VIF THU 20 NOV 2025 22:21:23 ** LPDP ** DIAGNOSTICS PAGE 01742
65970
65971
65972 // VIF THU 20 NOV 2025 22:21:23 ** LPDP ** GENERATED CODE PAGE 01743
65973
65974 int_4 _lpdp (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n1_, int_4 _p_ n2_, real_4 _p_ prgopt_, real_4 _p_
65975 x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_)
65976 { // ** body not listed **
66143 }
66144
66145 // VIF THU 20 NOV 2025 22:21:23 ** LSEI ** LSEI PAGE 01747
66146
66147 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
66148 // S S U U B B R R O O U U T I NN N E
66149 // S U U B B R R O O U U T I N N N E
66150 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
66151 // S U U B B R R O O U U T I N N N E
66152 // S S U U B B R R O O U U T I N NN E
66153 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
66154
66155 // L SSSSS EEEEEEE III
66156 // L S S E I
66157 // L S E I
66158 // L SSSSS EEEEE I
66159 // L S E I
66160 // L S S E I
66161 // LLLLLLL SSSSS EEEEEEE III
66162
66163
66164 // VIF THU 20 NOV 2025 22:21:23 ** LSEI ** DIAGNOSTICS PAGE 01748
66165
66166
66167 // VIF THU 20 NOV 2025 22:21:23 ** LSEI ** GENERATED CODE PAGE 01749
66168
66169 int_4 _lsei (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_4 _p_
66170 prgopt_, real_4 _p_ x_, real_4 _p_ rnorme_, real_4 _p_ rnorml_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_)
66171 { // ** body not listed **
66702 }
66703
66704 // VIF THU 20 NOV 2025 22:21:23 ** LSI ** LSI PAGE 01760
66705
66706 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
66707 // S S U U B B R R O O U U T I NN N E
66708 // S U U B B R R O O U U T I N N N E
66709 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
66710 // S U U B B R R O O U U T I N N N E
66711 // S S U U B B R R O O U U T I N NN E
66712 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
66713
66714 // L SSSSS III
66715 // L S S I
66716 // L S I
66717 // L SSSSS I
66718 // L S I
66719 // L S S I
66720 // LLLLLLL SSSSS III
66721
66722
66723 // VIF THU 20 NOV 2025 22:21:23 ** LSI ** DIAGNOSTICS PAGE 01761
66724
66725
66726 // VIF THU 20 NOV 2025 22:21:23 ** LSI ** GENERATED CODE PAGE 01762
66727
66728 int_4 _lsi (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_4 _p_ prgopt_, real_4 _p_
66729 x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_)
66730 { // ** body not listed **
66956 }
66957
66958 // VIF THU 20 NOV 2025 22:21:23 ** LSSODS ** LSSODS PAGE 01767
66959
66960 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
66961 // S S U U B B R R O O U U T I NN N E
66962 // S U U B B R R O O U U T I N N N E
66963 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
66964 // S U U B B R R O O U U T I N N N E
66965 // S S U U B B R R O O U U T I N NN E
66966 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
66967
66968 // L SSSSS SSSSS OOOOO DDDDDD SSSSS
66969 // L S S S S O O D D S S
66970 // L S S O O D D S
66971 // L SSSSS SSSSS O O D D SSSSS
66972 // L S S O O D D S
66973 // L S S S S O O D D S S
66974 // LLLLLLL SSSSS SSSSS OOOOO DDDDDD SSSSS
66975
66976
66977 // VIF THU 20 NOV 2025 22:21:23 ** LSSODS ** DIAGNOSTICS PAGE 01768
66978
66979
66980 // VIF THU 20 NOV 2025 22:21:23 ** LSSODS ** GENERATED CODE PAGE 01769
66981
66982 int_4 _lssods (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ nrda_, int_4 _p_
66983 iflag_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_, real_4 _p_ diag_, int_4 _p_ kpivot_, int_4 _p_ iter_,
66984 real_4 _p_ resnrm_, real_4 _p_ xnorm_, real_4 _p_ z_, real_4 _p_ r_, real_4 _p_ div_, real_4 _p_ td_, real_4 _p_
66985 scales_)
66986 { // ** body not listed **
67161 }
67162
67163 // VIF THU 20 NOV 2025 22:21:23 ** LSSUDS ** LSSUDS PAGE 01773
67164
67165 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
67166 // S S U U B B R R O O U U T I NN N E
67167 // S U U B B R R O O U U T I N N N E
67168 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
67169 // S U U B B R R O O U U T I N N N E
67170 // S S U U B B R R O O U U T I N NN E
67171 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
67172
67173 // L SSSSS SSSSS U U DDDDDD SSSSS
67174 // L S S S S U U D D S S
67175 // L S S U U D D S
67176 // L SSSSS SSSSS U U D D SSSSS
67177 // L S S U U D D S
67178 // L S S S S U U D D S S
67179 // LLLLLLL SSSSS SSSSS UUUUU DDDDDD SSSSS
67180
67181
67182 // VIF THU 20 NOV 2025 22:21:23 ** LSSUDS ** DIAGNOSTICS PAGE 01774
67183
67184
67185 // VIF THU 20 NOV 2025 22:21:23 ** LSSUDS ** GENERATED CODE PAGE 01775
67186
67187 int_4 _lssuds (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, real_4 _p_ u_,
67188 int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_, real_4 _p_
67189 diag_, int_4 _p_ kpivot_, real_4 _p_ s_, real_4 _p_ div_, real_4 _p_ td_, int_4 _p_ isflg_, real_4 _p_ scales_)
67190 { // ** body not listed **
67367 }
67368
67369 // VIF THU 20 NOV 2025 22:21:23 ** MACON ** MACON PAGE 01779
67370
67371 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
67372 // S S U U B B R R O O U U T I NN N E
67373 // S U U B B R R O O U U T I N N N E
67374 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
67375 // S U U B B R R O O U U T I N N N E
67376 // S S U U B B R R O O U U T I N NN E
67377 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
67378
67379 // M M A CCCCC OOOOO N N
67380 // MM MM A A C C O O NN N
67381 // M M M M A A C O O N N N
67382 // M M M A A C O O N N N
67383 // M M AAAAAAA C O O N N N
67384 // M M A A C C O O N NN
67385 // M M A A CCCCC OOOOO N N
67386
67387
67388 // VIF THU 20 NOV 2025 22:21:23 ** MACON ** DIAGNOSTICS PAGE 01780
67389
67390
67391 // VIF THU 20 NOV 2025 22:21:23 ** MACON ** GENERATED CODE PAGE 01781
67392
67393 int_4 _macon (void)
67394 { // ** body not listed **
67410 }
67411
67412 // VIF THU 20 NOV 2025 22:21:23 ** MGSBV ** MGSBV PAGE 01782
67413
67414 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
67415 // S S U U B B R R O O U U T I NN N E
67416 // S U U B B R R O O U U T I N N N E
67417 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
67418 // S U U B B R R O O U U T I N N N E
67419 // S S U U B B R R O O U U T I N NN E
67420 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
67421
67422 // M M GGGGG SSSSS BBBBBB V V
67423 // MM MM G G S S B B V V
67424 // M M M M G S B B V V
67425 // M M M G GGGG SSSSS BBBBBB V V
67426 // M M G G S B B V V
67427 // M M G G S S B B V V
67428 // M M GGGGG SSSSS BBBBBB V
67429
67430
67431 // VIF THU 20 NOV 2025 22:21:23 ** MGSBV ** DIAGNOSTICS PAGE 01783
67432
67433
67434 // VIF THU 20 NOV 2025 22:21:23 ** MGSBV ** GENERATED CODE PAGE 01784
67435
67436 int_4 _mgsbv (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, int_4 _p_ ia_, int_4 _p_ niv_, int_4 _p_ iflag_, real_4 _p_ s_
67437 , real_4 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_ wcnd_)
67438 { // ** body not listed **
67686 }
67687
67688 // VIF THU 20 NOV 2025 22:21:23 ** MINSO4 ** MINSO4 PAGE 01789
67689
67690 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
67691 // S S U U B B R R O O U U T I NN N E
67692 // S U U B B R R O O U U T I N N N E
67693 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
67694 // S U U B B R R O O U U T I N N N E
67695 // S S U U B B R R O O U U T I N NN E
67696 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
67697
67698 // M M III N N SSSSS OOOOO 4
67699 // MM MM I NN N S S O O 4 4
67700 // M M M M I N N N S O O 4 4
67701 // M M M I N N N SSSSS O O 4444444
67702 // M M I N N N S O O 4
67703 // M M I N NN S S O O 4
67704 // M M III N N SSSSS OOOOO 4
67705
67706
67707 // VIF THU 20 NOV 2025 22:21:23 ** MINSO4 ** DIAGNOSTICS PAGE 01790
67708
67709
67710 // VIF THU 20 NOV 2025 22:21:23 ** MINSO4 ** GENERATED CODE PAGE 01791
67711
67712 int_4 _minso4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
67713 { // ** body not listed **
67738 }
67739
67740 // VIF THU 20 NOV 2025 22:21:23 ** MINSOL ** MINSOL PAGE 01792
67741
67742 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
67743 // S S U U B B R R O O U U T I NN N E
67744 // S U U B B R R O O U U T I N N N E
67745 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
67746 // S U U B B R R O O U U T I N N N E
67747 // S S U U B B R R O O U U T I N NN E
67748 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
67749
67750 // M M III N N SSSSS OOOOO L
67751 // MM MM I NN N S S O O L
67752 // M M M M I N N N S O O L
67753 // M M M I N N N SSSSS O O L
67754 // M M I N N N S O O L
67755 // M M I N NN S S O O L
67756 // M M III N N SSSSS OOOOO LLLLLLL
67757
67758
67759 // VIF THU 20 NOV 2025 22:21:23 ** MINSOL ** DIAGNOSTICS PAGE 01793
67760
67761
67762 // VIF THU 20 NOV 2025 22:21:23 ** MINSOL ** GENERATED CODE PAGE 01794
67763
67764 int_4 _minsol (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
67765 { // ** body not listed **
67790 }
67791
67792 // VIF THU 20 NOV 2025 22:21:23 ** MPADD2 ** MPADD2 PAGE 01795
67793
67794 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
67795 // S S U U B B R R O O U U T I NN N E
67796 // S U U B B R R O O U U T I N N N E
67797 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
67798 // S U U B B R R O O U U T I N N N E
67799 // S S U U B B R R O O U U T I N NN E
67800 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
67801
67802 // M M PPPPPP A DDDDDD DDDDDD 22222
67803 // MM MM P P A A D D D D 2 2
67804 // M M M M P P A A D D D D 2
67805 // M M M PPPPPP A A D D D D 22222
67806 // M M P AAAAAAA D D D D 2
67807 // M M P A A D D D D 2
67808 // M M P A A DDDDDD DDDDDD 2222222
67809
67810
67811 // VIF THU 20 NOV 2025 22:21:23 ** MPADD2 ** DIAGNOSTICS PAGE 01796
67812
67813
67814 // VIF THU 20 NOV 2025 22:21:23 ** MPADD2 ** GENERATED CODE PAGE 01797
67815
67816 int_4 _mpadd2 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_, int_4 _p_ y1_, int_4 _p_ trunc_)
67817 { // ** body not listed **
67912 }
67913
67914 // VIF THU 20 NOV 2025 22:21:23 ** MPADD3 ** MPADD3 PAGE 01799
67915
67916 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
67917 // S S U U B B R R O O U U T I NN N E
67918 // S U U B B R R O O U U T I N N N E
67919 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
67920 // S U U B B R R O O U U T I N N N E
67921 // S S U U B B R R O O U U T I N NN E
67922 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
67923
67924 // M M PPPPPP A DDDDDD DDDDDD 33333
67925 // MM MM P P A A D D D D 3 3
67926 // M M M M P P A A D D D D 3
67927 // M M M PPPPPP A A D D D D 33333
67928 // M M P AAAAAAA D D D D 3
67929 // M M P A A D D D D 3 3
67930 // M M P A A DDDDDD DDDDDD 33333
67931
67932
67933 // VIF THU 20 NOV 2025 22:21:23 ** MPADD3 ** DIAGNOSTICS PAGE 01800
67934
67935
67936 // VIF THU 20 NOV 2025 22:21:23 ** MPADD3 ** GENERATED CODE PAGE 01801
67937
67938 int_4 _mpadd3 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ s_, int_4 _p_ med_, int_4 _p_ re_)
67939 { // ** body not listed **
68070 }
68071
68072 // VIF THU 20 NOV 2025 22:21:23 ** MPADD ** MPADD PAGE 01804
68073
68074 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68075 // S S U U B B R R O O U U T I NN N E
68076 // S U U B B R R O O U U T I N N N E
68077 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68078 // S U U B B R R O O U U T I N N N E
68079 // S S U U B B R R O O U U T I N NN E
68080 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68081
68082 // M M PPPPPP A DDDDDD DDDDDD
68083 // MM MM P P A A D D D D
68084 // M M M M P P A A D D D D
68085 // M M M PPPPPP A A D D D D
68086 // M M P AAAAAAA D D D D
68087 // M M P A A D D D D
68088 // M M P A A DDDDDD DDDDDD
68089
68090
68091 // VIF THU 20 NOV 2025 22:21:23 ** MPADD ** DIAGNOSTICS PAGE 01805
68092
68093
68094 // VIF THU 20 NOV 2025 22:21:23 ** MPADD ** GENERATED CODE PAGE 01806
68095
68096 int_4 _mpadd (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
68097 { // ** body not listed **
68101 }
68102
68103 // VIF THU 20 NOV 2025 22:21:23 ** MPBLAS ** MPBLAS PAGE 01807
68104
68105 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68106 // S S U U B B R R O O U U T I NN N E
68107 // S U U B B R R O O U U T I N N N E
68108 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68109 // S U U B B R R O O U U T I N N N E
68110 // S S U U B B R R O O U U T I N NN E
68111 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68112
68113 // M M PPPPPP BBBBBB L A SSSSS
68114 // MM MM P P B B L A A S S
68115 // M M M M P P B B L A A S
68116 // M M M PPPPPP BBBBBB L A A SSSSS
68117 // M M P B B L AAAAAAA S
68118 // M M P B B L A A S S
68119 // M M P BBBBBB LLLLLLL A A SSSSS
68120
68121
68122 // VIF THU 20 NOV 2025 22:21:23 ** MPBLAS ** DIAGNOSTICS PAGE 01808
68123
68124
68125 // VIF THU 20 NOV 2025 22:21:23 ** MPBLAS ** GENERATED CODE PAGE 01809
68126
68127 int_4 _mpblas (int_4 _p_ i1_)
68128 { // ** body not listed **
68147 }
68148
68149 // VIF THU 20 NOV 2025 22:21:23 ** MPCDM ** MPCDM PAGE 01810
68150
68151 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68152 // S S U U B B R R O O U U T I NN N E
68153 // S U U B B R R O O U U T I N N N E
68154 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68155 // S U U B B R R O O U U T I N N N E
68156 // S S U U B B R R O O U U T I N NN E
68157 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68158
68159 // M M PPPPPP CCCCC DDDDDD M M
68160 // MM MM P P C C D D MM MM
68161 // M M M M P P C D D M M M M
68162 // M M M PPPPPP C D D M M M
68163 // M M P C D D M M
68164 // M M P C C D D M M
68165 // M M P CCCCC DDDDDD M M
68166
68167
68168 // VIF THU 20 NOV 2025 22:21:23 ** MPCDM ** DIAGNOSTICS PAGE 01811
68169
68170
68171 // VIF THU 20 NOV 2025 22:21:23 ** MPCDM ** GENERATED CODE PAGE 01812
68172
68173 int_4 _mpcdm (real_8 _p_ dx_, int_4 _p_ z_)
68174 { // ** body not listed **
68262 }
68263
68264 // VIF THU 20 NOV 2025 22:21:23 ** MPCHK ** MPCHK PAGE 01814
68265
68266 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68267 // S S U U B B R R O O U U T I NN N E
68268 // S U U B B R R O O U U T I N N N E
68269 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68270 // S U U B B R R O O U U T I N N N E
68271 // S S U U B B R R O O U U T I N NN E
68272 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68273
68274 // M M PPPPPP CCCCC H H K K
68275 // MM MM P P C C H H K K
68276 // M M M M P P C H H K K
68277 // M M M PPPPPP C HHHHHHH KKK
68278 // M M P C H H K K
68279 // M M P C C H H K K
68280 // M M P CCCCC H H K K
68281
68282
68283 // VIF THU 20 NOV 2025 22:21:23 ** MPCHK ** DIAGNOSTICS PAGE 01815
68284
68285
68286 // VIF THU 20 NOV 2025 22:21:23 ** MPCHK ** GENERATED CODE PAGE 01816
68287
68288 int_4 _mpchk (int_4 _p_ i_, int_4 _p_ j_)
68289 { // ** body not listed **
68573 }
68574
68575 // VIF THU 20 NOV 2025 22:21:23 ** MPCMD ** MPCMD PAGE 01822
68576
68577 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68578 // S S U U B B R R O O U U T I NN N E
68579 // S U U B B R R O O U U T I N N N E
68580 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68581 // S U U B B R R O O U U T I N N N E
68582 // S S U U B B R R O O U U T I N NN E
68583 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68584
68585 // M M PPPPPP CCCCC M M DDDDDD
68586 // MM MM P P C C MM MM D D
68587 // M M M M P P C M M M M D D
68588 // M M M PPPPPP C M M M D D
68589 // M M P C M M D D
68590 // M M P C C M M D D
68591 // M M P CCCCC M M DDDDDD
68592
68593
68594 // VIF THU 20 NOV 2025 22:21:23 ** MPCMD ** DIAGNOSTICS PAGE 01823
68595
68596
68597 // VIF THU 20 NOV 2025 22:21:23 ** MPCMD ** GENERATED CODE PAGE 01824
68598
68599 int_4 _mpcmd (int_4 _p_ x_, real_8 _p_ dz_)
68600 { // ** body not listed **
68652 }
68653
68654 // VIF THU 20 NOV 2025 22:21:23 ** MPDIVI ** MPDIVI PAGE 01826
68655
68656 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68657 // S S U U B B R R O O U U T I NN N E
68658 // S U U B B R R O O U U T I N N N E
68659 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68660 // S U U B B R R O O U U T I N N N E
68661 // S S U U B B R R O O U U T I N NN E
68662 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68663
68664 // M M PPPPPP DDDDDD III V V III
68665 // MM MM P P D D I V V I
68666 // M M M M P P D D I V V I
68667 // M M M PPPPPP D D I V V I
68668 // M M P D D I V V I
68669 // M M P D D I V V I
68670 // M M P DDDDDD III V III
68671
68672
68673 // VIF THU 20 NOV 2025 22:21:23 ** MPDIVI ** DIAGNOSTICS PAGE 01827
68674
68675
68676 // VIF THU 20 NOV 2025 22:21:23 ** MPDIVI ** GENERATED CODE PAGE 01828
68677
68678 int_4 _mpdivi (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
68679 { // ** body not listed **
68878 }
68879
68880 // VIF THU 20 NOV 2025 22:21:23 ** MPERR ** MPERR PAGE 01832
68881
68882 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68883 // S S U U B B R R O O U U T I NN N E
68884 // S U U B B R R O O U U T I N N N E
68885 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68886 // S U U B B R R O O U U T I N N N E
68887 // S S U U B B R R O O U U T I N NN E
68888 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68889
68890 // M M PPPPPP EEEEEEE RRRRRR RRRRRR
68891 // MM MM P P E R R R R
68892 // M M M M P P E R R R R
68893 // M M M PPPPPP EEEEE RRRRRR RRRRRR
68894 // M M P E R R R R
68895 // M M P E R R R R
68896 // M M P EEEEEEE R R R R
68897
68898
68899 // VIF THU 20 NOV 2025 22:21:23 ** MPERR ** DIAGNOSTICS PAGE 01833
68900
68901
68902 // VIF THU 20 NOV 2025 22:21:23 ** MPERR ** GENERATED CODE PAGE 01834
68903
68904 int_4 _mperr (void)
68905 { // ** body not listed **
68912 }
68913
68914 // VIF THU 20 NOV 2025 22:21:23 ** MPMAXR ** MPMAXR PAGE 01835
68915
68916 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68917 // S S U U B B R R O O U U T I NN N E
68918 // S U U B B R R O O U U T I N N N E
68919 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68920 // S U U B B R R O O U U T I N N N E
68921 // S S U U B B R R O O U U T I N NN E
68922 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68923
68924 // M M PPPPPP M M A X X RRRRRR
68925 // MM MM P P MM MM A A X X R R
68926 // M M M M P P M M M M A A X X R R
68927 // M M M PPPPPP M M M A A X RRRRRR
68928 // M M P M M AAAAAAA X X R R
68929 // M M P M M A A X X R R
68930 // M M P M M A A X X R R
68931
68932
68933 // VIF THU 20 NOV 2025 22:21:23 ** MPMAXR ** DIAGNOSTICS PAGE 01836
68934
68935
68936 // VIF THU 20 NOV 2025 22:21:23 ** MPMAXR ** GENERATED CODE PAGE 01837
68937
68938 int_4 _mpmaxr (int_4 _p_ x_)
68939 { // ** body not listed **
68951 }
68952
68953 // VIF THU 20 NOV 2025 22:21:23 ** MPMLP ** MPMLP PAGE 01838
68954
68955 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68956 // S S U U B B R R O O U U T I NN N E
68957 // S U U B B R R O O U U T I N N N E
68958 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68959 // S U U B B R R O O U U T I N N N E
68960 // S S U U B B R R O O U U T I N NN E
68961 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68962
68963 // M M PPPPPP M M L PPPPPP
68964 // MM MM P P MM MM L P P
68965 // M M M M P P M M M M L P P
68966 // M M M PPPPPP M M M L PPPPPP
68967 // M M P M M L P
68968 // M M P M M L P
68969 // M M P M M LLLLLLL P
68970
68971
68972 // VIF THU 20 NOV 2025 22:21:23 ** MPMLP ** DIAGNOSTICS PAGE 01839
68973
68974
68975 // VIF THU 20 NOV 2025 22:21:23 ** MPMLP ** GENERATED CODE PAGE 01840
68976
68977 int_4 _mpmlp (int_4 _p_ u_, int_4 _p_ v_, int_4 _p_ w_, int_4 _p_ j_)
68978 { // ** body not listed **
68985 }
68986
68987 // VIF THU 20 NOV 2025 22:21:23 ** MPMUL2 ** MPMUL2 PAGE 01841
68988
68989 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
68990 // S S U U B B R R O O U U T I NN N E
68991 // S U U B B R R O O U U T I N N N E
68992 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
68993 // S U U B B R R O O U U T I N N N E
68994 // S S U U B B R R O O U U T I N NN E
68995 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
68996
68997 // M M PPPPPP M M U U L 22222
68998 // MM MM P P MM MM U U L 2 2
68999 // M M M M P P M M M M U U L 2
69000 // M M M PPPPPP M M M U U L 22222
69001 // M M P M M U U L 2
69002 // M M P M M U U L 2
69003 // M M P M M UUUUU LLLLLLL 2222222
69004
69005
69006 // VIF THU 20 NOV 2025 22:21:23 ** MPMUL2 ** DIAGNOSTICS PAGE 01842
69007
69008
69009 // VIF THU 20 NOV 2025 22:21:23 ** MPMUL2 ** GENERATED CODE PAGE 01843
69010
69011 int_4 _mpmul2 (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_, int_4 _p_ trunc_)
69012 { // ** body not listed **
69160 }
69161
69162 // VIF THU 20 NOV 2025 22:21:23 ** MPMUL ** MPMUL PAGE 01846
69163
69164 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69165 // S S U U B B R R O O U U T I NN N E
69166 // S U U B B R R O O U U T I N N N E
69167 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69168 // S U U B B R R O O U U T I N N N E
69169 // S S U U B B R R O O U U T I N NN E
69170 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69171
69172 // M M PPPPPP M M U U L
69173 // MM MM P P MM MM U U L
69174 // M M M M P P M M M M U U L
69175 // M M M PPPPPP M M M U U L
69176 // M M P M M U U L
69177 // M M P M M U U L
69178 // M M P M M UUUUU LLLLLLL
69179
69180
69181 // VIF THU 20 NOV 2025 22:21:23 ** MPMUL ** DIAGNOSTICS PAGE 01847
69182
69183
69184 // VIF THU 20 NOV 2025 22:21:23 ** MPMUL ** GENERATED CODE PAGE 01848
69185
69186 int_4 _mpmul (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
69187 { // ** body not listed **
69299 }
69300
69301 // VIF THU 20 NOV 2025 22:21:23 ** MPMULI ** MPMULI PAGE 01851
69302
69303 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69304 // S S U U B B R R O O U U T I NN N E
69305 // S U U B B R R O O U U T I N N N E
69306 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69307 // S U U B B R R O O U U T I N N N E
69308 // S S U U B B R R O O U U T I N NN E
69309 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69310
69311 // M M PPPPPP M M U U L III
69312 // MM MM P P MM MM U U L I
69313 // M M M M P P M M M M U U L I
69314 // M M M PPPPPP M M M U U L I
69315 // M M P M M U U L I
69316 // M M P M M U U L I
69317 // M M P M M UUUUU LLLLLLL III
69318
69319
69320 // VIF THU 20 NOV 2025 22:21:23 ** MPMULI ** DIAGNOSTICS PAGE 01852
69321
69322
69323 // VIF THU 20 NOV 2025 22:21:23 ** MPMULI ** GENERATED CODE PAGE 01853
69324
69325 int_4 _mpmuli (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
69326 { // ** body not listed **
69330 }
69331
69332 // VIF THU 20 NOV 2025 22:21:23 ** MPNZR ** MPNZR PAGE 01854
69333
69334 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69335 // S S U U B B R R O O U U T I NN N E
69336 // S U U B B R R O O U U T I N N N E
69337 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69338 // S U U B B R R O O U U T I N N N E
69339 // S S U U B B R R O O U U T I N NN E
69340 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69341
69342 // M M PPPPPP N N ZZZZZZZ RRRRRR
69343 // MM MM P P NN N Z R R
69344 // M M M M P P N N N Z R R
69345 // M M M PPPPPP N N N Z RRRRRR
69346 // M M P N N N Z R R
69347 // M M P N NN * R R
69348 // M M P N N ZZZZZZZ R R
69349
69350
69351 // VIF THU 20 NOV 2025 22:21:23 ** MPNZR ** DIAGNOSTICS PAGE 01855
69352
69353
69354 // VIF THU 20 NOV 2025 22:21:23 ** MPNZR ** GENERATED CODE PAGE 01856
69355
69356 int_4 _mpnzr (int_4 _p_ rs_, int_4 _p_ re_, int_4 _p_ z_, int_4 _p_ trunc_)
69357 { // ** body not listed **
69499 }
69500
69501 // VIF THU 20 NOV 2025 22:21:23 ** MPOVFL ** MPOVFL PAGE 01859
69502
69503 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69504 // S S U U B B R R O O U U T I NN N E
69505 // S U U B B R R O O U U T I N N N E
69506 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69507 // S U U B B R R O O U U T I N N N E
69508 // S S U U B B R R O O U U T I N NN E
69509 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69510
69511 // M M PPPPPP OOOOO V V FFFFFFF L
69512 // MM MM P P O O V V F L
69513 // M M M M P P O O V V F L
69514 // M M M PPPPPP O O V V FFFFF L
69515 // M M P O O V V F L
69516 // M M P O O V V F L
69517 // M M P OOOOO V F LLLLLLL
69518
69519
69520 // VIF THU 20 NOV 2025 22:21:23 ** MPOVFL ** DIAGNOSTICS PAGE 01860
69521
69522
69523 // VIF THU 20 NOV 2025 22:21:23 ** MPOVFL ** GENERATED CODE PAGE 01861
69524
69525 int_4 _mpovfl (int_4 _p_ x_)
69526 { // ** body not listed **
69548 }
69549
69550 // VIF THU 20 NOV 2025 22:21:23 ** MPSTR ** MPSTR PAGE 01862
69551
69552 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69553 // S S U U B B R R O O U U T I NN N E
69554 // S U U B B R R O O U U T I N N N E
69555 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69556 // S U U B B R R O O U U T I N N N E
69557 // S S U U B B R R O O U U T I N NN E
69558 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69559
69560 // M M PPPPPP SSSSS TTTTTTT RRRRRR
69561 // MM MM P P S S T R R
69562 // M M M M P P S T R R
69563 // M M M PPPPPP SSSSS T RRRRRR
69564 // M M P S T R R
69565 // M M P S S T R R
69566 // M M P SSSSS T R R
69567
69568
69569 // VIF THU 20 NOV 2025 22:21:23 ** MPSTR ** DIAGNOSTICS PAGE 01863
69570
69571
69572 // VIF THU 20 NOV 2025 22:21:23 ** MPSTR ** GENERATED CODE PAGE 01864
69573
69574 int_4 _mpstr (int_4 _p_ x_, int_4 _p_ y_)
69575 { // ** body not listed **
69582 }
69583
69584 // VIF THU 20 NOV 2025 22:21:23 ** MPUNFL ** MPUNFL PAGE 01865
69585
69586 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69587 // S S U U B B R R O O U U T I NN N E
69588 // S U U B B R R O O U U T I N N N E
69589 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69590 // S U U B B R R O O U U T I N N N E
69591 // S S U U B B R R O O U U T I N NN E
69592 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69593
69594 // M M PPPPPP U U N N FFFFFFF L
69595 // MM MM P P U U NN N F L
69596 // M M M M P P U U N N N F L
69597 // M M M PPPPPP U U N N N FFFFF L
69598 // M M P U U N N N F L
69599 // M M P U U N NN F L
69600 // M M P UUUUU N N F LLLLLLL
69601
69602
69603 // VIF THU 20 NOV 2025 22:21:23 ** MPUNFL ** DIAGNOSTICS PAGE 01866
69604
69605
69606 // VIF THU 20 NOV 2025 22:21:23 ** MPUNFL ** GENERATED CODE PAGE 01867
69607
69608 int_4 _mpunfl (int_4 _p_ x_)
69609 { // ** body not listed **
69615 }
69616
69617 // VIF THU 20 NOV 2025 22:21:23 ** NUMXER ** NUMXER PAGE 01868
69618
69619 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
69620 // F U U NN N C C T I O O NN N
69621 // F U U N N N C T I O O N N N
69622 // FFFFF U U N N N C T I O O N N N
69623 // F U U N N N C T I O O N N N
69624 // F U U N NN C C T I O O N NN
69625 // F UUUUU N N CCCCC T III OOOOO N N
69626
69627 // N N U U M M X X EEEEEEE RRRRRR
69628 // NN N U U MM MM X X E R R
69629 // N N N U U M M M M X X E R R
69630 // N N N U U M M M X EEEEE RRRRRR
69631 // N N N U U M M X X E R R
69632 // N NN U U M M X X E R R
69633 // N N UUUUU M M X X EEEEEEE R R
69634
69635
69636 // VIF THU 20 NOV 2025 22:21:23 ** NUMXER ** DIAGNOSTICS PAGE 01869
69637
69638
69639 // VIF THU 20 NOV 2025 22:21:23 ** NUMXER ** GENERATED CODE PAGE 01870
69640
69641 int_4 _numxer (int_4 _p_ nerr_)
69642 { // ** body not listed **
69650 }
69651
69652
69653 // VIF THU 20 NOV 2025 22:21:23 ** OHTROL ** OHTROL PAGE 01871
69654
69655 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69656 // S S U U B B R R O O U U T I NN N E
69657 // S U U B B R R O O U U T I N N N E
69658 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69659 // S U U B B R R O O U U T I N N N E
69660 // S S U U B B R R O O U U T I N NN E
69661 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69662
69663 // OOOOO H H TTTTTTT RRRRRR OOOOO L
69664 // O O H H T R R O O L
69665 // O O H H T R R O O L
69666 // O O HHHHHHH T RRRRRR O O L
69667 // O O H H T R R O O L
69668 // O O H H T R R O O L
69669 // OOOOO H H T R R OOOOO LLLLLLL
69670
69671
69672 // VIF THU 20 NOV 2025 22:21:23 ** OHTROL ** DIAGNOSTICS PAGE 01872
69673
69674
69675 // VIF THU 20 NOV 2025 22:21:23 ** OHTROL ** GENERATED CODE PAGE 01873
69676
69677 int_4 _ohtrol (real_4 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_4 _p_ diag_, int_4 _p_ irank_, real_4 _p_ div_,
69678 real_4 _p_ td_)
69679 { // ** body not listed **
69712 }
69713
69714 // VIF THU 20 NOV 2025 22:21:23 ** OHTROR ** OHTROR PAGE 01874
69715
69716 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69717 // S S U U B B R R O O U U T I NN N E
69718 // S U U B B R R O O U U T I N N N E
69719 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69720 // S U U B B R R O O U U T I N N N E
69721 // S S U U B B R R O O U U T I N NN E
69722 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69723
69724 // OOOOO H H TTTTTTT RRRRRR OOOOO RRRRRR
69725 // O O H H T R R O O R R
69726 // O O H H T R R O O R R
69727 // O O HHHHHHH T RRRRRR O O RRRRRR
69728 // O O H H T R R O O R R
69729 // O O H H T R R O O R R
69730 // OOOOO H H T R R OOOOO R R
69731
69732
69733 // VIF THU 20 NOV 2025 22:21:23 ** OHTROR ** DIAGNOSTICS PAGE 01875
69734
69735
69736 // VIF THU 20 NOV 2025 22:21:23 ** OHTROR ** GENERATED CODE PAGE 01876
69737
69738 int_4 _ohtror (real_4 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_4 _p_ diag_, int_4 _p_ irank_, real_4 _p_ div_,
69739 real_4 _p_ td_)
69740 { // ** body not listed **
69773 }
69774
69775 // VIF THU 20 NOV 2025 22:21:23 ** ORTHO4 ** ORTHO4 PAGE 01877
69776
69777 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69778 // S S U U B B R R O O U U T I NN N E
69779 // S U U B B R R O O U U T I N N N E
69780 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69781 // S U U B B R R O O U U T I N N N E
69782 // S S U U B B R R O O U U T I N NN E
69783 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69784
69785 // OOOOO RRRRRR TTTTTTT H H OOOOO 4
69786 // O O R R T H H O O 4 4
69787 // O O R R T H H O O 4 4
69788 // O O RRRRRR T HHHHHHH O O 4444444
69789 // O O R R T H H O O 4
69790 // O O R R T H H O O 4
69791 // OOOOO R R T H H OOOOO 4
69792
69793
69794 // VIF THU 20 NOV 2025 22:21:23 ** ORTHO4 ** DIAGNOSTICS PAGE 01878
69795
69796
69797 // VIF THU 20 NOV 2025 22:21:23 ** ORTHO4 ** GENERATED CODE PAGE 01879
69798
69799 int_4 _ortho4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
69800 { // ** body not listed **
69825 }
69826
69827 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOG ** ORTHOG PAGE 01880
69828
69829 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69830 // S S U U B B R R O O U U T I NN N E
69831 // S U U B B R R O O U U T I N N N E
69832 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69833 // S U U B B R R O O U U T I N N N E
69834 // S S U U B B R R O O U U T I N NN E
69835 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69836
69837 // OOOOO RRRRRR TTTTTTT H H OOOOO GGGGG
69838 // O O R R T H H O O G G
69839 // O O R R T H H O O G
69840 // O O RRRRRR T HHHHHHH O O G GGGG
69841 // O O R R T H H O O G G
69842 // O O R R T H H O O G G
69843 // OOOOO R R T H H OOOOO GGGGG
69844
69845
69846 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOG ** DIAGNOSTICS PAGE 01881
69847
69848
69849 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOG ** GENERATED CODE PAGE 01882
69850
69851 int_4 _orthog (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
69852 { // ** body not listed **
69877 }
69878
69879 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOL ** ORTHOL PAGE 01883
69880
69881 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
69882 // S S U U B B R R O O U U T I NN N E
69883 // S U U B B R R O O U U T I N N N E
69884 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
69885 // S U U B B R R O O U U T I N N N E
69886 // S S U U B B R R O O U U T I N NN E
69887 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
69888
69889 // OOOOO RRRRRR TTTTTTT H H OOOOO L
69890 // O O R R T H H O O L
69891 // O O R R T H H O O L
69892 // O O RRRRRR T HHHHHHH O O L
69893 // O O R R T H H O O L
69894 // O O R R T H H O O L
69895 // OOOOO R R T H H OOOOO LLLLLLL
69896
69897
69898 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOL ** DIAGNOSTICS PAGE 01884
69899
69900
69901 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOL ** GENERATED CODE PAGE 01885
69902
69903 int_4 _orthol (real_4 _p_ a_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_, int_4
69904 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_)
69905 { // ** body not listed **
70017 }
70018
70019 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOR ** ORTHOR PAGE 01888
70020
70021 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
70022 // S S U U B B R R O O U U T I NN N E
70023 // S U U B B R R O O U U T I N N N E
70024 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
70025 // S U U B B R R O O U U T I N N N E
70026 // S S U U B B R R O O U U T I N NN E
70027 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
70028
70029 // OOOOO RRRRRR TTTTTTT H H OOOOO RRRRRR
70030 // O O R R T H H O O R R
70031 // O O R R T H H O O R R
70032 // O O RRRRRR T HHHHHHH O O RRRRRR
70033 // O O R R T H H O O R R
70034 // O O R R T H H O O R R
70035 // OOOOO R R T H H OOOOO R R
70036
70037
70038 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOR ** DIAGNOSTICS PAGE 01889
70039
70040
70041 // VIF THU 20 NOV 2025 22:21:23 ** ORTHOR ** GENERATED CODE PAGE 01890
70042
70043 int_4 _orthor (real_4 _p_ a_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_, int_4
70044 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_)
70045 { // ** body not listed **
70154 }
70155
70156 // VIF THU 20 NOV 2025 22:21:23 ** PCHNGS ** PCHNGS PAGE 01893
70157
70158 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
70159 // S S U U B B R R O O U U T I NN N E
70160 // S U U B B R R O O U U T I N N N E
70161 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
70162 // S U U B B R R O O U U T I N N N E
70163 // S S U U B B R R O O U U T I N NN E
70164 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
70165
70166 // PPPPPP CCCCC H H N N GGGGG SSSSS
70167 // P P C C H H NN N G G S S
70168 // P P C H H N N N G S
70169 // PPPPPP C HHHHHHH N N N G GGGG SSSSS
70170 // P C H H N N N G G S
70171 // P C C H H N NN G G S S
70172 // P CCCCC H H N N GGGGG SSSSS
70173
70174
70175 // VIF THU 20 NOV 2025 22:21:23 ** PCHNGS ** DIAGNOSTICS PAGE 01894
70176
70177
70178 // VIF THU 20 NOV 2025 22:21:23 ** PCHNGS ** GENERATED CODE PAGE 01895
70179
70180 int_4 _pchngs (int_4 _p_ ii_, real_4 _p_ xval_, int_4 _p_ iplace_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
70181 { // ** body not listed **
70401 }
70402
70403 // VIF THU 20 NOV 2025 22:21:23 ** PCOEF ** PCOEF PAGE 01900
70404
70405 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
70406 // S S U U B B R R O O U U T I NN N E
70407 // S U U B B R R O O U U T I N N N E
70408 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
70409 // S U U B B R R O O U U T I N N N E
70410 // S S U U B B R R O O U U T I N NN E
70411 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
70412
70413 // PPPPPP CCCCC OOOOO EEEEEEE FFFFFFF
70414 // P P C C O O E F
70415 // P P C O O E F
70416 // PPPPPP C O O EEEEE FFFFF
70417 // P C O O E F
70418 // P C C O O E F
70419 // P CCCCC OOOOO EEEEEEE F
70420
70421
70422 // VIF THU 20 NOV 2025 22:21:23 ** PCOEF ** DIAGNOSTICS PAGE 01901
70423
70424
70425 // VIF THU 20 NOV 2025 22:21:23 ** PCOEF ** GENERATED CODE PAGE 01902
70426
70427 int_4 _pcoef (int_4 _p_ l_, real_4 _p_ c_, real_4 _p_ tc_, real_4 _p_ a_)
70428 { // ** body not listed **
70457 }
70458
70459 // VIF THU 20 NOV 2025 22:21:23 ** PGSF ** PGSF PAGE 01903
70460
70461 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
70462 // F U U NN N C C T I O O NN N
70463 // F U U N N N C T I O O N N N
70464 // FFFFF U U N N N C T I O O N N N
70465 // F U U N N N C T I O O N N N
70466 // F U U N NN C C T I O O N NN
70467 // F UUUUU N N CCCCC T III OOOOO N N
70468
70469 // PPPPPP GGGGG SSSSS FFFFFFF
70470 // P P G G S S F
70471 // P P G S F
70472 // PPPPPP G GGGG SSSSS FFFFF
70473 // P G G S F
70474 // P G G S S F
70475 // P GGGGG SSSSS F
70476
70477
70478 // VIF THU 20 NOV 2025 22:21:23 ** PGSF ** DIAGNOSTICS PAGE 01904
70479
70480
70481 // VIF THU 20 NOV 2025 22:21:23 ** PGSF ** GENERATED CODE PAGE 01905
70482
70483 real_4 _pgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
70484 { // ** body not listed **
70511 }
70512
70513
70514 // VIF THU 20 NOV 2025 22:21:23 ** PIMACH ** PIMACH PAGE 01906
70515
70516 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
70517 // F U U NN N C C T I O O NN N
70518 // F U U N N N C T I O O N N N
70519 // FFFFF U U N N N C T I O O N N N
70520 // F U U N N N C T I O O N N N
70521 // F U U N NN C C T I O O N NN
70522 // F UUUUU N N CCCCC T III OOOOO N N
70523
70524 // PPPPPP III M M A CCCCC H H
70525 // P P I MM MM A A C C H H
70526 // P P I M M M M A A C H H
70527 // PPPPPP I M M M A A C HHHHHHH
70528 // P I M M AAAAAAA C H H
70529 // P I M M A A C C H H
70530 // P III M M A A CCCCC H H
70531
70532
70533 // VIF THU 20 NOV 2025 22:21:23 ** PIMACH ** DIAGNOSTICS PAGE 01907
70534
70535
70536 // VIF THU 20 NOV 2025 22:21:23 ** PIMACH ** GENERATED CODE PAGE 01908
70537
70538 real_4 _pimach (real_4 _p_ dum_)
70539 { // ** body not listed **
70544 }
70545
70546
70547 // VIF THU 20 NOV 2025 22:21:23 ** PINITM ** PINITM PAGE 01909
70548
70549 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
70550 // S S U U B B R R O O U U T I NN N E
70551 // S U U B B R R O O U U T I N N N E
70552 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
70553 // S U U B B R R O O U U T I N N N E
70554 // S S U U B B R R O O U U T I N NN E
70555 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
70556
70557 // PPPPPP III N N III TTTTTTT M M
70558 // P P I NN N I T MM MM
70559 // P P I N N N I T M M M M
70560 // PPPPPP I N N N I T M M M
70561 // P I N N N I T M M
70562 // P I N NN I T M M
70563 // P III N N III T M M
70564
70565
70566 // VIF THU 20 NOV 2025 22:21:23 ** PINITM ** DIAGNOSTICS PAGE 01910
70567
70568
70569 // VIF THU 20 NOV 2025 22:21:23 ** PINITM ** GENERATED CODE PAGE 01911
70570
70571 int_4 _pinitm (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_ lmx_, int_4 _p_ ipagef_)
70572 { // ** body not listed **
70649 }
70650
70651 // VIF THU 20 NOV 2025 22:21:23 ** PNNZRS ** PNNZRS PAGE 01913
70652
70653 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
70654 // S S U U B B R R O O U U T I NN N E
70655 // S U U B B R R O O U U T I N N N E
70656 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
70657 // S U U B B R R O O U U T I N N N E
70658 // S S U U B B R R O O U U T I N NN E
70659 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
70660
70661 // PPPPPP N N N N ZZZZZZZ RRRRRR SSSSS
70662 // P P NN N NN N Z R R S S
70663 // P P N N N N N N Z R R S
70664 // PPPPPP N N N N N N Z RRRRRR SSSSS
70665 // P N N N N N N Z R R S
70666 // P N NN N NN * R R S S
70667 // P N N N N ZZZZZZZ R R SSSSS
70668
70669
70670 // VIF THU 20 NOV 2025 22:21:23 ** PNNZRS ** DIAGNOSTICS PAGE 01914
70671
70672
70673 // VIF THU 20 NOV 2025 22:21:23 ** PNNZRS ** GENERATED CODE PAGE 01915
70674
70675 int_4 _pnnzrs (int_4 _p_ i_, real_4 _p_ xval_, int_4 _p_ iplace_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
70676 { // ** body not listed **
70889 }
70890
70891 // VIF THU 20 NOV 2025 22:21:23 ** POISD2 ** POISD2 PAGE 01920
70892
70893 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
70894 // S S U U B B R R O O U U T I NN N E
70895 // S U U B B R R O O U U T I N N N E
70896 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
70897 // S U U B B R R O O U U T I N N N E
70898 // S S U U B B R R O O U U T I N NN E
70899 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
70900
70901 // PPPPPP OOOOO III SSSSS DDDDDD 22222
70902 // P P O O I S S D D 2 2
70903 // P P O O I S D D 2
70904 // PPPPPP O O I SSSSS D D 22222
70905 // P O O I S D D 2
70906 // P O O I S S D D 2
70907 // P OOOOO III SSSSS DDDDDD 2222222
70908
70909
70910 // VIF THU 20 NOV 2025 22:21:23 ** POISD2 ** DIAGNOSTICS PAGE 01921
70911
70912
70913 // VIF THU 20 NOV 2025 22:21:23 ** POISD2 ** GENERATED CODE PAGE 01922
70914
70915 int_4 _poisd2 (int_4 _p_ mr_, int_4 _p_ nr_, int_4 _p_ istag_, real_4 _p_ ba_, real_4 _p_ bb_, real_4 _p_ bc_, real_4
70916 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ w_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
70917 { // ** body not listed **
71354 }
71355
71356 // VIF THU 20 NOV 2025 22:21:23 ** POISN2 ** POISN2 PAGE 01931
71357
71358 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
71359 // S S U U B B R R O O U U T I NN N E
71360 // S U U B B R R O O U U T I N N N E
71361 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
71362 // S U U B B R R O O U U T I N N N E
71363 // S S U U B B R R O O U U T I N NN E
71364 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
71365
71366 // PPPPPP OOOOO III SSSSS N N 22222
71367 // P P O O I S S NN N 2 2
71368 // P P O O I S N N N 2
71369 // PPPPPP O O I SSSSS N N N 22222
71370 // P O O I S N N N 2
71371 // P O O I S S N NN 2
71372 // P OOOOO III SSSSS N N 2222222
71373
71374
71375 // VIF THU 20 NOV 2025 22:21:23 ** POISN2 ** DIAGNOSTICS PAGE 01932
71376
71377
71378 // VIF THU 20 NOV 2025 22:21:23 ** POISN2 ** GENERATED CODE PAGE 01933
71379
71380 int_4 _poisn2 (int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ istag_, int_4 _p_ mixbnd_, real_4 _p_ a_, real_4 _p_ bb_, real_4
71381 _p_ c_, real_4 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_,
71382 real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
71383 { // ** body not listed **
72042 }
72043
72044 // VIF THU 20 NOV 2025 22:21:23 ** POISP2 ** POISP2 PAGE 01946
72045
72046 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
72047 // S S U U B B R R O O U U T I NN N E
72048 // S U U B B R R O O U U T I N N N E
72049 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
72050 // S U U B B R R O O U U T I N N N E
72051 // S S U U B B R R O O U U T I N NN E
72052 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
72053
72054 // PPPPPP OOOOO III SSSSS PPPPPP 22222
72055 // P P O O I S S P P 2 2
72056 // P P O O I S P P 2
72057 // PPPPPP O O I SSSSS PPPPPP 22222
72058 // P O O I S P 2
72059 // P O O I S S P 2
72060 // P OOOOO III SSSSS P 2222222
72061
72062
72063 // VIF THU 20 NOV 2025 22:21:23 ** POISP2 ** DIAGNOSTICS PAGE 01947
72064
72065
72066 // VIF THU 20 NOV 2025 22:21:23 ** POISP2 ** GENERATED CODE PAGE 01948
72067
72068 int_4 _poisp2 (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ bb_, real_4 _p_ c_, real_4 _p_ q_, int_4 _p_
72069 idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_,
72070 real_4 _p_ tcos_, real_4 _p_ p_)
72071 { // ** body not listed **
72168 }
72169
72170 // VIF THU 20 NOV 2025 22:21:23 ** POLCOF ** POLCOF PAGE 01950
72171
72172 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
72173 // S S U U B B R R O O U U T I NN N E
72174 // S U U B B R R O O U U T I N N N E
72175 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
72176 // S U U B B R R O O U U T I N N N E
72177 // S S U U B B R R O O U U T I N NN E
72178 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
72179
72180 // PPPPPP OOOOO L CCCCC OOOOO FFFFFFF
72181 // P P O O L C C O O F
72182 // P P O O L C O O F
72183 // PPPPPP O O L C O O FFFFF
72184 // P O O L C O O F
72185 // P O O L C C O O F
72186 // P OOOOO LLLLLLL CCCCC OOOOO F
72187
72188
72189 // VIF THU 20 NOV 2025 22:21:23 ** POLCOF ** DIAGNOSTICS PAGE 01951
72190
72191
72192 // VIF THU 20 NOV 2025 22:21:23 ** POLCOF ** GENERATED CODE PAGE 01952
72193
72194 int_4 _polcof (real_4 _p_ xx_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ work_)
72195 { // ** body not listed **
72234 }
72235
72236 // VIF THU 20 NOV 2025 22:21:23 ** POLFIT ** POLFIT PAGE 01953
72237
72238 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
72239 // S S U U B B R R O O U U T I NN N E
72240 // S U U B B R R O O U U T I N N N E
72241 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
72242 // S U U B B R R O O U U T I N N N E
72243 // S S U U B B R R O O U U T I N NN E
72244 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
72245
72246 // PPPPPP OOOOO L FFFFFFF III TTTTTTT
72247 // P P O O L F I T
72248 // P P O O L F I T
72249 // PPPPPP O O L FFFFF I T
72250 // P O O L F I T
72251 // P O O L F I T
72252 // P OOOOO LLLLLLL F III T
72253
72254
72255 // VIF THU 20 NOV 2025 22:21:23 ** POLFIT ** DIAGNOSTICS PAGE 01954
72256
72257
72258 // VIF THU 20 NOV 2025 22:21:23 ** POLFIT ** GENERATED CODE PAGE 01955
72259
72260 int_4 _polfit (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ w_, int_4 _p_ maxdeg_, int_4 _p_ ndeg_, real_4
72261 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_)
72262 { // ** body not listed **
72595 }
72596
72597 // VIF THU 20 NOV 2025 22:21:23 ** POLINT ** POLINT PAGE 01962
72598
72599 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
72600 // S S U U B B R R O O U U T I NN N E
72601 // S U U B B R R O O U U T I N N N E
72602 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
72603 // S U U B B R R O O U U T I N N N E
72604 // S S U U B B R R O O U U T I N NN E
72605 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
72606
72607 // PPPPPP OOOOO L III N N TTTTTTT
72608 // P P O O L I NN N T
72609 // P P O O L I N N N T
72610 // PPPPPP O O L I N N N T
72611 // P O O L I N N N T
72612 // P O O L I N NN T
72613 // P OOOOO LLLLLLL III N N T
72614
72615
72616 // VIF THU 20 NOV 2025 22:21:23 ** POLINT ** DIAGNOSTICS PAGE 01963
72617
72618
72619 // VIF THU 20 NOV 2025 22:21:23 ** POLINT ** GENERATED CODE PAGE 01964
72620
72621 int_4 _polint (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ c_)
72622 { // ** body not listed **
72653 }
72654
72655 // VIF THU 20 NOV 2025 22:21:23 ** POLYVL ** POLYVL PAGE 01965
72656
72657 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
72658 // S S U U B B R R O O U U T I NN N E
72659 // S U U B B R R O O U U T I N N N E
72660 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
72661 // S U U B B R R O O U U T I N N N E
72662 // S S U U B B R R O O U U T I N NN E
72663 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
72664
72665 // PPPPPP OOOOO L Y Y V V L
72666 // P P O O L Y Y V V L
72667 // P P O O L Y Y V V L
72668 // PPPPPP O O L Y V V L
72669 // P O O L Y V V L
72670 // P O O L Y V V L
72671 // P OOOOO LLLLLLL Y V LLLLLLL
72672
72673
72674 // VIF THU 20 NOV 2025 22:21:23 ** POLYVL ** DIAGNOSTICS PAGE 01966
72675
72676
72677 // VIF THU 20 NOV 2025 22:21:23 ** POLYVL ** GENERATED CODE PAGE 01967
72678
72679 int_4 _polyvl (int_4 _p_ nder_, real_4 _p_ xx_, real_4 _p_ yfit_, real_4 _p_ yp_, int_4 _p_ n_, real_4 _p_ x_, real_4
72680 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_)
72681 { // ** body not listed **
72777 }
72778
72779 // VIF THU 20 NOV 2025 22:21:23 ** POS3D1 ** POS3D1 PAGE 01969
72780
72781 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
72782 // S S U U B B R R O O U U T I NN N E
72783 // S U U B B R R O O U U T I N N N E
72784 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
72785 // S U U B B R R O O U U T I N N N E
72786 // S S U U B B R R O O U U T I N NN E
72787 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
72788
72789 // PPPPPP OOOOO SSSSS 33333 DDDDDD 1
72790 // P P O O S S 3 3 D D 11
72791 // P P O O S 3 D D 1 1
72792 // PPPPPP O O SSSSS 33333 D D 1
72793 // P O O S 3 D D 1
72794 // P O O S S 3 3 D D 1
72795 // P OOOOO SSSSS 33333 DDDDDD 11111
72796
72797
72798 // VIF THU 20 NOV 2025 22:21:23 ** POS3D1 ** DIAGNOSTICS PAGE 01970
72799
72800
72801 // VIF THU 20 NOV 2025 22:21:23 ** POS3D1 ** GENERATED CODE PAGE 01971
72802
72803 int_4 _pos3d1 (int_4 _p_ lp_, int_4 _p_ l_, int_4 _p_ mp_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_,
72804 real_4 _p_ c_, int_4 _p_ ldimf_, int_4 _p_ mdimf_, real_4 _p_ f_, real_4 _p_ xrt_, real_4 _p_ yrt_, real_4 _p_ t_,
72805 real_4 _p_ d_, real_4 _p_ wx_, real_4 _p_ wy_, real_4 _p_ c1_, real_4 _p_ c2_, real_4 _p_ bb_)
72806 { // ** body not listed **
73091 }
73092
73093 // VIF THU 20 NOV 2025 22:21:23 ** POSTG2 ** POSTG2 PAGE 01977
73094
73095 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
73096 // S S U U B B R R O O U U T I NN N E
73097 // S U U B B R R O O U U T I N N N E
73098 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
73099 // S U U B B R R O O U U T I N N N E
73100 // S S U U B B R R O O U U T I N NN E
73101 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
73102
73103 // PPPPPP OOOOO SSSSS TTTTTTT GGGGG 22222
73104 // P P O O S S T G G 2 2
73105 // P P O O S T G 2
73106 // PPPPPP O O SSSSS T G GGGG 22222
73107 // P O O S T G G 2
73108 // P O O S S T G G 2
73109 // P OOOOO SSSSS T GGGGG 2222222
73110
73111
73112 // VIF THU 20 NOV 2025 22:21:23 ** POSTG2 ** DIAGNOSTICS PAGE 01978
73113
73114
73115 // VIF THU 20 NOV 2025 22:21:23 ** POSTG2 ** GENERATED CODE PAGE 01979
73116
73117 int_4 _postg2 (int_4 _p_ nperod_, int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ bb_, real_4 _p_ c_, int_4 _p_
73118 idimq_, real_4 _p_ q_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4 _p_ w3_,
73119 real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
73120 { // ** body not listed **
73778 }
73779
73780 // VIF THU 20 NOV 2025 22:21:23 ** PPADD ** PPADD PAGE 01992
73781
73782 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
73783 // S S U U B B R R O O U U T I NN N E
73784 // S U U B B R R O O U U T I N N N E
73785 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
73786 // S U U B B R R O O U U T I N N N E
73787 // S S U U B B R R O O U U T I N NN E
73788 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
73789
73790 // PPPPPP PPPPPP A DDDDDD DDDDDD
73791 // P P P P A A D D D D
73792 // P P P P A A D D D D
73793 // PPPPPP PPPPPP A A D D D D
73794 // P P AAAAAAA D D D D
73795 // P P A A D D D D
73796 // P P A A DDDDDD DDDDDD
73797
73798
73799 // VIF THU 20 NOV 2025 22:21:23 ** PPADD ** DIAGNOSTICS PAGE 01993
73800
73801
73802 // VIF THU 20 NOV 2025 22:21:23 ** PPADD ** GENERATED CODE PAGE 01994
73803
73804 int_4 _ppadd (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ a_, real_4 _p_ c_, complex_8 _p_ cbp_, real_4 _p_ bp_, real_4
73805 _p_ bh_)
73806 { // ** body not listed **
74102 }
74103
74104 // VIF THU 20 NOV 2025 22:21:23 ** PPGQ8 ** PPGQ8 PAGE 02000
74105
74106 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
74107 // S S U U B B R R O O U U T I NN N E
74108 // S U U B B R R O O U U T I N N N E
74109 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
74110 // S U U B B R R O O U U T I N N N E
74111 // S S U U B B R R O O U U T I N NN E
74112 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
74113
74114 // PPPPPP PPPPPP GGGGG QQQQQ 88888
74115 // P P P P G G Q Q 8 8
74116 // P P P P G Q Q 8 8
74117 // PPPPPP PPPPPP G GGGG Q Q 88888
74118 // P P G G Q Q Q 8 8
74119 // P P G G Q Q 8 8
74120 // P P GGGGG QQQQ Q 88888
74121
74122
74123 // VIF THU 20 NOV 2025 22:21:23 ** PPGQ8 ** DIAGNOSTICS PAGE 02001
74124
74125
74126 // VIF THU 20 NOV 2025 22:21:23 ** PPGQ8 ** GENERATED CODE PAGE 02002
74127
74128 int_4 _ppgq8 (real_4 (*_fun)(), int_4 _p_ ldc_, real_4 _p_ c_, real_4 _p_ xi_, int_4 _p_ lxi_, int_4 _p_ kk_, int_4 _p_
74129 id_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ inppv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_)
74130 { // ** body not listed **
74423 }
74424
74425 // VIF THU 20 NOV 2025 22:21:23 ** PPGSF ** PPGSF PAGE 02008
74426
74427 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
74428 // F U U NN N C C T I O O NN N
74429 // F U U N N N C T I O O N N N
74430 // FFFFF U U N N N C T I O O N N N
74431 // F U U N N N C T I O O N N N
74432 // F U U N NN C C T I O O N NN
74433 // F UUUUU N N CCCCC T III OOOOO N N
74434
74435 // PPPPPP PPPPPP GGGGG SSSSS FFFFFFF
74436 // P P P P G G S S F
74437 // P P P P G S F
74438 // PPPPPP PPPPPP G GGGG SSSSS FFFFF
74439 // P P G G S F
74440 // P P G G S S F
74441 // P P GGGGG SSSSS F
74442
74443
74444 // VIF THU 20 NOV 2025 22:21:23 ** PPGSF ** DIAGNOSTICS PAGE 02009
74445
74446
74447 // VIF THU 20 NOV 2025 22:21:23 ** PPGSF ** GENERATED CODE PAGE 02010
74448
74449 real_4 _ppgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
74450 { // ** body not listed **
74461 }
74462
74463
74464 // VIF THU 20 NOV 2025 22:21:23 ** PPPSF ** PPPSF PAGE 02011
74465
74466 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
74467 // F U U NN N C C T I O O NN N
74468 // F U U N N N C T I O O N N N
74469 // FFFFF U U N N N C T I O O N N N
74470 // F U U N N N C T I O O N N N
74471 // F U U N NN C C T I O O N NN
74472 // F UUUUU N N CCCCC T III OOOOO N N
74473
74474 // PPPPPP PPPPPP PPPPPP SSSSS FFFFFFF
74475 // P P P P P P S S F
74476 // P P P P P P S F
74477 // PPPPPP PPPPPP PPPPPP SSSSS FFFFF
74478 // P P P S F
74479 // P P P S S F
74480 // P P P SSSSS F
74481
74482
74483 // VIF THU 20 NOV 2025 22:21:23 ** PPPSF ** DIAGNOSTICS PAGE 02012
74484
74485
74486 // VIF THU 20 NOV 2025 22:21:23 ** PPPSF ** GENERATED CODE PAGE 02013
74487
74488 real_4 _pppsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
74489 { // ** body not listed **
74499 }
74500
74501
74502 // VIF THU 20 NOV 2025 22:21:23 ** PPSGF ** PPSGF PAGE 02014
74503
74504 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
74505 // F U U NN N C C T I O O NN N
74506 // F U U N N N C T I O O N N N
74507 // FFFFF U U N N N C T I O O N N N
74508 // F U U N N N C T I O O N N N
74509 // F U U N NN C C T I O O N NN
74510 // F UUUUU N N CCCCC T III OOOOO N N
74511
74512 // PPPPPP PPPPPP SSSSS GGGGG FFFFFFF
74513 // P P P P S S G G F
74514 // P P P P S G F
74515 // PPPPPP PPPPPP SSSSS G GGGG FFFFF
74516 // P P S G G F
74517 // P P S S G G F
74518 // P P SSSSS GGGGG F
74519
74520
74521 // VIF THU 20 NOV 2025 22:21:23 ** PPSGF ** DIAGNOSTICS PAGE 02015
74522
74523
74524 // VIF THU 20 NOV 2025 22:21:23 ** PPSGF ** GENERATED CODE PAGE 02016
74525
74526 real_4 _ppsgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
74527 { // ** body not listed **
74538 }
74539
74540
74541 // VIF THU 20 NOV 2025 22:21:23 ** PPSPF ** PPSPF PAGE 02017
74542
74543 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
74544 // F U U NN N C C T I O O NN N
74545 // F U U N N N C T I O O N N N
74546 // FFFFF U U N N N C T I O O N N N
74547 // F U U N N N C T I O O N N N
74548 // F U U N NN C C T I O O N NN
74549 // F UUUUU N N CCCCC T III OOOOO N N
74550
74551 // PPPPPP PPPPPP SSSSS PPPPPP FFFFFFF
74552 // P P P P S S P P F
74553 // P P P P S P P F
74554 // PPPPPP PPPPPP SSSSS PPPPPP FFFFF
74555 // P P S P F
74556 // P P S S P F
74557 // P P SSSSS P F
74558
74559
74560 // VIF THU 20 NOV 2025 22:21:23 ** PPSPF ** DIAGNOSTICS PAGE 02018
74561
74562
74563 // VIF THU 20 NOV 2025 22:21:23 ** PPSPF ** GENERATED CODE PAGE 02019
74564
74565 real_4 _ppspf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
74566 { // ** body not listed **
74576 }
74577
74578
74579 // VIF THU 20 NOV 2025 22:21:23 ** PROC ** PROC PAGE 02020
74580
74581 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
74582 // S S U U B B R R O O U U T I NN N E
74583 // S U U B B R R O O U U T I N N N E
74584 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
74585 // S U U B B R R O O U U T I N N N E
74586 // S S U U B B R R O O U U T I N NN E
74587 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
74588
74589 // PPPPPP RRRRRR OOOOO CCCCC
74590 // P P R R O O C C
74591 // P P R R O O C
74592 // PPPPPP RRRRRR O O C
74593 // P R R O O C
74594 // P R R O O C C
74595 // P R R OOOOO CCCCC
74596
74597
74598 // VIF THU 20 NOV 2025 22:21:23 ** PROC ** DIAGNOSTICS PAGE 02021
74599
74600
74601 // VIF THU 20 NOV 2025 22:21:23 ** PROC ** GENERATED CODE PAGE 02022
74602
74603 int_4 _proc (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4 _p_
74604 na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_, complex_8
74605 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_)
74606 { // ** body not listed **
74786 }
74787
74788 // VIF THU 20 NOV 2025 22:21:23 ** PROCP ** PROCP PAGE 02026
74789
74790 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
74791 // S S U U B B R R O O U U T I NN N E
74792 // S U U B B R R O O U U T I N N N E
74793 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
74794 // S U U B B R R O O U U T I N N N E
74795 // S S U U B B R R O O U U T I N NN E
74796 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
74797
74798 // PPPPPP RRRRRR OOOOO CCCCC PPPPPP
74799 // P P R R O O C C P P
74800 // P P R R O O C P P
74801 // PPPPPP RRRRRR O O C PPPPPP
74802 // P R R O O C P
74803 // P R R O O C C P
74804 // P R R OOOOO CCCCC P
74805
74806
74807 // VIF THU 20 NOV 2025 22:21:23 ** PROCP ** DIAGNOSTICS PAGE 02027
74808
74809
74810 // VIF THU 20 NOV 2025 22:21:23 ** PROCP ** GENERATED CODE PAGE 02028
74811
74812 int_4 _procp (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
74813 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
74814 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_)
74815 { // ** body not listed **
75026 }
75027
75028 // VIF THU 20 NOV 2025 22:21:23 ** PROD ** PROD PAGE 02033
75029
75030 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
75031 // S S U U B B R R O O U U T I NN N E
75032 // S U U B B R R O O U U T I N N N E
75033 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
75034 // S U U B B R R O O U U T I N N N E
75035 // S S U U B B R R O O U U T I N NN E
75036 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
75037
75038 // PPPPPP RRRRRR OOOOO DDDDDD
75039 // P P R R O O D D
75040 // P P R R O O D D
75041 // PPPPPP RRRRRR O O D D
75042 // P R R O O D D
75043 // P R R O O D D
75044 // P R R OOOOO DDDDDD
75045
75046
75047 // VIF THU 20 NOV 2025 22:21:23 ** PROD ** DIAGNOSTICS PAGE 02034
75048
75049
75050 // VIF THU 20 NOV 2025 22:21:23 ** PROD ** GENERATED CODE PAGE 02035
75051
75052 int_4 _prod (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4 _p_
75053 na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4
75054 _p_ d_, real_4 _p_ w_, real_4 _p_ u_)
75055 { // ** body not listed **
75234 }
75235
75236 // VIF THU 20 NOV 2025 22:21:23 ** PRODP ** PRODP PAGE 02039
75237
75238 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
75239 // S S U U B B R R O O U U T I NN N E
75240 // S U U B B R R O O U U T I N N N E
75241 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
75242 // S U U B B R R O O U U T I N N N E
75243 // S S U U B B R R O O U U T I N NN E
75244 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
75245
75246 // PPPPPP RRRRRR OOOOO DDDDDD PPPPPP
75247 // P P R R O O D D P P
75248 // P P R R O O D D P P
75249 // PPPPPP RRRRRR O O D D PPPPPP
75250 // P R R O O D D P
75251 // P R R O O D D P
75252 // P R R OOOOO DDDDDD P
75253
75254
75255 // VIF THU 20 NOV 2025 22:21:23 ** PRODP ** DIAGNOSTICS PAGE 02040
75256
75257
75258 // VIF THU 20 NOV 2025 22:21:23 ** PRODP ** GENERATED CODE PAGE 02041
75259
75260 int_4 _prodp (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
75261 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_,
75262 real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_)
75263 { // ** body not listed **
75473 }
75474
75475 // VIF THU 20 NOV 2025 22:21:23 ** PRVEC ** PRVEC PAGE 02046
75476
75477 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
75478 // F U U NN N C C T I O O NN N
75479 // F U U N N N C T I O O N N N
75480 // FFFFF U U N N N C T I O O N N N
75481 // F U U N N N C T I O O N N N
75482 // F U U N NN C C T I O O N NN
75483 // F UUUUU N N CCCCC T III OOOOO N N
75484
75485 // PPPPPP RRRRRR V V EEEEEEE CCCCC
75486 // P P R R V V E C C
75487 // P P R R V V E C
75488 // PPPPPP RRRRRR V V EEEEE C
75489 // P R R V V E C
75490 // P R R V V E C C
75491 // P R R V EEEEEEE CCCCC
75492
75493
75494 // VIF THU 20 NOV 2025 22:21:23 ** PRVEC ** DIAGNOSTICS PAGE 02047
75495
75496
75497 // VIF THU 20 NOV 2025 22:21:23 ** PRVEC ** GENERATED CODE PAGE 02048
75498
75499 real_4 _prvec (int_4 _p_ m_, real_4 _p_ u_, real_4 _p_ v_)
75500 { // ** body not listed **
75510 }
75511
75512
75513 // VIF THU 20 NOV 2025 22:21:23 ** PRWPGE ** PRWPGE PAGE 02049
75514
75515 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
75516 // S S U U B B R R O O U U T I NN N E
75517 // S U U B B R R O O U U T I N N N E
75518 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
75519 // S U U B B R R O O U U T I N N N E
75520 // S S U U B B R R O O U U T I N NN E
75521 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
75522
75523 // PPPPPP RRRRRR W W PPPPPP GGGGG EEEEEEE
75524 // P P R R W W P P G G E
75525 // P P R R W W P P G E
75526 // PPPPPP RRRRRR W W W PPPPPP G GGGG EEEEE
75527 // P R R W W W P G G E
75528 // P R R W W W P G G E
75529 // P R R WW WW P GGGGG EEEEEEE
75530
75531
75532 // VIF THU 20 NOV 2025 22:21:23 ** PRWPGE ** DIAGNOSTICS PAGE 02050
75533
75534
75535 // VIF THU 20 NOV 2025 22:21:23 ** PRWPGE ** GENERATED CODE PAGE 02051
75536
75537 int_4 _prwpge (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
75538 { // ** body not listed **
75558 }
75559
75560 // VIF THU 20 NOV 2025 22:21:23 ** PRWVIR ** PRWVIR PAGE 02052
75561
75562 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
75563 // S S U U B B R R O O U U T I NN N E
75564 // S U U B B R R O O U U T I N N N E
75565 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
75566 // S U U B B R R O O U U T I N N N E
75567 // S S U U B B R R O O U U T I N NN E
75568 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
75569
75570 // PPPPPP RRRRRR W W V V III RRRRRR
75571 // P P R R W W V V I R R
75572 // P P R R W W V V I R R
75573 // PPPPPP RRRRRR W W W V V I RRRRRR
75574 // P R R W W W V V I R R
75575 // P R R W W W V V I R R
75576 // P R R WW WW V III R R
75577
75578
75579 // VIF THU 20 NOV 2025 22:21:23 ** PRWVIR ** DIAGNOSTICS PAGE 02053
75580
75581
75582 // VIF THU 20 NOV 2025 22:21:23 ** PRWVIR ** GENERATED CODE PAGE 02054
75583
75584 int_4 _prwvir (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
75585 { // ** body not listed **
75632 }
75633
75634 // VIF THU 20 NOV 2025 22:21:23 ** PSGF ** PSGF PAGE 02055
75635
75636 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
75637 // F U U NN N C C T I O O NN N
75638 // F U U N N N C T I O O N N N
75639 // FFFFF U U N N N C T I O O N N N
75640 // F U U N N N C T I O O N N N
75641 // F U U N NN C C T I O O N NN
75642 // F UUUUU N N CCCCC T III OOOOO N N
75643
75644 // PPPPPP SSSSS GGGGG FFFFFFF
75645 // P P S S G G F
75646 // P P S G F
75647 // PPPPPP SSSSS G GGGG FFFFF
75648 // P S G G F
75649 // P S S G G F
75650 // P SSSSS GGGGG F
75651
75652
75653 // VIF THU 20 NOV 2025 22:21:23 ** PSGF ** DIAGNOSTICS PAGE 02056
75654
75655
75656 // VIF THU 20 NOV 2025 22:21:23 ** PSGF ** GENERATED CODE PAGE 02057
75657
75658 real_4 _psgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
75659 { // ** body not listed **
75686 }
75687
75688
75689 // VIF THU 20 NOV 2025 22:21:23 ** PSIFN ** PSIFN PAGE 02058
75690
75691 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
75692 // S S U U B B R R O O U U T I NN N E
75693 // S U U B B R R O O U U T I N N N E
75694 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
75695 // S U U B B R R O O U U T I N N N E
75696 // S S U U B B R R O O U U T I N NN E
75697 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
75698
75699 // PPPPPP SSSSS III FFFFFFF N N
75700 // P P S S I F NN N
75701 // P P S I F N N N
75702 // PPPPPP SSSSS I FFFFF N N N
75703 // P S I F N N N
75704 // P S S I F N NN
75705 // P SSSSS III F N N
75706
75707
75708 // VIF THU 20 NOV 2025 22:21:23 ** PSIFN ** DIAGNOSTICS PAGE 02059
75709
75710
75711 // VIF THU 20 NOV 2025 22:21:23 ** PSIFN ** GENERATED CODE PAGE 02060
75712
75713 int_4 _psifn (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ kode_, int_4 _p_ m_, real_4 _p_ ans_, int_4 _p_ nz_, int_4 _p_
75714 ierr_)
75715 { // ** body not listed **
76165 }
76166
76167 // VIF THU 20 NOV 2025 22:21:23 ** PSIXN ** PSIXN PAGE 02069
76168
76169 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
76170 // F U U NN N C C T I O O NN N
76171 // F U U N N N C T I O O N N N
76172 // FFFFF U U N N N C T I O O N N N
76173 // F U U N N N C T I O O N N N
76174 // F U U N NN C C T I O O N NN
76175 // F UUUUU N N CCCCC T III OOOOO N N
76176
76177 // PPPPPP SSSSS III X X N N
76178 // P P S S I X X NN N
76179 // P P S I X X N N N
76180 // PPPPPP SSSSS I X N N N
76181 // P S I X X N N N
76182 // P S S I X X N NN
76183 // P SSSSS III X X N N
76184
76185
76186 // VIF THU 20 NOV 2025 22:21:23 ** PSIXN ** DIAGNOSTICS PAGE 02070
76187
76188
76189 // VIF THU 20 NOV 2025 22:21:23 ** PSIXN ** GENERATED CODE PAGE 02071
76190
76191 real_4 _psixn (int_4 _p_ n_)
76192 { // ** body not listed **
76924 }
76925
76926
76927 // VIF THU 20 NOV 2025 22:21:23 ** PVALUE ** PVALUE PAGE 02086
76928
76929 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
76930 // S S U U B B R R O O U U T I NN N E
76931 // S U U B B R R O O U U T I N N N E
76932 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
76933 // S U U B B R R O O U U T I N N N E
76934 // S S U U B B R R O O U U T I N NN E
76935 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
76936
76937 // PPPPPP V V A L U U EEEEEEE
76938 // P P V V A A L U U E
76939 // P P V V A A L U U E
76940 // PPPPPP V V A A L U U EEEEE
76941 // P V V AAAAAAA L U U E
76942 // P V V A A L U U E
76943 // P V A A LLLLLLL UUUUU EEEEEEE
76944
76945
76946 // VIF THU 20 NOV 2025 22:21:23 ** PVALUE ** DIAGNOSTICS PAGE 02087
76947
76948
76949 // VIF THU 20 NOV 2025 22:21:23 ** PVALUE ** GENERATED CODE PAGE 02088
76950
76951 int_4 _pvalue (int_4 _p_ l_, int_4 _p_ nder_, real_4 _p_ x_, real_4 _p_ yfit_, real_4 _p_ yp_, real_4 _p_ a_)
76952 { // ** body not listed **
77133 }
77134
77135 // VIF THU 20 NOV 2025 22:21:23 ** PYTHAG ** PYTHAG PAGE 02092
77136
77137 // RRRRRR EEEEEEE A L 4
77138 // R R E A A L * * 4 4
77139 // R R E A A L * * 4 4
77140 // RRRRRR EEEEE A A L ******* 4444444
77141 // R R E AAAAAAA L * * 4
77142 // R R E A A L * * 4
77143 // R R EEEEEEE A A LLLLLLL 4
77144
77145 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
77146 // F U U NN N C C T I O O NN N
77147 // F U U N N N C T I O O N N N
77148 // FFFFF U U N N N C T I O O N N N
77149 // F U U N N N C T I O O N N N
77150 // F U U N NN C C T I O O N NN
77151 // F UUUUU N N CCCCC T III OOOOO N N
77152
77153 // PPPPPP Y Y TTTTTTT H H A GGGGG
77154 // P P Y Y T H H A A G G
77155 // P P Y Y T H H A A G
77156 // PPPPPP Y T HHHHHHH A A G GGGG
77157 // P Y T H H AAAAAAA G G
77158 // P Y T H H A A G G
77159 // P Y T H H A A GGGGG
77160
77161
77162 // VIF THU 20 NOV 2025 22:21:23 ** PYTHAG ** DIAGNOSTICS PAGE 02093
77163
77164
77165 // VIF THU 20 NOV 2025 22:21:23 ** PYTHAG ** GENERATED CODE PAGE 02094
77166
77167 real_4 _pythag (real_4 _p_ a_, real_4 _p_ b_)
77168 { // ** body not listed **
77191 }
77192
77193 // VIF THU 20 NOV 2025 22:21:23 ** RC3JJ ** RC3JJ PAGE 02095
77194
77195 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
77196 // S S U U B B R R O O U U T I NN N E
77197 // S U U B B R R O O U U T I N N N E
77198 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
77199 // S U U B B R R O O U U T I N N N E
77200 // S S U U B B R R O O U U T I N NN E
77201 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
77202
77203 // RRRRRR CCCCC 33333 J J
77204 // R R C C 3 3 J J
77205 // R R C 3 J J
77206 // RRRRRR C 33333 J J
77207 // R R C 3 J J J J
77208 // R R C C 3 3 J J J J
77209 // R R CCCCC 33333 JJJJJ JJJJJ
77210
77211
77212 // VIF THU 20 NOV 2025 22:21:23 ** RC3JJ ** DIAGNOSTICS PAGE 02096
77213
77214
77215 // VIF THU 20 NOV 2025 22:21:23 ** RC3JJ ** GENERATED CODE PAGE 02097
77216
77217 int_4 _rc3jj (real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ m2_, real_4 _p_ m3_, real_4 _p_ l1min_, real_4 _p_ l1max_,
77218 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
77219 { // ** body not listed **
77513 }
77514
77515 // VIF THU 20 NOV 2025 22:21:23 ** RC3JM ** RC3JM PAGE 02103
77516
77517 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
77518 // S S U U B B R R O O U U T I NN N E
77519 // S U U B B R R O O U U T I N N N E
77520 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
77521 // S U U B B R R O O U U T I N N N E
77522 // S S U U B B R R O O U U T I N NN E
77523 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
77524
77525 // RRRRRR CCCCC 33333 J M M
77526 // R R C C 3 3 J MM MM
77527 // R R C 3 J M M M M
77528 // RRRRRR C 33333 J M M M
77529 // R R C 3 J J M M
77530 // R R C C 3 3 J J M M
77531 // R R CCCCC 33333 JJJJJ M M
77532
77533
77534 // VIF THU 20 NOV 2025 22:21:23 ** RC3JM ** DIAGNOSTICS PAGE 02104
77535
77536
77537 // VIF THU 20 NOV 2025 22:21:23 ** RC3JM ** GENERATED CODE PAGE 02105
77538
77539 int_4 _rc3jm (real_4 _p_ l1_, real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ m1_, real_4 _p_ m2min_, real_4 _p_ m2max_,
77540 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
77541 { // ** body not listed **
77826 }
77827
77828 // VIF THU 20 NOV 2025 22:21:23 ** RC6J ** RC6J PAGE 02111
77829
77830 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
77831 // S S U U B B R R O O U U T I NN N E
77832 // S U U B B R R O O U U T I N N N E
77833 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
77834 // S U U B B R R O O U U T I N N N E
77835 // S S U U B B R R O O U U T I N NN E
77836 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
77837
77838 // RRRRRR CCCCC 66666 J
77839 // R R C C 6 6 J
77840 // R R C 6 J
77841 // RRRRRR C 666666 J
77842 // R R C 6 6 J J
77843 // R R C C 6 6 J J
77844 // R R CCCCC 66666 JJJJJ
77845
77846
77847 // VIF THU 20 NOV 2025 22:21:23 ** RC6J ** DIAGNOSTICS PAGE 02112
77848
77849
77850 // VIF THU 20 NOV 2025 22:21:23 ** RC6J ** GENERATED CODE PAGE 02113
77851
77852 int_4 _rc6j (real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ l4_, real_4 _p_ l5_, real_4 _p_ l6_, real_4 _p_ l1min_, real_4
77853 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
77854 { // ** body not listed **
78165 }
78166
78167 // VIF THU 20 NOV 2025 22:21:23 ** RC ** RC PAGE 02120
78168
78169 // RRRRRR EEEEEEE A L 4
78170 // R R E A A L * * 4 4
78171 // R R E A A L * * 4 4
78172 // RRRRRR EEEEE A A L ******* 4444444
78173 // R R E AAAAAAA L * * 4
78174 // R R E A A L * * 4
78175 // R R EEEEEEE A A LLLLLLL 4
78176
78177 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
78178 // F U U NN N C C T I O O NN N
78179 // F U U N N N C T I O O N N N
78180 // FFFFF U U N N N C T I O O N N N
78181 // F U U N N N C T I O O N N N
78182 // F U U N NN C C T I O O N NN
78183 // F UUUUU N N CCCCC T III OOOOO N N
78184
78185 // RRRRRR CCCCC
78186 // R R C C
78187 // R R C
78188 // RRRRRR C
78189 // R R C
78190 // R R C C
78191 // R R CCCCC
78192
78193
78194 // VIF THU 20 NOV 2025 22:21:23 ** RC ** DIAGNOSTICS PAGE 02121
78195
78196
78197 // VIF THU 20 NOV 2025 22:21:23 ** RC ** GENERATED CODE PAGE 02122
78198
78199 real_4 _rc (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ ier_)
78200 { // ** body not listed **
78596 }
78597
78598 // VIF THU 20 NOV 2025 22:21:23 ** RD ** RD PAGE 02130
78599
78600 // RRRRRR EEEEEEE A L 4
78601 // R R E A A L * * 4 4
78602 // R R E A A L * * 4 4
78603 // RRRRRR EEEEE A A L ******* 4444444
78604 // R R E AAAAAAA L * * 4
78605 // R R E A A L * * 4
78606 // R R EEEEEEE A A LLLLLLL 4
78607
78608 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
78609 // F U U NN N C C T I O O NN N
78610 // F U U N N N C T I O O N N N
78611 // FFFFF U U N N N C T I O O N N N
78612 // F U U N N N C T I O O N N N
78613 // F U U N NN C C T I O O N NN
78614 // F UUUUU N N CCCCC T III OOOOO N N
78615
78616 // RRRRRR DDDDDD
78617 // R R D D
78618 // R R D D
78619 // RRRRRR D D
78620 // R R D D
78621 // R R D D
78622 // R R DDDDDD
78623
78624
78625 // VIF THU 20 NOV 2025 22:21:23 ** RD ** DIAGNOSTICS PAGE 02131
78626
78627
78628 // VIF THU 20 NOV 2025 22:21:23 ** RD ** GENERATED CODE PAGE 02132
78629
78630 real_4 _rd (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
78631 { // ** body not listed **
79137 }
79138
79139 // VIF THU 20 NOV 2025 22:21:23 ** REORT ** REORT PAGE 02142
79140
79141 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
79142 // S S U U B B R R O O U U T I NN N E
79143 // S U U B B R R O O U U T I N N N E
79144 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
79145 // S U U B B R R O O U U T I N N N E
79146 // S S U U B B R R O O U U T I N NN E
79147 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
79148
79149 // RRRRRR EEEEEEE OOOOO RRRRRR TTTTTTT
79150 // R R E O O R R T
79151 // R R E O O R R T
79152 // RRRRRR EEEEE O O RRRRRR T
79153 // R R E O O R R T
79154 // R R E O O R R T
79155 // R R EEEEEEE OOOOO R R T
79156
79157
79158 // VIF THU 20 NOV 2025 22:21:23 ** REORT ** DIAGNOSTICS PAGE 02143
79159
79160
79161 // VIF THU 20 NOV 2025 22:21:23 ** REORT ** GENERATED CODE PAGE 02144
79162
79163 int_4 _reort (int_4 _p_ ncomp_, real_4 _p_ y_, real_4 _p_ yp_, real_4 _p_ yhp_, int_4 _p_ niv_, real_4 _p_ w_, real_4
79164 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_)
79165 { // ** body not listed **
79299 }
79300
79301 // VIF THU 20 NOV 2025 22:21:23 ** RF ** RF PAGE 02147
79302
79303 // RRRRRR EEEEEEE A L 4
79304 // R R E A A L * * 4 4
79305 // R R E A A L * * 4 4
79306 // RRRRRR EEEEE A A L ******* 4444444
79307 // R R E AAAAAAA L * * 4
79308 // R R E A A L * * 4
79309 // R R EEEEEEE A A LLLLLLL 4
79310
79311 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
79312 // F U U NN N C C T I O O NN N
79313 // F U U N N N C T I O O N N N
79314 // FFFFF U U N N N C T I O O N N N
79315 // F U U N N N C T I O O N N N
79316 // F U U N NN C C T I O O N NN
79317 // F UUUUU N N CCCCC T III OOOOO N N
79318
79319 // RRRRRR FFFFFFF
79320 // R R F
79321 // R R F
79322 // RRRRRR FFFFF
79323 // R R F
79324 // R R F
79325 // R R F
79326
79327
79328 // VIF THU 20 NOV 2025 22:21:23 ** RF ** DIAGNOSTICS PAGE 02148
79329
79330
79331 // VIF THU 20 NOV 2025 22:21:23 ** RF ** GENERATED CODE PAGE 02149
79332
79333 real_4 _rf (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
79334 { // ** body not listed **
79870 }
79871
79872 // VIF THU 20 NOV 2025 22:21:23 ** RJ ** RJ PAGE 02160
79873
79874 // RRRRRR EEEEEEE A L 4
79875 // R R E A A L * * 4 4
79876 // R R E A A L * * 4 4
79877 // RRRRRR EEEEE A A L ******* 4444444
79878 // R R E AAAAAAA L * * 4
79879 // R R E A A L * * 4
79880 // R R EEEEEEE A A LLLLLLL 4
79881
79882 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
79883 // F U U NN N C C T I O O NN N
79884 // F U U N N N C T I O O N N N
79885 // FFFFF U U N N N C T I O O N N N
79886 // F U U N N N C T I O O N N N
79887 // F U U N NN C C T I O O N NN
79888 // F UUUUU N N CCCCC T III OOOOO N N
79889
79890 // RRRRRR J
79891 // R R J
79892 // R R J
79893 // RRRRRR J
79894 // R R J J
79895 // R R J J
79896 // R R JJJJJ
79897
79898
79899 // VIF THU 20 NOV 2025 22:21:23 ** RJ ** DIAGNOSTICS PAGE 02161
79900
79901
79902 // VIF THU 20 NOV 2025 22:21:23 ** RJ ** GENERATED CODE PAGE 02162
79903
79904 real_4 _rj (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, real_4 _p_ p_, int_4 _p_ ier_)
79905 { // ** body not listed **
80539 }
80540
80541 // VIF THU 20 NOV 2025 22:21:23 ** RPQR79 ** RPQR79 PAGE 02175
80542
80543 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
80544 // S S U U B B R R O O U U T I NN N E
80545 // S U U B B R R O O U U T I N N N E
80546 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
80547 // S U U B B R R O O U U T I N N N E
80548 // S S U U B B R R O O U U T I N NN E
80549 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
80550
80551 // RRRRRR PPPPPP QQQQQ RRRRRR 7777777 99999
80552 // R R P P Q Q R R 7 7 9 9
80553 // R R P P Q Q R R 7 9 9
80554 // RRRRRR PPPPPP Q Q RRRRRR 7 999999
80555 // R R P Q Q Q R R 7 9
80556 // R R P Q Q R R 7 9 9
80557 // R R P QQQQ Q R R 7 99999
80558
80559
80560 // VIF THU 20 NOV 2025 22:21:23 ** RPQR79 ** DIAGNOSTICS PAGE 02176
80561
80562
80563 // VIF THU 20 NOV 2025 22:21:23 ** RPQR79 ** GENERATED CODE PAGE 02177
80564
80565 int_4 _rpqr79 (int_4 _p_ ndeg_, real_4 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
80566 { // ** body not listed **
80613 }
80614
80615 // VIF THU 20 NOV 2025 22:21:23 ** RPZERO ** RPZERO PAGE 02178
80616
80617 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
80618 // S S U U B B R R O O U U T I NN N E
80619 // S U U B B R R O O U U T I N N N E
80620 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
80621 // S U U B B R R O O U U T I N N N E
80622 // S S U U B B R R O O U U T I N NN E
80623 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
80624
80625 // RRRRRR PPPPPP ZZZZZZZ EEEEEEE RRRRRR OOOOO
80626 // R R P P Z E R R O O
80627 // R R P P Z E R R O O
80628 // RRRRRR PPPPPP Z EEEEE RRRRRR O O
80629 // R R P Z E R R O O
80630 // R R P * E R R O O
80631 // R R P ZZZZZZZ EEEEEEE R R OOOOO
80632
80633
80634 // VIF THU 20 NOV 2025 22:21:23 ** RPZERO ** DIAGNOSTICS PAGE 02179
80635
80636
80637 // VIF THU 20 NOV 2025 22:21:23 ** RPZERO ** GENERATED CODE PAGE 02180
80638
80639 int_4 _rpzero (int_4 _p_ n_, real_4 _p_ a_, complex_8 _p_ r_, complex_8 _p_ t_, int_4 _p_ iflg_, real_4 _p_ s_)
80640 { // ** body not listed **
80649 }
80650
80651 // VIF THU 20 NOV 2025 22:21:23 ** S1MERG ** S1MERG PAGE 02181
80652
80653 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
80654 // S S U U B B R R O O U U T I NN N E
80655 // S U U B B R R O O U U T I N N N E
80656 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
80657 // S U U B B R R O O U U T I N N N E
80658 // S S U U B B R R O O U U T I N NN E
80659 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
80660
80661 // SSSSS 1 M M EEEEEEE RRRRRR GGGGG
80662 // S S 11 MM MM E R R G G
80663 // S 1 1 M M M M E R R G
80664 // SSSSS 1 M M M EEEEE RRRRRR G GGGG
80665 // S 1 M M E R R G G
80666 // S S 1 M M E R R G G
80667 // SSSSS 11111 M M EEEEEEE R R GGGGG
80668
80669
80670 // VIF THU 20 NOV 2025 22:21:23 ** S1MERG ** DIAGNOSTICS PAGE 02182
80671
80672
80673 // VIF THU 20 NOV 2025 22:21:23 ** S1MERG ** GENERATED CODE PAGE 02183
80674
80675 int_4 _s1merg (real_4 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
80676 { // ** body not listed **
80715 }
80716
80717 // VIF THU 20 NOV 2025 22:21:23 ** SBOCLS ** SBOCLS PAGE 02184
80718
80719 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
80720 // S S U U B B R R O O U U T I NN N E
80721 // S U U B B R R O O U U T I N N N E
80722 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
80723 // S U U B B R R O O U U T I N N N E
80724 // S S U U B B R R O O U U T I N NN E
80725 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
80726
80727 // SSSSS BBBBBB OOOOO CCCCC L SSSSS
80728 // S S B B O O C C L S S
80729 // S B B O O C L S
80730 // SSSSS BBBBBB O O C L SSSSS
80731 // S B B O O C L S
80732 // S S B B O O C C L S S
80733 // SSSSS BBBBBB OOOOO CCCCC LLLLLLL SSSSS
80734
80735
80736 // VIF THU 20 NOV 2025 22:21:23 ** SBOCLS ** DIAGNOSTICS PAGE 02185
80737
80738
80739 // VIF THU 20 NOV 2025 22:21:23 ** SBOCLS ** GENERATED CODE PAGE 02186
80740
80741 int_4 _sbocls (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mcon_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_4 _p_ bl_,
80742 real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnormc_, real_4 _p_ rnorm_, int_4 _p_ mode_,
80743 real_4 _p_ rw_, int_4 _p_ iw_)
80744 { // ** body not listed **
82361 }
82362
82363 // VIF THU 20 NOV 2025 22:21:23 ** SBOLS ** SBOLS PAGE 02218
82364
82365 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
82366 // S S U U B B R R O O U U T I NN N E
82367 // S U U B B R R O O U U T I N N N E
82368 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
82369 // S U U B B R R O O U U T I N N N E
82370 // S S U U B B R R O O U U T I N NN E
82371 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
82372
82373 // SSSSS BBBBBB OOOOO L SSSSS
82374 // S S B B O O L S S
82375 // S B B O O L S
82376 // SSSSS BBBBBB O O L SSSSS
82377 // S B B O O L S
82378 // S S B B O O L S S
82379 // SSSSS BBBBBB OOOOO LLLLLLL SSSSS
82380
82381
82382 // VIF THU 20 NOV 2025 22:21:23 ** SBOLS ** DIAGNOSTICS PAGE 02219
82383
82384
82385 // VIF THU 20 NOV 2025 22:21:23 ** SBOLS ** GENERATED CODE PAGE 02220
82386
82387 int_4 _sbols (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_4 _p_ bl_, real_4 _p_ bu_, int_4
82388 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, int_4 _p_ iw_)
82389 { // ** body not listed **
83805 }
83806
83807 // VIF THU 20 NOV 2025 22:21:23 ** SBOLSM ** SBOLSM PAGE 02248
83808
83809 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
83810 // S S U U B B R R O O U U T I NN N E
83811 // S U U B B R R O O U U T I N N N E
83812 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
83813 // S U U B B R R O O U U T I N N N E
83814 // S S U U B B R R O O U U T I N NN E
83815 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
83816
83817 // SSSSS BBBBBB OOOOO L SSSSS M M
83818 // S S B B O O L S S MM MM
83819 // S B B O O L S M M M M
83820 // SSSSS BBBBBB O O L SSSSS M M M
83821 // S B B O O L S M M
83822 // S S B B O O L S S M M
83823 // SSSSS BBBBBB OOOOO LLLLLLL SSSSS M M
83824
83825
83826 // VIF THU 20 NOV 2025 22:21:23 ** SBOLSM ** DIAGNOSTICS PAGE 02249
83827
83828
83829 // VIF THU 20 NOV 2025 22:21:23 ** SBOLSM ** GENERATED CODE PAGE 02250
83830
83831 int_4 _sbolsm (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ minput_, int_4 _p_ ncols_, real_4 _p_ bl_, real_4 _p_ bu_,
83832 int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, real_4 _p_ ww_,
83833 real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
83834 { // ** body not listed **
85648 }
85649 // VIF THU 20 NOV 2025 22:21:23 ** SBOLSM ** GENERATED CODE PAGE 02285
85650
85651
85652 // VIF THU 20 NOV 2025 22:21:23 ** SCLOSM ** SCLOSM PAGE 02286
85653
85654 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
85655 // S S U U B B R R O O U U T I NN N E
85656 // S U U B B R R O O U U T I N N N E
85657 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
85658 // S U U B B R R O O U U T I N N N E
85659 // S S U U B B R R O O U U T I N NN E
85660 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
85661
85662 // SSSSS CCCCC L OOOOO SSSSS M M
85663 // S S C C L O O S S MM MM
85664 // S C L O O S M M M M
85665 // SSSSS C L O O SSSSS M M M
85666 // S C L O O S M M
85667 // S S C C L O O S S M M
85668 // SSSSS CCCCC LLLLLLL OOOOO SSSSS M M
85669
85670
85671 // VIF THU 20 NOV 2025 22:21:23 ** SCLOSM ** DIAGNOSTICS PAGE 02287
85672
85673
85674 // VIF THU 20 NOV 2025 22:21:23 ** SCLOSM ** GENERATED CODE PAGE 02288
85675
85676 int_4 _sclosm (int_4 _p_ ipage_)
85677 { // ** body not listed **
85738 }
85739
85740 // VIF THU 20 NOV 2025 22:21:23 ** SCOEF ** SCOEF PAGE 02290
85741
85742 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
85743 // S S U U B B R R O O U U T I NN N E
85744 // S U U B B R R O O U U T I N N N E
85745 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
85746 // S U U B B R R O O U U T I N N N E
85747 // S S U U B B R R O O U U T I N NN E
85748 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
85749
85750 // SSSSS CCCCC OOOOO EEEEEEE FFFFFFF
85751 // S S C C O O E F
85752 // S C O O E F
85753 // SSSSS C O O EEEEE FFFFF
85754 // S C O O E F
85755 // S S C C O O E F
85756 // SSSSS CCCCC OOOOO EEEEEEE F
85757
85758
85759 // VIF THU 20 NOV 2025 22:21:23 ** SCOEF ** DIAGNOSTICS PAGE 02291
85760
85761
85762 // VIF THU 20 NOV 2025 22:21:23 ** SCOEF ** GENERATED CODE PAGE 02292
85763
85764 int_4 _scoef (real_4 _p_ yh_, real_4 _p_ yp_, int_4 _p_ ncomp_, int_4 _p_ nrowb_, int_4 _p_ nfc_, int_4 _p_ nic_,
85765 real_4 _p_ b_, real_4 _p_ beta_, real_4 _p_ coef_, int_4 _p_ inhomo_, real_4 _p_ re_, real_4 _p_ ae_, real_4 _p_ by_,
85766 real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
85767 { // ** body not listed **
85902 }
85903
85904 // VIF THU 20 NOV 2025 22:21:23 ** SCOV ** SCOV PAGE 02295
85905
85906 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
85907 // S S U U B B R R O O U U T I NN N E
85908 // S U U B B R R O O U U T I N N N E
85909 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
85910 // S U U B B R R O O U U T I N N N E
85911 // S S U U B B R R O O U U T I N NN E
85912 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
85913
85914 // SSSSS CCCCC OOOOO V V
85915 // S S C C O O V V
85916 // S C O O V V
85917 // SSSSS C O O V V
85918 // S C O O V V
85919 // S S C C O O V V
85920 // SSSSS CCCCC OOOOO V
85921
85922
85923 // VIF THU 20 NOV 2025 22:21:23 ** SCOV ** DIAGNOSTICS PAGE 02296
85924
85925
85926 // VIF THU 20 NOV 2025 22:21:23 ** SCOV ** GENERATED CODE PAGE 02297
85927
85928 int_4 _scov (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4 _p_
85929 r_, int_4 _p_ ldr_, int_4 _p_ info_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
85930 { // ** body not listed **
86076 }
86077
86078 // VIF THU 20 NOV 2025 22:21:23 ** SGEEV ** SGEEV PAGE 02300
86079
86080 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
86081 // S S U U B B R R O O U U T I NN N E
86082 // S U U B B R R O O U U T I N N N E
86083 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
86084 // S U U B B R R O O U U T I N N N E
86085 // S S U U B B R R O O U U T I N NN E
86086 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
86087
86088 // SSSSS GGGGG EEEEEEE EEEEEEE V V
86089 // S S G G E E V V
86090 // S G E E V V
86091 // SSSSS G GGGG EEEEE EEEEE V V
86092 // S G G E E V V
86093 // S S G G E E V V
86094 // SSSSS GGGGG EEEEEEE EEEEEEE V
86095
86096
86097 // VIF THU 20 NOV 2025 22:21:23 ** SGEEV ** DIAGNOSTICS PAGE 02301
86098
86099
86100 // VIF THU 20 NOV 2025 22:21:23 ** SGEEV ** GENERATED CODE PAGE 02302
86101
86102 int_4 _sgeev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_, real_4 _p_
86103 work_, int_4 _p_ job_, int_4 _p_ info_)
86104 { // ** body not listed **
86211 }
86212
86213 // VIF THU 20 NOV 2025 22:21:23 ** SGEFS ** SGEFS PAGE 02305
86214
86215 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
86216 // S S U U B B R R O O U U T I NN N E
86217 // S U U B B R R O O U U T I N N N E
86218 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
86219 // S U U B B R R O O U U T I N N N E
86220 // S S U U B B R R O O U U T I N NN E
86221 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
86222
86223 // SSSSS GGGGG EEEEEEE FFFFFFF SSSSS
86224 // S S G G E F S S
86225 // S G E F S
86226 // SSSSS G GGGG EEEEE FFFFF SSSSS
86227 // S G G E F S
86228 // S S G G E F S S
86229 // SSSSS GGGGG EEEEEEE F SSSSS
86230
86231
86232 // VIF THU 20 NOV 2025 22:21:23 ** SGEFS ** DIAGNOSTICS PAGE 02306
86233
86234
86235 // VIF THU 20 NOV 2025 22:21:23 ** SGEFS ** GENERATED CODE PAGE 02307
86236
86237 int_4 _sgefs (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
86238 work_, int_4 _p_ iwork_)
86239 { // ** body not listed **
86440 }
86441
86442 // VIF THU 20 NOV 2025 22:21:23 ** SGEIR ** SGEIR PAGE 02311
86443
86444 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
86445 // S S U U B B R R O O U U T I NN N E
86446 // S U U B B R R O O U U T I N N N E
86447 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
86448 // S U U B B R R O O U U T I N N N E
86449 // S S U U B B R R O O U U T I N NN E
86450 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
86451
86452 // SSSSS GGGGG EEEEEEE III RRRRRR
86453 // S S G G E I R R
86454 // S G E I R R
86455 // SSSSS G GGGG EEEEE I RRRRRR
86456 // S G G E I R R
86457 // S S G G E I R R
86458 // SSSSS GGGGG EEEEEEE III R R
86459
86460
86461 // VIF THU 20 NOV 2025 22:21:23 ** SGEIR ** DIAGNOSTICS PAGE 02312
86462
86463
86464 // VIF THU 20 NOV 2025 22:21:23 ** SGEIR ** GENERATED CODE PAGE 02313
86465
86466 int_4 _sgeir (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
86467 work_, int_4 _p_ iwork_)
86468 { // ** body not listed **
86690 }
86691
86692 // VIF THU 20 NOV 2025 22:21:23 ** SGLSS ** SGLSS PAGE 02318
86693
86694 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
86695 // S S U U B B R R O O U U T I NN N E
86696 // S U U B B R R O O U U T I N N N E
86697 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
86698 // S U U B B R R O O U U T I N N N E
86699 // S S U U B B R R O O U U T I N NN E
86700 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
86701
86702 // SSSSS GGGGG L SSSSS SSSSS
86703 // S S G G L S S S S
86704 // S G L S S
86705 // SSSSS G GGGG L SSSSS SSSSS
86706 // S G G L S S
86707 // S S G G L S S S S
86708 // SSSSS GGGGG LLLLLLL SSSSS SSSSS
86709
86710
86711 // VIF THU 20 NOV 2025 22:21:23 ** SGLSS ** DIAGNOSTICS PAGE 02319
86712
86713
86714 // VIF THU 20 NOV 2025 22:21:23 ** SGLSS ** GENERATED CODE PAGE 02320
86715
86716 int_4 _sglss (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
86717 real_4 _p_ rnorm_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
86718 { // ** body not listed **
86746 }
86747
86748 // VIF THU 20 NOV 2025 22:21:23 ** SNBCO ** SNBCO PAGE 02321
86749
86750 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
86751 // S S U U B B R R O O U U T I NN N E
86752 // S U U B B R R O O U U T I N N N E
86753 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
86754 // S U U B B R R O O U U T I N N N E
86755 // S S U U B B R R O O U U T I N NN E
86756 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
86757
86758 // SSSSS N N BBBBBB CCCCC OOOOO
86759 // S S NN N B B C C O O
86760 // S N N N B B C O O
86761 // SSSSS N N N BBBBBB C O O
86762 // S N N N B B C O O
86763 // S S N NN B B C C O O
86764 // SSSSS N N BBBBBB CCCCC OOOOO
86765
86766
86767 // VIF THU 20 NOV 2025 22:21:23 ** SNBCO ** DIAGNOSTICS PAGE 02322
86768
86769
86770 // VIF THU 20 NOV 2025 22:21:23 ** SNBCO ** GENERATED CODE PAGE 02323
86771
86772 int_4 _snbco (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4 _p_
86773 rcond_, real_4 _p_ z_)
86774 { // ** body not listed **
86929 }
86930
86931 // VIF THU 20 NOV 2025 22:21:23 ** SNBDI ** SNBDI PAGE 02327
86932
86933 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
86934 // S S U U B B R R O O U U T I NN N E
86935 // S U U B B R R O O U U T I N N N E
86936 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
86937 // S U U B B R R O O U U T I N N N E
86938 // S S U U B B R R O O U U T I N NN E
86939 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
86940
86941 // SSSSS N N BBBBBB DDDDDD III
86942 // S S NN N B B D D I
86943 // S N N N B B D D I
86944 // SSSSS N N N BBBBBB D D I
86945 // S N N N B B D D I
86946 // S S N NN B B D D I
86947 // SSSSS N N BBBBBB DDDDDD III
86948
86949
86950 // VIF THU 20 NOV 2025 22:21:23 ** SNBDI ** DIAGNOSTICS PAGE 02328
86951
86952
86953 // VIF THU 20 NOV 2025 22:21:23 ** SNBDI ** GENERATED CODE PAGE 02329
86954
86955 int_4 _snbdi (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4 _p_
86956 det_)
86957 { // ** body not listed **
86991 }
86992
86993 // VIF THU 20 NOV 2025 22:21:23 ** SNBFA ** SNBFA PAGE 02330
86994
86995 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
86996 // S S U U B B R R O O U U T I NN N E
86997 // S U U B B R R O O U U T I N N N E
86998 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
86999 // S U U B B R R O O U U T I N N N E
87000 // S S U U B B R R O O U U T I N NN E
87001 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
87002
87003 // SSSSS N N BBBBBB FFFFFFF A
87004 // S S NN N B B F A A
87005 // S N N N B B F A A
87006 // SSSSS N N N BBBBBB FFFFF A A
87007 // S N N N B B F AAAAAAA
87008 // S S N NN B B F A A
87009 // SSSSS N N BBBBBB F A A
87010
87011
87012 // VIF THU 20 NOV 2025 22:21:23 ** SNBFA ** DIAGNOSTICS PAGE 02331
87013
87014
87015 // VIF THU 20 NOV 2025 22:21:23 ** SNBFA ** GENERATED CODE PAGE 02332
87016
87017 int_4 _snbfa (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, int_4 _p_
87018 info_)
87019 { // ** body not listed **
87076 }
87077
87078 // VIF THU 20 NOV 2025 22:21:23 ** SNBFS ** SNBFS PAGE 02334
87079
87080 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
87081 // S S U U B B R R O O U U T I NN N E
87082 // S U U B B R R O O U U T I N N N E
87083 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
87084 // S U U B B R R O O U U T I N N N E
87085 // S S U U B B R R O O U U T I N NN E
87086 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
87087
87088 // SSSSS N N BBBBBB FFFFFFF SSSSS
87089 // S S NN N B B F S S
87090 // S N N N B B F S
87091 // SSSSS N N N BBBBBB FFFFF SSSSS
87092 // S N N N B B F S
87093 // S S N NN B B F S S
87094 // SSSSS N N BBBBBB F SSSSS
87095
87096
87097 // VIF THU 20 NOV 2025 22:21:23 ** SNBFS ** DIAGNOSTICS PAGE 02335
87098
87099
87100 // VIF THU 20 NOV 2025 22:21:23 ** SNBFS ** GENERATED CODE PAGE 02336
87101
87102 int_4 _snbfs (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ v_, int_4 _p_
87103 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
87104 { // ** body not listed **
87397 }
87398
87399 // VIF THU 20 NOV 2025 22:21:23 ** SNBIR ** SNBIR PAGE 02342
87400
87401 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
87402 // S S U U B B R R O O U U T I NN N E
87403 // S U U B B R R O O U U T I N N N E
87404 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
87405 // S U U B B R R O O U U T I N N N E
87406 // S S U U B B R R O O U U T I N NN E
87407 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
87408
87409 // SSSSS N N BBBBBB III RRRRRR
87410 // S S NN N B B I R R
87411 // S N N N B B I R R
87412 // SSSSS N N N BBBBBB I RRRRRR
87413 // S N N N B B I R R
87414 // S S N NN B B I R R
87415 // SSSSS N N BBBBBB III R R
87416
87417
87418 // VIF THU 20 NOV 2025 22:21:23 ** SNBIR ** DIAGNOSTICS PAGE 02343
87419
87420
87421 // VIF THU 20 NOV 2025 22:21:23 ** SNBIR ** GENERATED CODE PAGE 02344
87422
87423 int_4 _snbir (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ v_, int_4 _p_
87424 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
87425 { // ** body not listed **
87744 }
87745
87746 // VIF THU 20 NOV 2025 22:21:23 ** SNBSL ** SNBSL PAGE 02351
87747
87748 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
87749 // S S U U B B R R O O U U T I NN N E
87750 // S U U B B R R O O U U T I N N N E
87751 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
87752 // S U U B B R R O O U U T I N N N E
87753 // S S U U B B R R O O U U T I N NN E
87754 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
87755
87756 // SSSSS N N BBBBBB SSSSS L
87757 // S S NN N B B S S L
87758 // S N N N B B S L
87759 // SSSSS N N N BBBBBB SSSSS L
87760 // S N N N B B S L
87761 // S S N NN B B S S L
87762 // SSSSS N N BBBBBB SSSSS LLLLLLL
87763
87764
87765 // VIF THU 20 NOV 2025 22:21:23 ** SNBSL ** DIAGNOSTICS PAGE 02352
87766
87767
87768 // VIF THU 20 NOV 2025 22:21:23 ** SNBSL ** GENERATED CODE PAGE 02353
87769
87770 int_4 _snbsl (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4 _p_
87771 b_, int_4 _p_ job_)
87772 { // ** body not listed **
87844 }
87845
87846 // VIF THU 20 NOV 2025 22:21:23 ** SNLS1E ** SNLS1E PAGE 02355
87847
87848 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
87849 // S S U U B B R R O O U U T I NN N E
87850 // S U U B B R R O O U U T I N N N E
87851 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
87852 // S U U B B R R O O U U T I N N N E
87853 // S S U U B B R R O O U U T I N NN E
87854 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
87855
87856 // SSSSS N N L SSSSS 1 EEEEEEE
87857 // S S NN N L S S 11 E
87858 // S N N N L S 1 1 E
87859 // SSSSS N N N L SSSSS 1 EEEEE
87860 // S N N N L S 1 E
87861 // S S N NN L S S 1 E
87862 // SSSSS N N LLLLLLL SSSSS 11111 EEEEEEE
87863
87864
87865 // VIF THU 20 NOV 2025 22:21:23 ** SNLS1E ** DIAGNOSTICS PAGE 02356
87866
87867
87868 // VIF THU 20 NOV 2025 22:21:23 ** SNLS1E ** GENERATED CODE PAGE 02357
87869
87870 int_4 _snls1e (real_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4
87871 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_)
87872 { // ** body not listed **
87926 }
87927
87928 // VIF THU 20 NOV 2025 22:21:23 ** SNLS1 ** SNLS1 PAGE 02359
87929
87930 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
87931 // S S U U B B R R O O U U T I NN N E
87932 // S U U B B R R O O U U T I N N N E
87933 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
87934 // S U U B B R R O O U U T I N N N E
87935 // S S U U B B R R O O U U T I N NN E
87936 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
87937
87938 // SSSSS N N L SSSSS 1
87939 // S S NN N L S S 11
87940 // S N N N L S 1 1
87941 // SSSSS N N N L SSSSS 1
87942 // S N N N L S 1
87943 // S S N NN L S S 1
87944 // SSSSS N N LLLLLLL SSSSS 11111
87945
87946
87947 // VIF THU 20 NOV 2025 22:21:23 ** SNLS1 ** DIAGNOSTICS PAGE 02360
87948
87949
87950 // VIF THU 20 NOV 2025 22:21:23 ** SNLS1 ** GENERATED CODE PAGE 02361
87951
87952 int_4 _snls1 (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4 _p_
87953 fjac_, int_4 _p_ ldfjac_, real_4 _p_ ftol_, real_4 _p_ xtol_, real_4 _p_ gtol_, int_4 _p_ maxfev_, real_4 _p_ epsfcn_,
87954 real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
87955 njev_, int_4 _p_ ipvt_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
87956 { // ** body not listed **
88564 }
88565
88566 // VIF THU 20 NOV 2025 22:21:23 ** SNSQE ** SNSQE PAGE 02373
88567
88568 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
88569 // S S U U B B R R O O U U T I NN N E
88570 // S U U B B R R O O U U T I N N N E
88571 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
88572 // S U U B B R R O O U U T I N N N E
88573 // S S U U B B R R O O U U T I N NN E
88574 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
88575
88576 // SSSSS N N SSSSS QQQQQ EEEEEEE
88577 // S S NN N S S Q Q E
88578 // S N N N S Q Q E
88579 // SSSSS N N N SSSSS Q Q EEEEE
88580 // S N N N S Q Q Q E
88581 // S S N NN S S Q Q E
88582 // SSSSS N N SSSSS QQQQ Q EEEEEEE
88583
88584
88585 // VIF THU 20 NOV 2025 22:21:23 ** SNSQE ** DIAGNOSTICS PAGE 02374
88586
88587
88588 // VIF THU 20 NOV 2025 22:21:23 ** SNSQE ** GENERATED CODE PAGE 02375
88589
88590 int_4 _snsqe (real_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4
88591 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_)
88592 { // ** body not listed **
88653 }
88654
88655 // VIF THU 20 NOV 2025 22:21:23 ** SNSQ ** SNSQ PAGE 02377
88656
88657 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
88658 // S S U U B B R R O O U U T I NN N E
88659 // S U U B B R R O O U U T I N N N E
88660 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
88661 // S U U B B R R O O U U T I N N N E
88662 // S S U U B B R R O O U U T I N NN E
88663 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
88664
88665 // SSSSS N N SSSSS QQQQQ
88666 // S S NN N S S Q Q
88667 // S N N N S Q Q
88668 // SSSSS N N N SSSSS Q Q
88669 // S N N N S Q Q Q
88670 // S S N NN S S Q Q
88671 // SSSSS N N SSSSS QQQQ Q
88672
88673
88674 // VIF THU 20 NOV 2025 22:21:23 ** SNSQ ** DIAGNOSTICS PAGE 02378
88675
88676
88677 // VIF THU 20 NOV 2025 22:21:23 ** SNSQ ** GENERATED CODE PAGE 02379
88678
88679 int_4 _snsq (int_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4
88680 _p_ fjac_, int_4 _p_ ldfjac_, real_4 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ epsfcn_,
88681 real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
88682 njev_, real_4 _p_ r_, int_4 _p_ lr_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_
88683 wa4_)
88684 { // ** body not listed **
89016 }
89017
89018 // VIF THU 20 NOV 2025 22:21:23 ** SODS ** SODS PAGE 02386
89019
89020 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
89021 // S S U U B B R R O O U U T I NN N E
89022 // S U U B B R R O O U U T I N N N E
89023 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
89024 // S U U B B R R O O U U T I N N N E
89025 // S S U U B B R R O O U U T I N NN E
89026 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
89027
89028 // SSSSS OOOOO DDDDDD SSSSS
89029 // S S O O D D S S
89030 // S O O D D S
89031 // SSSSS O O D D SSSSS
89032 // S O O D D S
89033 // S S O O D D S S
89034 // SSSSS OOOOO DDDDDD SSSSS
89035
89036
89037 // VIF THU 20 NOV 2025 22:21:23 ** SODS ** DIAGNOSTICS PAGE 02387
89038
89039
89040 // VIF THU 20 NOV 2025 22:21:23 ** SODS ** GENERATED CODE PAGE 02388
89041
89042 int_4 _sods (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_, int_4 _p_
89043 iflag_, real_4 _p_ work_, int_4 _p_ iwork_)
89044 { // ** body not listed **
89059 }
89060
89061 // VIF THU 20 NOV 2025 22:21:23 ** SOPENM ** SOPENM PAGE 02389
89062
89063 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
89064 // S S U U B B R R O O U U T I NN N E
89065 // S U U B B R R O O U U T I N N N E
89066 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
89067 // S U U B B R R O O U U T I N N N E
89068 // S S U U B B R R O O U U T I N NN E
89069 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
89070
89071 // SSSSS OOOOO PPPPPP EEEEEEE N N M M
89072 // S S O O P P E NN N MM MM
89073 // S O O P P E N N N M M M M
89074 // SSSSS O O PPPPPP EEEEE N N N M M M
89075 // S O O P E N N N M M
89076 // S S O O P E N NN M M
89077 // SSSSS OOOOO P EEEEEEE N N M M
89078
89079
89080 // VIF THU 20 NOV 2025 22:21:23 ** SOPENM ** DIAGNOSTICS PAGE 02390
89081
89082
89083 // VIF THU 20 NOV 2025 22:21:23 ** SOPENM ** GENERATED CODE PAGE 02391
89084
89085 int_4 _sopenm (int_4 _p_ ipage_, int_4 _p_ lpage_)
89086 { // ** body not listed **
89142 }
89143
89144 // VIF THU 20 NOV 2025 22:21:23 ** SOSEQS ** SOSEQS PAGE 02393
89145
89146 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
89147 // S S U U B B R R O O U U T I NN N E
89148 // S U U B B R R O O U U T I N N N E
89149 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
89150 // S U U B B R R O O U U T I N N N E
89151 // S S U U B B R R O O U U T I N NN E
89152 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
89153
89154 // SSSSS OOOOO SSSSS EEEEEEE QQQQQ SSSSS
89155 // S S O O S S E Q Q S S
89156 // S O O S E Q Q S
89157 // SSSSS O O SSSSS EEEEE Q Q SSSSS
89158 // S O O S E Q Q Q S
89159 // S S O O S S E Q Q S S
89160 // SSSSS OOOOO SSSSS EEEEEEE QQQQ Q SSSSS
89161
89162
89163 // VIF THU 20 NOV 2025 22:21:23 ** SOSEQS ** DIAGNOSTICS PAGE 02394
89164
89165
89166 // VIF THU 20 NOV 2025 22:21:23 ** SOSEQS ** GENERATED CODE PAGE 02395
89167
89168 int_4 _soseqs (real_4 (*_fnc)(), int_4 _p_ n_, real_4 _p_ s_, real_4 _p_ rtolx_, real_4 _p_ atolx_, real_4 _p_ tolf_,
89169 int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_, real_4 _p_
89170 fmax_, real_4 _p_ c_, int_4 _p_ nc_, real_4 _p_ b_, real_4 _p_ p_, real_4 _p_ temp_, real_4 _p_ x_, real_4 _p_ y_,
89171 real_4 _p_ fac_, int_4 _p_ is_)
89172 { // ** body not listed **
89560 }
89561
89562 // VIF THU 20 NOV 2025 22:21:23 ** SOS ** SOS PAGE 02403
89563
89564 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
89565 // S S U U B B R R O O U U T I NN N E
89566 // S U U B B R R O O U U T I N N N E
89567 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
89568 // S U U B B R R O O U U T I N N N E
89569 // S S U U B B R R O O U U T I N NN E
89570 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
89571
89572 // SSSSS OOOOO SSSSS
89573 // S S O O S S
89574 // S O O S
89575 // SSSSS O O SSSSS
89576 // S O O S
89577 // S S O O S S
89578 // SSSSS OOOOO SSSSS
89579
89580
89581 // VIF THU 20 NOV 2025 22:21:23 ** SOS ** DIAGNOSTICS PAGE 02404
89582
89583
89584 // VIF THU 20 NOV 2025 22:21:23 ** SOS ** GENERATED CODE PAGE 02405
89585
89586 int_4 _sos (real_4 (*_fnc)(), int_4 _p_ neq_, real_4 _p_ x_, real_4 _p_ rtolx_, real_4 _p_ atolx_, real_4 _p_ tolf_,
89587 int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
89588 { // ** body not listed **
89935 }
89936
89937 // VIF THU 20 NOV 2025 22:21:23 ** SOSSOL ** SOSSOL PAGE 02412
89938
89939 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
89940 // S S U U B B R R O O U U T I NN N E
89941 // S U U B B R R O O U U T I N N N E
89942 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
89943 // S U U B B R R O O U U T I N N N E
89944 // S S U U B B R R O O U U T I N NN E
89945 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
89946
89947 // SSSSS OOOOO SSSSS SSSSS OOOOO L
89948 // S S O O S S S S O O L
89949 // S O O S S O O L
89950 // SSSSS O O SSSSS SSSSS O O L
89951 // S O O S S O O L
89952 // S S O O S S S S O O L
89953 // SSSSS OOOOO SSSSS SSSSS OOOOO LLLLLLL
89954
89955
89956 // VIF THU 20 NOV 2025 22:21:23 ** SOSSOL ** DIAGNOSTICS PAGE 02413
89957
89958
89959 // VIF THU 20 NOV 2025 22:21:23 ** SOSSOL ** GENERATED CODE PAGE 02414
89960
89961 int_4 _sossol (int_4 _p_ k_, int_4 _p_ n_, int_4 _p_ l_, real_4 _p_ x_, real_4 _p_ c_, real_4 _p_ b_, int_4 _p_ m_)
89962 { // ** body not listed **
89996 }
89997
89998 // VIF THU 20 NOV 2025 22:21:23 ** SPELI4 ** SPELI4 PAGE 02415
89999
90000 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
90001 // S S U U B B R R O O U U T I NN N E
90002 // S U U B B R R O O U U T I N N N E
90003 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
90004 // S U U B B R R O O U U T I N N N E
90005 // S S U U B B R R O O U U T I N NN E
90006 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
90007
90008 // SSSSS PPPPPP EEEEEEE L III 4
90009 // S S P P E L I 4 4
90010 // S P P E L I 4 4
90011 // SSSSS PPPPPP EEEEE L I 4444444
90012 // S P E L I 4
90013 // S S P E L I 4
90014 // SSSSS P EEEEEEE LLLLLLL III 4
90015
90016
90017 // VIF THU 20 NOV 2025 22:21:23 ** SPELI4 ** DIAGNOSTICS PAGE 02416
90018
90019
90020 // VIF THU 20 NOV 2025 22:21:23 ** SPELI4 ** GENERATED CODE PAGE 02417
90021
90022 int_4 _speli4 (int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bda_,
90023 real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_,
90024 real_4 _p_ bdc_, real_4 _p_ bdd_, int_4 (*_cofx)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ dn_,
90025 real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_, real_4
90026 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_)
90027 { // ** body not listed **
90343 }
90344
90345 // VIF THU 20 NOV 2025 22:21:23 ** SPELIP ** SPELIP PAGE 02424
90346
90347 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
90348 // S S U U B B R R O O U U T I NN N E
90349 // S U U B B R R O O U U T I N N N E
90350 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
90351 // S U U B B R R O O U U T I N N N E
90352 // S S U U B B R R O O U U T I N NN E
90353 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
90354
90355 // SSSSS PPPPPP EEEEEEE L III PPPPPP
90356 // S S P P E L I P P
90357 // S P P E L I P P
90358 // SSSSS PPPPPP EEEEE L I PPPPPP
90359 // S P E L I P
90360 // S S P E L I P
90361 // SSSSS P EEEEEEE LLLLLLL III P
90362
90363
90364 // VIF THU 20 NOV 2025 22:21:23 ** SPELIP ** DIAGNOSTICS PAGE 02425
90365
90366
90367 // VIF THU 20 NOV 2025 22:21:23 ** SPELIP ** GENERATED CODE PAGE 02426
90368
90369 int_4 _spelip (int_4 _p_ intl_, int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_,
90370 real_4 _p_ bda_, real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_,
90371 int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ gama_, real_4 _p_ bdd_, real_4 _p_ xnu_, int_4 (*_cofx)(), int_4
90372 (*_cofy)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ dn_, real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_
90373 am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_, real_4 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_
90374 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_)
90375 { // ** body not listed **
90688 }
90689
90690 // VIF THU 20 NOV 2025 22:21:23 ** SPINCW ** SPINCW PAGE 02433
90691
90692 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
90693 // S S U U B B R R O O U U T I NN N E
90694 // S U U B B R R O O U U T I N N N E
90695 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
90696 // S U U B B R R O O U U T I N N N E
90697 // S S U U B B R R O O U U T I N NN E
90698 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
90699
90700 // SSSSS PPPPPP III N N CCCCC W W
90701 // S S P P I NN N C C W W
90702 // S P P I N N N C W W
90703 // SSSSS PPPPPP I N N N C W W W
90704 // S P I N N N C W W W
90705 // S S P I N NN C C W W W
90706 // SSSSS P III N N CCCCC WW WW
90707
90708
90709 // VIF THU 20 NOV 2025 22:21:23 ** SPINCW ** DIAGNOSTICS PAGE 02434
90710
90711
90712 // VIF THU 20 NOV 2025 22:21:23 ** SPINCW ** GENERATED CODE PAGE 02435
90713
90714 int_4 _spincw (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ npp_, int_4 _p_ jstrt_,
90715 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
90716 real_4 _p_ costsc_, real_4 _p_ gg_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
90717 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ costs_, real_4 _p_ colnrm_,
90718 real_4 _p_ duals_, logical_4 _p_ stpedg_)
90719 { // ** body not listed **
90855 }
90856
90857 // VIF THU 20 NOV 2025 22:21:23 ** SPINIT ** SPINIT PAGE 02438
90858
90859 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
90860 // S S U U B B R R O O U U T I NN N E
90861 // S U U B B R R O O U U T I N N N E
90862 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
90863 // S U U B B R R O O U U T I N N N E
90864 // S S U U B B R R O O U U T I N NN E
90865 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
90866
90867 // SSSSS PPPPPP III N N III TTTTTTT
90868 // S S P P I NN N I T
90869 // S P P I N N N I T
90870 // SSSSS PPPPPP I N N N I T
90871 // S P I N N N I T
90872 // S S P I N NN I T
90873 // SSSSS P III N N III T
90874
90875
90876 // VIF THU 20 NOV 2025 22:21:23 ** SPINIT ** DIAGNOSTICS PAGE 02439
90877
90878
90879 // VIF THU 20 NOV 2025 22:21:23 ** SPINIT ** GENERATED CODE PAGE 02440
90880
90881 int_4 _spinit (int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_,
90882 real_4 _p_ primal_, int_4 _p_ info_, real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ costsc_, real_4 _p_ colnrm_, real_4
90883 _p_ xlamda_, real_4 _p_ anorm_, real_4 _p_ rhs_, real_4 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_
90884 , logical_4 _p_ lopt_)
90885 { // ** body not listed **
91167 }
91168
91169 // VIF THU 20 NOV 2025 22:21:23 ** SPLPCE ** SPLPCE PAGE 02446
91170
91171 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
91172 // S S U U B B R R O O U U T I NN N E
91173 // S U U B B R R O O U U T I N N N E
91174 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
91175 // S U U B B R R O O U U T I N N N E
91176 // S S U U B B R R O O U U T I N NN E
91177 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
91178
91179 // SSSSS PPPPPP L PPPPPP CCCCC EEEEEEE
91180 // S S P P L P P C C E
91181 // S P P L P P C E
91182 // SSSSS PPPPPP L PPPPPP C EEEEE
91183 // S P L P C E
91184 // S S P L P C C E
91185 // SSSSS P LLLLLLL P CCCCC EEEEEEE
91186
91187
91188 // VIF THU 20 NOV 2025 22:21:23 ** SPLPCE ** DIAGNOSTICS PAGE 02447
91189
91190
91191 // VIF THU 20 NOV 2025 22:21:23 ** SPLPCE ** GENERATED CODE PAGE 02448
91192
91193 int_4 _splpce (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ itlp_, int_4 _p_ itbrc_,
91194 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
91195 real_4 _p_ erdnrm_, real_4 _p_ eps_, real_4 _p_ tune_, real_4 _p_ gg_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_
91196 csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ primal_, real_4 _p_ erd_, real_4 _p_ erp_, logical_4 _p_ singlr_,
91197 logical_4 _p_ redbas_)
91198 { // ** body not listed **
91396 }
91397
91398 // VIF THU 20 NOV 2025 22:21:23 ** SPLPDM ** SPLPDM PAGE 02452
91399
91400 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
91401 // S S U U B B R R O O U U T I NN N E
91402 // S U U B B R R O O U U T I N N N E
91403 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
91404 // S U U B B R R O O U U T I N N N E
91405 // S S U U B B R R O O U U T I N NN E
91406 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
91407
91408 // SSSSS PPPPPP L PPPPPP DDDDDD M M
91409 // S S P P L P P D D MM MM
91410 // S P P L P P D D M M M M
91411 // SSSSS PPPPPP L PPPPPP D D M M M
91412 // S P L P D D M M
91413 // S S P L P D D M M
91414 // SSSSS P LLLLLLL P DDDDDD M M
91415
91416
91417 // VIF THU 20 NOV 2025 22:21:23 ** SPLPDM ** DIAGNOSTICS PAGE 02453
91418
91419
91420 // VIF THU 20 NOV 2025 22:21:23 ** SPLPDM ** GENERATED CODE PAGE 02454
91421
91422 int_4 _splpdm (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
91423 int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_,
91424 int_4 _p_ ibb_, real_4 _p_ anorm_, real_4 _p_ eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ amat_, real_4 _p_
91425 basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
91426 { // ** body not listed **
91528 }
91529
91530 // VIF THU 20 NOV 2025 22:21:23 ** SPLP ** SPLP PAGE 02457
91531
91532 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
91533 // S S U U B B R R O O U U T I NN N E
91534 // S U U B B R R O O U U T I N N N E
91535 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
91536 // S U U B B R R O O U U T I N N N E
91537 // S S U U B B R R O O U U T I N NN E
91538 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
91539
91540 // SSSSS PPPPPP L PPPPPP
91541 // S S P P L P P
91542 // S P P L P P
91543 // SSSSS PPPPPP L PPPPPP
91544 // S P L P
91545 // S S P L P
91546 // SSSSS P LLLLLLL P
91547
91548
91549 // VIF THU 20 NOV 2025 22:21:23 ** SPLP ** DIAGNOSTICS PAGE 02458
91550
91551
91552 // VIF THU 20 NOV 2025 22:21:23 ** SPLP ** GENERATED CODE PAGE 02459
91553
91554 int_4 _splp (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
91555 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_, real_4 _p_ duals_,
91556 int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
91557 { // ** body not listed **
91873 }
91874
91875 // VIF THU 20 NOV 2025 22:21:23 ** SPLPFE ** SPLPFE PAGE 02466
91876
91877 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
91878 // S S U U B B R R O O U U T I NN N E
91879 // S U U B B R R O O U U T I N N N E
91880 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
91881 // S U U B B R R O O U U T I N N N E
91882 // S S U U B B R R O O U U T I N NN E
91883 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
91884
91885 // SSSSS PPPPPP L PPPPPP FFFFFFF EEEEEEE
91886 // S S P P L P P F E
91887 // S P P L P P F E
91888 // SSSSS PPPPPP L PPPPPP FFFFF EEEEE
91889 // S P L P F E
91890 // S S P L P F E
91891 // SSSSS P LLLLLLL P F EEEEEEE
91892
91893
91894 // VIF THU 20 NOV 2025 22:21:23 ** SPLPFE ** DIAGNOSTICS PAGE 02467
91895
91896
91897 // VIF THU 20 NOV 2025 22:21:23 ** SPLPFE ** GENERATED CODE PAGE 02468
91898
91899 int_4 _splpfe (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ ienter_, int_4 _p_
91900 ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_
91901 erdnrm_, real_4 _p_ eps_, real_4 _p_ gg_, real_4 _p_ dulnrm_, real_4 _p_ dirnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
91902 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ rz_, real_4 _p_ rg_, real_4
91903 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_)
91904 { // ** body not listed **
92056 }
92057
92058 // VIF THU 20 NOV 2025 22:21:23 ** SPLPFL ** SPLPFL PAGE 02472
92059
92060 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
92061 // S S U U B B R R O O U U T I NN N E
92062 // S U U B B R R O O U U T I N N N E
92063 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
92064 // S U U B B R R O O U U T I N N N E
92065 // S S U U B B R R O O U U T I N NN E
92066 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
92067
92068 // SSSSS PPPPPP L PPPPPP FFFFFFF L
92069 // S S P P L P P F L
92070 // S P P L P P F L
92071 // SSSSS PPPPPP L PPPPPP FFFFF L
92072 // S P L P F L
92073 // S S P L P F L
92074 // SSSSS P LLLLLLL P F LLLLLLL
92075
92076
92077 // VIF THU 20 NOV 2025 22:21:23 ** SPLPFL ** DIAGNOSTICS PAGE 02473
92078
92079
92080 // VIF THU 20 NOV 2025 22:21:23 ** SPLPFL ** GENERATED CODE PAGE 02474
92081
92082 int_4 _splpfl (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ ibasis_, int_4 _p_
92083 ind_, int_4 _p_ ibb_, real_4 _p_ theta_, real_4 _p_ dirnrm_, real_4 _p_ rprnrm_, real_4 _p_ csc_, real_4 _p_ ww_,
92084 real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ erp_, real_4 _p_ rprim_, real_4 _p_ primal_, logical_4 _p_ finite_,
92085 logical_4 _p_ zerolv_)
92086 { // ** body not listed **
92242 }
92243
92244 // VIF THU 20 NOV 2025 22:21:23 ** SPLPMN ** SPLPMN PAGE 02478
92245
92246 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
92247 // S S U U B B R R O O U U T I NN N E
92248 // S U U B B R R O O U U T I N N N E
92249 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
92250 // S U U B B R R O O U U T I N N N E
92251 // S S U U B B R R O O U U T I N NN E
92252 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
92253
92254 // SSSSS PPPPPP L PPPPPP M M N N
92255 // S S P P L P P MM MM NN N
92256 // S P P L P P M M M M N N N
92257 // SSSSS PPPPPP L PPPPPP M M M N N N
92258 // S P L P M M N N N
92259 // S S P L P M M N NN
92260 // SSSSS P LLLLLLL P M M N N
92261
92262
92263 // VIF THU 20 NOV 2025 22:21:23 ** SPLPMN ** DIAGNOSTICS PAGE 02479
92264
92265
92266 // VIF THU 20 NOV 2025 22:21:23 ** SPLPMN ** GENERATED CODE PAGE 02480
92267
92268 int_4 _splpmn (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
92269 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_, real_4 _p_ duals_,
92270 real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ colnrm_, real_4 _p_ erd_, real_4 _p_ erp_, real_4 _p_ basmat_, real_4 _p_
92271 wr_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ rprim_, real_4 _p_ rhs_, real_4 _p_ ww_, int_4 _p_ lmx_, int_4 _p_ lbm_
92272 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
92273 { // ** body not listed **
93590 }
93591
93592 // VIF THU 20 NOV 2025 22:21:23 ** SPLPMU ** SPLPMU PAGE 02506
93593
93594 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
93595 // S S U U B B R R O O U U T I NN N E
93596 // S U U B B R R O O U U T I N N N E
93597 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
93598 // S U U B B R R O O U U T I N N N E
93599 // S S U U B B R R O O U U T I N NN E
93600 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
93601
93602 // SSSSS PPPPPP L PPPPPP M M U U
93603 // S S P P L P P MM MM U U
93604 // S P P L P P M M M M U U
93605 // SSSSS PPPPPP L PPPPPP M M M U U
93606 // S P L P M M U U
93607 // S S P L P M M U U
93608 // SSSSS P LLLLLLL P M M UUUUU
93609
93610
93611 // VIF THU 20 NOV 2025 22:21:23 ** SPLPMU ** DIAGNOSTICS PAGE 02507
93612
93613
93614 // VIF THU 20 NOV 2025 22:21:23 ** SPLPMU ** GENERATED CODE PAGE 02508
93615
93616 int_4 _splpmu (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
93617 int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_, int_4 _p_
93618 imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ anorm_, real_4 _p_
93619 eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ rprnrm_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ theta_,
93620 real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_ csc_,
93621 real_4 _p_ wr_, real_4 _p_ rprim_, real_4 _p_ ww_, real_4 _p_ bu_, real_4 _p_ bl_, real_4 _p_ rhs_, real_4 _p_ erd_,
93622 real_4 _p_ erp_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ colnrm_, real_4 _p_ costs_, real_4 _p_ primal_, real_4 _p_
93623 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
93624 { // ** body not listed **
94100 }
94101
94102 // VIF THU 20 NOV 2025 22:21:23 ** SPLPUP ** SPLPUP PAGE 02518
94103
94104 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
94105 // S S U U B B R R O O U U T I NN N E
94106 // S U U B B R R O O U U T I N N N E
94107 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
94108 // S U U B B R R O O U U T I N N N E
94109 // S S U U B B R R O O U U T I N NN E
94110 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
94111
94112 // SSSSS PPPPPP L PPPPPP U U PPPPPP
94113 // S S P P L P P U U P P
94114 // S P P L P P U U P P
94115 // SSSSS PPPPPP L PPPPPP U U PPPPPP
94116 // S P L P U U P
94117 // S S P L P U U P
94118 // SSSSS P LLLLLLL P UUUUU P
94119
94120
94121 // VIF THU 20 NOV 2025 22:21:23 ** SPLPUP ** DIAGNOSTICS PAGE 02519
94122
94123
94124 // VIF THU 20 NOV 2025 22:21:23 ** SPLPUP ** GENERATED CODE PAGE 02520
94125
94126 int_4 _splpup (int_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ prgopt_, real_4 _p_ dattrv_, real_4
94127 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ amat_, int_4 _p_ imat_, logical_4 _p_ sizeup_,
94128 real_4 _p_ asmall_, real_4 _p_ abig_)
94129 { // ** body not listed **
94703 }
94704
94705 // VIF THU 20 NOV 2025 22:21:23 ** SPOFS ** SPOFS PAGE 02532
94706
94707 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
94708 // S S U U B B R R O O U U T I NN N E
94709 // S U U B B R R O O U U T I N N N E
94710 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
94711 // S U U B B R R O O U U T I N N N E
94712 // S S U U B B R R O O U U T I N NN E
94713 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
94714
94715 // SSSSS PPPPPP OOOOO FFFFFFF SSSSS
94716 // S S P P O O F S S
94717 // S P P O O F S
94718 // SSSSS PPPPPP O O FFFFF SSSSS
94719 // S P O O F S
94720 // S S P O O F S S
94721 // SSSSS P OOOOO F SSSSS
94722
94723
94724 // VIF THU 20 NOV 2025 22:21:23 ** SPOFS ** DIAGNOSTICS PAGE 02533
94725
94726
94727 // VIF THU 20 NOV 2025 22:21:23 ** SPOFS ** GENERATED CODE PAGE 02534
94728
94729 int_4 _spofs (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
94730 work_)
94731 { // ** body not listed **
94933 }
94934
94935 // VIF THU 20 NOV 2025 22:21:23 ** SPOIR ** SPOIR PAGE 02538
94936
94937 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
94938 // S S U U B B R R O O U U T I NN N E
94939 // S U U B B R R O O U U T I N N N E
94940 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
94941 // S U U B B R R O O U U T I N N N E
94942 // S S U U B B R R O O U U T I N NN E
94943 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
94944
94945 // SSSSS PPPPPP OOOOO III RRRRRR
94946 // S S P P O O I R R
94947 // S P P O O I R R
94948 // SSSSS PPPPPP O O I RRRRRR
94949 // S P O O I R R
94950 // S S P O O I R R
94951 // SSSSS P OOOOO III R R
94952
94953
94954 // VIF THU 20 NOV 2025 22:21:23 ** SPOIR ** DIAGNOSTICS PAGE 02539
94955
94956
94957 // VIF THU 20 NOV 2025 22:21:23 ** SPOIR ** GENERATED CODE PAGE 02540
94958
94959 int_4 _spoir (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
94960 work_)
94961 { // ** body not listed **
95183 }
95184
95185 // VIF THU 20 NOV 2025 22:21:23 ** SPOPT ** SPOPT PAGE 02545
95186
95187 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
95188 // S S U U B B R R O O U U T I NN N E
95189 // S U U B B R R O O U U T I N N N E
95190 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
95191 // S U U B B R R O O U U T I N N N E
95192 // S S U U B B R R O O U U T I N NN E
95193 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
95194
95195 // SSSSS PPPPPP OOOOO PPPPPP TTTTTTT
95196 // S S P P O O P P T
95197 // S P P O O P P T
95198 // SSSSS PPPPPP O O PPPPPP T
95199 // S P O O P T
95200 // S S P O O P T
95201 // SSSSS P OOOOO P T
95202
95203
95204 // VIF THU 20 NOV 2025 22:21:23 ** SPOPT ** DIAGNOSTICS PAGE 02546
95205
95206
95207 // VIF THU 20 NOV 2025 22:21:23 ** SPOPT ** GENERATED CODE PAGE 02547
95208
95209 int_4 _spopt (real_4 _p_ prgopt_, int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ info_, real_4 _p_ csc_, int_4 _p_
95210 ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
95211 { // ** body not listed **
95581 }
95582
95583 // VIF THU 20 NOV 2025 22:21:23 ** SPPERM ** SPPERM PAGE 02555
95584
95585 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
95586 // S S U U B B R R O O U U T I NN N E
95587 // S U U B B R R O O U U T I N N N E
95588 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
95589 // S U U B B R R O O U U T I N N N E
95590 // S S U U B B R R O O U U T I N NN E
95591 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
95592
95593 // SSSSS PPPPPP PPPPPP EEEEEEE RRRRRR M M
95594 // S S P P P P E R R MM MM
95595 // S P P P P E R R M M M M
95596 // SSSSS PPPPPP PPPPPP EEEEE RRRRRR M M M
95597 // S P P E R R M M
95598 // S S P P E R R M M
95599 // SSSSS P P EEEEEEE R R M M
95600
95601
95602 // VIF THU 20 NOV 2025 22:21:23 ** SPPERM ** DIAGNOSTICS PAGE 02556
95603
95604
95605 // VIF THU 20 NOV 2025 22:21:23 ** SPPERM ** GENERATED CODE PAGE 02557
95606
95607 int_4 _spperm (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
95608 { // ** body not listed **
95653 }
95654
95655 // VIF THU 20 NOV 2025 22:21:23 ** SPSORT ** SPSORT PAGE 02558
95656
95657 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
95658 // S S U U B B R R O O U U T I NN N E
95659 // S U U B B R R O O U U T I N N N E
95660 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
95661 // S U U B B R R O O U U T I N N N E
95662 // S S U U B B R R O O U U T I N NN E
95663 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
95664
95665 // SSSSS PPPPPP SSSSS OOOOO RRRRRR TTTTTTT
95666 // S S P P S S O O R R T
95667 // S P P S O O R R T
95668 // SSSSS PPPPPP SSSSS O O RRRRRR T
95669 // S P S O O R R T
95670 // S S P S S O O R R T
95671 // SSSSS P SSSSS OOOOO R R T
95672
95673
95674 // VIF THU 20 NOV 2025 22:21:23 ** SPSORT ** DIAGNOSTICS PAGE 02559
95675
95676
95677 // VIF THU 20 NOV 2025 22:21:23 ** SPSORT ** GENERATED CODE PAGE 02560
95678
95679 int_4 _spsort (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
95680 { // ** body not listed **
95844 }
95845
95846 // VIF THU 20 NOV 2025 22:21:23 ** SREADP ** SREADP PAGE 02564
95847
95848 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
95849 // S S U U B B R R O O U U T I NN N E
95850 // S U U B B R R O O U U T I N N N E
95851 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
95852 // S U U B B R R O O U U T I N N N E
95853 // S S U U B B R R O O U U T I N NN E
95854 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
95855
95856 // SSSSS RRRRRR EEEEEEE A DDDDDD PPPPPP
95857 // S S R R E A A D D P P
95858 // S R R E A A D D P P
95859 // SSSSS RRRRRR EEEEE A A D D PPPPPP
95860 // S R R E AAAAAAA D D P
95861 // S S R R E A A D D P
95862 // SSSSS R R EEEEEEE A A DDDDDD P
95863
95864
95865 // VIF THU 20 NOV 2025 22:21:23 ** SREADP ** DIAGNOSTICS PAGE 02565
95866
95867
95868 // VIF THU 20 NOV 2025 22:21:23 ** SREADP ** GENERATED CODE PAGE 02566
95869
95870 int_4 _sreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
95871 { // ** body not listed **
95982 }
95983
95984 // VIF THU 20 NOV 2025 22:21:23 ** SSIEV ** SSIEV PAGE 02569
95985
95986 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
95987 // S S U U B B R R O O U U T I NN N E
95988 // S U U B B R R O O U U T I N N N E
95989 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
95990 // S U U B B R R O O U U T I N N N E
95991 // S S U U B B R R O O U U T I N NN E
95992 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
95993
95994 // SSSSS SSSSS III EEEEEEE V V
95995 // S S S S I E V V
95996 // S S I E V V
95997 // SSSSS SSSSS I EEEEE V V
95998 // S S I E V V
95999 // S S S S I E V V
96000 // SSSSS SSSSS III EEEEEEE V
96001
96002
96003 // VIF THU 20 NOV 2025 22:21:23 ** SSIEV ** DIAGNOSTICS PAGE 02570
96004
96005
96006 // VIF THU 20 NOV 2025 22:21:23 ** SSIEV ** GENERATED CODE PAGE 02571
96007
96008 int_4 _ssiev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ work_, int_4 _p_ job_, int_4 _p_
96009 info_)
96010 { // ** body not listed **
96047 }
96048
96049 // VIF THU 20 NOV 2025 22:21:23 ** SSORT ** SSORT PAGE 02572
96050
96051 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96052 // S S U U B B R R O O U U T I NN N E
96053 // S U U B B R R O O U U T I N N N E
96054 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96055 // S U U B B R R O O U U T I N N N E
96056 // S S U U B B R R O O U U T I N NN E
96057 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96058
96059 // SSSSS SSSSS OOOOO RRRRRR TTTTTTT
96060 // S S S S O O R R T
96061 // S S O O R R T
96062 // SSSSS SSSSS O O RRRRRR T
96063 // S S O O R R T
96064 // S S S S O O R R T
96065 // SSSSS SSSSS OOOOO R R T
96066
96067
96068 // VIF THU 20 NOV 2025 22:21:23 ** SSORT ** DIAGNOSTICS PAGE 02573
96069
96070
96071 // VIF THU 20 NOV 2025 22:21:23 ** SSORT ** GENERATED CODE PAGE 02574
96072
96073 int_4 _ssort (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, int_4 _p_ kflag_)
96074 { // ** body not listed **
96325 }
96326
96327 // VIF THU 20 NOV 2025 22:21:23 ** STOR1 ** STOR1 PAGE 02579
96328
96329 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96330 // S S U U B B R R O O U U T I NN N E
96331 // S U U B B R R O O U U T I N N N E
96332 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96333 // S U U B B R R O O U U T I N N N E
96334 // S S U U B B R R O O U U T I N NN E
96335 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96336
96337 // SSSSS TTTTTTT OOOOO RRRRRR 1
96338 // S S T O O R R 11
96339 // S T O O R R 1 1
96340 // SSSSS T O O RRRRRR 1
96341 // S T O O R R 1
96342 // S S T O O R R 1
96343 // SSSSS T OOOOO R R 11111
96344
96345
96346 // VIF THU 20 NOV 2025 22:21:23 ** STOR1 ** DIAGNOSTICS PAGE 02580
96347
96348
96349 // VIF THU 20 NOV 2025 22:21:23 ** STOR1 ** GENERATED CODE PAGE 02581
96350
96351 int_4 _stor1 (real_4 _p_ u_, real_4 _p_ yh_, real_4 _p_ v_, real_4 _p_ yp_, int_4 _p_ ntemp_, int_4 _p_ ndisk_, int_4
96352 _p_ ntape_)
96353 { // ** body not listed **
96398 }
96399
96400 // VIF THU 20 NOV 2025 22:21:23 ** STWAY ** STWAY PAGE 02582
96401
96402 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96403 // S S U U B B R R O O U U T I NN N E
96404 // S U U B B R R O O U U T I N N N E
96405 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96406 // S U U B B R R O O U U T I N N N E
96407 // S S U U B B R R O O U U T I N NN E
96408 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96409
96410 // SSSSS TTTTTTT W W A Y Y
96411 // S S T W W A A Y Y
96412 // S T W W A A Y Y
96413 // SSSSS T W W W A A Y
96414 // S T W W W AAAAAAA Y
96415 // S S T W W W A A Y
96416 // SSSSS T WW WW A A Y
96417
96418
96419 // VIF THU 20 NOV 2025 22:21:23 ** STWAY ** DIAGNOSTICS PAGE 02583
96420
96421
96422 // VIF THU 20 NOV 2025 22:21:23 ** STWAY ** GENERATED CODE PAGE 02584
96423
96424 int_4 _stway (real_4 _p_ u_, real_4 _p_ v_, real_4 _p_ yhp_, int_4 _p_ inout_, real_4 _p_ stowa_)
96425 { // ** body not listed **
96484 }
96485
96486 // VIF THU 20 NOV 2025 22:21:23 ** SUDS ** SUDS PAGE 02586
96487
96488 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96489 // S S U U B B R R O O U U T I NN N E
96490 // S U U B B R R O O U U T I N N N E
96491 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96492 // S U U B B R R O O U U T I N N N E
96493 // S S U U B B R R O O U U T I N NN E
96494 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96495
96496 // SSSSS U U DDDDDD SSSSS
96497 // S S U U D D S S
96498 // S U U D D S
96499 // SSSSS U U D D SSSSS
96500 // S U U D D S
96501 // S S U U D D S S
96502 // SSSSS UUUUU DDDDDD SSSSS
96503
96504
96505 // VIF THU 20 NOV 2025 22:21:23 ** SUDS ** DIAGNOSTICS PAGE 02587
96506
96507
96508 // VIF THU 20 NOV 2025 22:21:23 ** SUDS ** GENERATED CODE PAGE 02588
96509
96510 int_4 _suds (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_, int_4 _p_
96511 iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_)
96512 { // ** body not listed **
96525 }
96526
96527 // VIF THU 20 NOV 2025 22:21:23 ** SVECS ** SVECS PAGE 02589
96528
96529 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96530 // S S U U B B R R O O U U T I NN N E
96531 // S U U B B R R O O U U T I N N N E
96532 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96533 // S U U B B R R O O U U T I N N N E
96534 // S S U U B B R R O O U U T I N NN E
96535 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96536
96537 // SSSSS V V EEEEEEE CCCCC SSSSS
96538 // S S V V E C C S S
96539 // S V V E C S
96540 // SSSSS V V EEEEE C SSSSS
96541 // S V V E C S
96542 // S S V V E C C S S
96543 // SSSSS V EEEEEEE CCCCC SSSSS
96544
96545
96546 // VIF THU 20 NOV 2025 22:21:23 ** SVECS ** DIAGNOSTICS PAGE 02590
96547
96548
96549 // VIF THU 20 NOV 2025 22:21:23 ** SVECS ** GENERATED CODE PAGE 02591
96550
96551 int_4 _svecs (int_4 _p_ ncomp_, int_4 _p_ lnfc_, real_4 _p_ yhp_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ inhomo_
96552 , int_4 _p_ iflag_)
96553 { // ** body not listed **
96583 }
96584
96585 // VIF THU 20 NOV 2025 22:21:23 ** SWRITP ** SWRITP PAGE 02592
96586
96587 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96588 // S S U U B B R R O O U U T I NN N E
96589 // S U U B B R R O O U U T I N N N E
96590 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96591 // S U U B B R R O O U U T I N N N E
96592 // S S U U B B R R O O U U T I N NN E
96593 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96594
96595 // SSSSS W W RRRRRR III TTTTTTT PPPPPP
96596 // S S W W R R I T P P
96597 // S W W R R I T P P
96598 // SSSSS W W W RRRRRR I T PPPPPP
96599 // S W W W R R I T P
96600 // S S W W W R R I T P
96601 // SSSSS WW WW R R III T P
96602
96603
96604 // VIF THU 20 NOV 2025 22:21:23 ** SWRITP ** DIAGNOSTICS PAGE 02593
96605
96606
96607 // VIF THU 20 NOV 2025 22:21:23 ** SWRITP ** GENERATED CODE PAGE 02594
96608
96609 int_4 _swritp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
96610 { // ** body not listed **
96721 }
96722
96723 // VIF THU 20 NOV 2025 22:21:23 ** TEVLC ** TEVLC PAGE 02597
96724
96725 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96726 // S S U U B B R R O O U U T I NN N E
96727 // S U U B B R R O O U U T I N N N E
96728 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96729 // S U U B B R R O O U U T I N N N E
96730 // S S U U B B R R O O U U T I N NN E
96731 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96732
96733 // TTTTTTT EEEEEEE V V L CCCCC
96734 // T E V V L C C
96735 // T E V V L C
96736 // T EEEEE V V L C
96737 // T E V V L C
96738 // T E V V L C C
96739 // T EEEEEEE V LLLLLLL CCCCC
96740
96741
96742 // VIF THU 20 NOV 2025 22:21:23 ** TEVLC ** DIAGNOSTICS PAGE 02598
96743
96744
96745 // VIF THU 20 NOV 2025 22:21:23 ** TEVLC ** GENERATED CODE PAGE 02599
96746
96747 int_4 _tevlc (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
96748 { // ** body not listed **
96864 }
96865
96866 // VIF THU 20 NOV 2025 22:21:23 ** TEVLS ** TEVLS PAGE 02602
96867
96868 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
96869 // S S U U B B R R O O U U T I NN N E
96870 // S U U B B R R O O U U T I N N N E
96871 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
96872 // S U U B B R R O O U U T I N N N E
96873 // S S U U B B R R O O U U T I N NN E
96874 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
96875
96876 // TTTTTTT EEEEEEE V V L SSSSS
96877 // T E V V L S S
96878 // T E V V L S
96879 // T EEEEE V V L SSSSS
96880 // T E V V L S
96881 // T E V V L S S
96882 // T EEEEEEE V LLLLLLL SSSSS
96883
96884
96885 // VIF THU 20 NOV 2025 22:21:23 ** TEVLS ** DIAGNOSTICS PAGE 02603
96886
96887
96888 // VIF THU 20 NOV 2025 22:21:23 ** TEVLS ** GENERATED CODE PAGE 02604
96889
96890 int_4 _tevls (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
96891 { // ** body not listed **
97007 }
97008
97009 // VIF THU 20 NOV 2025 22:21:23 ** TRI3 ** TRI3 PAGE 02607
97010
97011 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
97012 // S S U U B B R R O O U U T I NN N E
97013 // S U U B B R R O O U U T I N N N E
97014 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
97015 // S U U B B R R O O U U T I N N N E
97016 // S S U U B B R R O O U U T I N NN E
97017 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
97018
97019 // TTTTTTT RRRRRR III 33333
97020 // T R R I 3 3
97021 // T R R I 3
97022 // T RRRRRR I 33333
97023 // T R R I 3
97024 // T R R I 3 3
97025 // T R R III 33333
97026
97027
97028 // VIF THU 20 NOV 2025 22:21:23 ** TRI3 ** DIAGNOSTICS PAGE 02608
97029
97030
97031 // VIF THU 20 NOV 2025 22:21:23 ** TRI3 ** GENERATED CODE PAGE 02609
97032
97033 int_4 _tri3 (int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, int_4 _p_ k_, real_4 _p_ y1_, real_4 _p_ y2_,
97034 real_4 _p_ y3_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_)
97035 { // ** body not listed **
97149 }
97150
97151 // VIF THU 20 NOV 2025 22:21:23 ** TRIDQ ** TRIDQ PAGE 02612
97152
97153 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
97154 // S S U U B B R R O O U U T I NN N E
97155 // S U U B B R R O O U U T I N N N E
97156 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
97157 // S U U B B R R O O U U T I N N N E
97158 // S S U U B B R R O O U U T I N NN E
97159 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
97160
97161 // TTTTTTT RRRRRR III DDDDDD QQQQQ
97162 // T R R I D D Q Q
97163 // T R R I D D Q Q
97164 // T RRRRRR I D D Q Q
97165 // T R R I D D Q Q Q
97166 // T R R I D D Q Q
97167 // T R R III DDDDDD QQQQ Q
97168
97169
97170 // VIF THU 20 NOV 2025 22:21:23 ** TRIDQ ** DIAGNOSTICS PAGE 02613
97171
97172
97173 // VIF THU 20 NOV 2025 22:21:23 ** TRIDQ ** GENERATED CODE PAGE 02614
97174
97175 int_4 _tridq (int_4 _p_ mr_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ y_, real_4 _p_ d_)
97176 { // ** body not listed **
97204 }
97205
97206 // VIF THU 20 NOV 2025 22:21:23 ** TRIS4 ** TRIS4 PAGE 02615
97207
97208 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
97209 // S S U U B B R R O O U U T I NN N E
97210 // S U U B B R R O O U U T I N N N E
97211 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
97212 // S U U B B R R O O U U T I N N N E
97213 // S S U U B B R R O O U U T I N NN E
97214 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
97215
97216 // TTTTTTT RRRRRR III SSSSS 4
97217 // T R R I S S 4 4
97218 // T R R I S 4 4
97219 // T RRRRRR I SSSSS 4444444
97220 // T R R I S 4
97221 // T R R I S S 4
97222 // T R R III SSSSS 4
97223
97224
97225 // VIF THU 20 NOV 2025 22:21:23 ** TRIS4 ** DIAGNOSTICS PAGE 02616
97226
97227
97228 // VIF THU 20 NOV 2025 22:21:23 ** TRIS4 ** GENERATED CODE PAGE 02617
97229
97230 int_4 _tris4 (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ z_)
97231 { // ** body not listed **
97260 }
97261
97262 // VIF THU 20 NOV 2025 22:21:23 ** TRISP ** TRISP PAGE 02618
97263
97264 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
97265 // S S U U B B R R O O U U T I NN N E
97266 // S U U B B R R O O U U T I N N N E
97267 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
97268 // S U U B B R R O O U U T I N N N E
97269 // S S U U B B R R O O U U T I N NN E
97270 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
97271
97272 // TTTTTTT RRRRRR III SSSSS PPPPPP
97273 // T R R I S S P P
97274 // T R R I S P P
97275 // T RRRRRR I SSSSS PPPPPP
97276 // T R R I S P
97277 // T R R I S S P
97278 // T R R III SSSSS P
97279
97280
97281 // VIF THU 20 NOV 2025 22:21:23 ** TRISP ** DIAGNOSTICS PAGE 02619
97282
97283
97284 // VIF THU 20 NOV 2025 22:21:23 ** TRISP ** GENERATED CODE PAGE 02620
97285
97286 int_4 _trisp (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ z_)
97287 { // ** body not listed **
97316 }
97317
97318 // VIF THU 20 NOV 2025 22:21:23 ** TRIX ** TRIX PAGE 02621
97319
97320 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
97321 // S S U U B B R R O O U U T I NN N E
97322 // S U U B B R R O O U U T I N N N E
97323 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
97324 // S U U B B R R O O U U T I N N N E
97325 // S S U U B B R R O O U U T I N NN E
97326 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
97327
97328 // TTTTTTT RRRRRR III X X
97329 // T R R I X X
97330 // T R R I X X
97331 // T RRRRRR I X
97332 // T R R I X X
97333 // T R R I X X
97334 // T R R III X X
97335
97336
97337 // VIF THU 20 NOV 2025 22:21:23 ** TRIX ** DIAGNOSTICS PAGE 02622
97338
97339
97340 // VIF THU 20 NOV 2025 22:21:23 ** TRIX ** GENERATED CODE PAGE 02623
97341
97342 int_4 _trix (int_4 _p_ idegbr_, int_4 _p_ idegcr_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4
97343 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_)
97344 { // ** body not listed **
97399 }
97400
97401 // VIF THU 20 NOV 2025 22:21:23 ** U11LS ** U11LS PAGE 02625
97402
97403 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
97404 // S S U U B B R R O O U U T I NN N E
97405 // S U U B B R R O O U U T I N N N E
97406 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
97407 // S U U B B R R O O U U T I N N N E
97408 // S S U U B B R R O O U U T I N NN E
97409 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
97410
97411 // U U 1 1 L SSSSS
97412 // U U 11 11 L S S
97413 // U U 1 1 1 1 L S
97414 // U U 1 1 L SSSSS
97415 // U U 1 1 L S
97416 // U U 1 1 L S S
97417 // UUUUU 11111 11111 LLLLLLL SSSSS
97418
97419
97420 // VIF THU 20 NOV 2025 22:21:23 ** U11LS ** DIAGNOSTICS PAGE 02626
97421
97422
97423 // VIF THU 20 NOV 2025 22:21:23 ** U11LS ** GENERATED CODE PAGE 02627
97424
97425 int_4 _u11ls (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ ub_, real_4 _p_ db_, int_4 _p_
97426 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4 _p_ ic_,
97427 int_4 _p_ ir_)
97428 { // ** body not listed **
97720 }
97721
97722 // VIF THU 20 NOV 2025 22:21:23 ** U11US ** U11US PAGE 02633
97723
97724 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
97725 // S S U U B B R R O O U U T I NN N E
97726 // S U U B B R R O O U U T I N N N E
97727 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
97728 // S U U B B R R O O U U T I N N N E
97729 // S S U U B B R R O O U U T I N NN E
97730 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
97731
97732 // U U 1 1 U U SSSSS
97733 // U U 11 11 U U S S
97734 // U U 1 1 1 1 U U S
97735 // U U 1 1 U U SSSSS
97736 // U U 1 1 U U S
97737 // U U 1 1 U U S S
97738 // UUUUU 11111 11111 UUUUU SSSSS
97739
97740
97741 // VIF THU 20 NOV 2025 22:21:23 ** U11US ** DIAGNOSTICS PAGE 02634
97742
97743
97744 // VIF THU 20 NOV 2025 22:21:23 ** U11US ** GENERATED CODE PAGE 02635
97745
97746 int_4 _u11us (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ ub_, real_4 _p_ db_, int_4 _p_
97747 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4 _p_ ir_,
97748 int_4 _p_ ic_)
97749 { // ** body not listed **
98041 }
98042
98043 // VIF THU 20 NOV 2025 22:21:23 ** U12LS ** U12LS PAGE 02641
98044
98045 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
98046 // S S U U B B R R O O U U T I NN N E
98047 // S U U B B R R O O U U T I N N N E
98048 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
98049 // S U U B B R R O O U U T I N N N E
98050 // S S U U B B R R O O U U T I N NN E
98051 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
98052
98053 // U U 1 22222 L SSSSS
98054 // U U 11 2 2 L S S
98055 // U U 1 1 2 L S
98056 // U U 1 22222 L SSSSS
98057 // U U 1 2 L S
98058 // U U 1 2 L S S
98059 // UUUUU 11111 2222222 LLLLLLL SSSSS
98060
98061
98062 // VIF THU 20 NOV 2025 22:21:23 ** U12LS ** DIAGNOSTICS PAGE 02642
98063
98064
98065 // VIF THU 20 NOV 2025 22:21:23 ** U12LS ** GENERATED CODE PAGE 02643
98066
98067 int_4 _u12ls (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
98068 int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ic_, int_4 _p_ ir_)
98069 { // ** body not listed **
98214 }
98215
98216 // VIF THU 20 NOV 2025 22:21:23 ** U12US ** U12US PAGE 02646
98217
98218 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
98219 // S S U U B B R R O O U U T I NN N E
98220 // S U U B B R R O O U U T I N N N E
98221 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
98222 // S U U B B R R O O U U T I N N N E
98223 // S S U U B B R R O O U U T I N NN E
98224 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
98225
98226 // U U 1 22222 U U SSSSS
98227 // U U 11 2 2 U U S S
98228 // U U 1 1 2 U U S
98229 // U U 1 22222 U U SSSSS
98230 // U U 1 2 U U S
98231 // U U 1 2 U U S S
98232 // UUUUU 11111 2222222 UUUUU SSSSS
98233
98234
98235 // VIF THU 20 NOV 2025 22:21:23 ** U12US ** DIAGNOSTICS PAGE 02647
98236
98237
98238 // VIF THU 20 NOV 2025 22:21:23 ** U12US ** GENERATED CODE PAGE 02648
98239
98240 int_4 _u12us (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
98241 int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ir_, int_4 _p_ ic_)
98242 { // ** body not listed **
98386 }
98387
98388 // VIF THU 20 NOV 2025 22:21:23 ** ULSIA ** ULSIA PAGE 02651
98389
98390 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
98391 // S S U U B B R R O O U U T I NN N E
98392 // S U U B B R R O O U U T I N N N E
98393 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
98394 // S U U B B R R O O U U T I N N N E
98395 // S S U U B B R R O O U U T I N NN E
98396 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
98397
98398 // U U L SSSSS III A
98399 // U U L S S I A A
98400 // U U L S I A A
98401 // U U L SSSSS I A A
98402 // U U L S I AAAAAAA
98403 // U U L S S I A A
98404 // UUUUU LLLLLLL SSSSS III A A
98405
98406
98407 // VIF THU 20 NOV 2025 22:21:23 ** ULSIA ** DIAGNOSTICS PAGE 02652
98408
98409
98410 // VIF THU 20 NOV 2025 22:21:23 ** ULSIA ** GENERATED CODE PAGE 02653
98411
98412 int_4 _ulsia (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
98413 real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
98414 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
98415 { // ** body not listed **
98674 }
98675
98676 // VIF THU 20 NOV 2025 22:21:23 ** USRMAT ** USRMAT PAGE 02659
98677
98678 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
98679 // S S U U B B R R O O U U T I NN N E
98680 // S U U B B R R O O U U T I N N N E
98681 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
98682 // S U U B B R R O O U U T I N N N E
98683 // S S U U B B R R O O U U T I N NN E
98684 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
98685
98686 // U U SSSSS RRRRRR M M A TTTTTTT
98687 // U U S S R R MM MM A A T
98688 // U U S R R M M M M A A T
98689 // U U SSSSS RRRRRR M M M A A T
98690 // U U S R R M M AAAAAAA T
98691 // U U S S R R M M A A T
98692 // UUUUU SSSSS R R M M A A T
98693
98694
98695 // VIF THU 20 NOV 2025 22:21:23 ** USRMAT ** DIAGNOSTICS PAGE 02660
98696
98697
98698 // VIF THU 20 NOV 2025 22:21:23 ** USRMAT ** GENERATED CODE PAGE 02661
98699
98700 int_4 _usrmat (int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ aij_, int_4 _p_ indcat_, real_4 _p_ prgopt_, real_4 _p_ dattrv_,
98701 int_4 _p_ iflag_)
98702 { // ** body not listed **
98740 }
98741
98742 // VIF THU 20 NOV 2025 22:21:23 ** VNWRMS ** VNWRMS PAGE 02662
98743
98744 // RRRRRR EEEEEEE A L 4
98745 // R R E A A L * * 4 4
98746 // R R E A A L * * 4 4
98747 // RRRRRR EEEEE A A L ******* 4444444
98748 // R R E AAAAAAA L * * 4
98749 // R R E A A L * * 4
98750 // R R EEEEEEE A A LLLLLLL 4
98751
98752 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
98753 // F U U NN N C C T I O O NN N
98754 // F U U N N N C T I O O N N N
98755 // FFFFF U U N N N C T I O O N N N
98756 // F U U N N N C T I O O N N N
98757 // F U U N NN C C T I O O N NN
98758 // F UUUUU N N CCCCC T III OOOOO N N
98759
98760 // V V N N W W RRRRRR M M SSSSS
98761 // V V NN N W W R R MM MM S S
98762 // V V N N N W W R R M M M M S
98763 // V V N N N W W W RRRRRR M M M SSSSS
98764 // V V N N N W W W R R M M S
98765 // V V N NN W W W R R M M S S
98766 // V N N WW WW R R M M SSSSS
98767
98768
98769 // VIF THU 20 NOV 2025 22:21:23 ** VNWRMS ** DIAGNOSTICS PAGE 02663
98770
98771
98772 // VIF THU 20 NOV 2025 22:21:23 ** VNWRMS ** GENERATED CODE PAGE 02664
98773
98774 real_4 _vnwrms (int_4 _p_ n_, real_4 _p_ v_, real_4 _p_ w_)
98775 { // ** body not listed **
98787 }
98788
98789 // VIF THU 20 NOV 2025 22:21:23 ** WNLIT ** WNLIT PAGE 02665
98790
98791 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
98792 // S S U U B B R R O O U U T I NN N E
98793 // S U U B B R R O O U U T I N N N E
98794 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
98795 // S U U B B R R O O U U T I N N N E
98796 // S S U U B B R R O O U U T I N NN E
98797 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
98798
98799 // W W N N L III TTTTTTT
98800 // W W NN N L I T
98801 // W W N N N L I T
98802 // W W W N N N L I T
98803 // W W W N N N L I T
98804 // W W W N NN L I T
98805 // WW WW N N LLLLLLL III T
98806
98807
98808 // VIF THU 20 NOV 2025 22:21:23 ** WNLIT ** DIAGNOSTICS PAGE 02666
98809
98810
98811 // VIF THU 20 NOV 2025 22:21:23 ** WNLIT ** GENERATED CODE PAGE 02667
98812
98813 int_4 _wnlit (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ l_, int_4 _p_ ipivot_, int_4 _p_
98814 itype_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ rnorm_, int_4 _p_ idope_, real_4 _p_ dope_, logical_4 _p_ done_)
98815 { // ** body not listed **
98986 }
98987
98988 // VIF THU 20 NOV 2025 22:21:23 ** WNLSM ** WNLSM PAGE 02671
98989
98990 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
98991 // S S U U B B R R O O U U T I NN N E
98992 // S U U B B R R O O U U T I N N N E
98993 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
98994 // S U U B B R R O O U U T I N N N E
98995 // S S U U B B R R O O U U T I N NN E
98996 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
98997
98998 // W W N N L SSSSS M M
98999 // W W NN N L S S MM MM
99000 // W W N N N L S M M M M
99001 // W W W N N N L SSSSS M M M
99002 // W W W N N N L S M M
99003 // W W W N NN L S S M M
99004 // WW WW N N LLLLLLL SSSSS M M
99005
99006
99007 // VIF THU 20 NOV 2025 22:21:23 ** WNLSM ** DIAGNOSTICS PAGE 02672
99008
99009
99010 // VIF THU 20 NOV 2025 22:21:23 ** WNLSM ** GENERATED CODE PAGE 02673
99011
99012 int_4 _wnlsm (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mme_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_4 _p_
99013 prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_4 _p_ wd_, real_4
99014 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_)
99015 { // ** body not listed **
99459 }
99460
99461 // VIF THU 20 NOV 2025 22:21:23 ** WNLT1 ** WNLT1 PAGE 02682
99462
99463 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
99464 // S S U U B B R R O O U U T I NN N E
99465 // S U U B B R R O O U U T I N N N E
99466 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
99467 // S U U B B R R O O U U T I N N N E
99468 // S S U U B B R R O O U U T I N NN E
99469 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
99470
99471 // W W N N L TTTTTTT 1
99472 // W W NN N L T 11
99473 // W W N N N L T 1 1
99474 // W W W N N N L T 1
99475 // W W W N N N L T 1
99476 // W W W N NN L T 1
99477 // WW WW N N LLLLLLL T 11111
99478
99479
99480 // VIF THU 20 NOV 2025 22:21:23 ** WNLT1 ** DIAGNOSTICS PAGE 02683
99481
99482
99483 // VIF THU 20 NOV 2025 22:21:23 ** WNLT1 ** GENERATED CODE PAGE 02684
99484
99485 int_4 _wnlt1 (int_4 _p_ i_, int_4 _p_ lend_, int_4 _p_ mend_, int_4 _p_ ir_, int_4 _p_ mdw_, logical_4 _p_ recalc_,
99486 int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_)
99487 { // ** body not listed **
99512 }
99513
99514 // VIF THU 20 NOV 2025 22:21:23 ** WNLT2 ** WNLT2 PAGE 02685
99515
99516 // L OOOOO GGGGG III CCCCC A L 4
99517 // L O O G G I C C A A L * * 4 4
99518 // L O O G I C A A L * * 4 4
99519 // L O O G GGGG I C A A L ******* 4444444
99520 // L O O G G I C AAAAAAA L * * 4
99521 // L O O G G I C C A A L * * 4
99522 // LLLLLLL OOOOO GGGGG III CCCCC A A LLLLLLL 4
99523
99524 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
99525 // F U U NN N C C T I O O NN N
99526 // F U U N N N C T I O O N N N
99527 // FFFFF U U N N N C T I O O N N N
99528 // F U U N N N C T I O O N N N
99529 // F U U N NN C C T I O O N NN
99530 // F UUUUU N N CCCCC T III OOOOO N N
99531
99532 // W W N N L TTTTTTT 22222
99533 // W W NN N L T 2 2
99534 // W W N N N L T 2
99535 // W W W N N N L T 22222
99536 // W W W N N N L T 2
99537 // W W W N NN L T 2
99538 // WW WW N N LLLLLLL T 2222222
99539
99540
99541 // VIF THU 20 NOV 2025 22:21:23 ** WNLT2 ** DIAGNOSTICS PAGE 02686
99542
99543
99544 // VIF THU 20 NOV 2025 22:21:23 ** WNLT2 ** GENERATED CODE PAGE 02687
99545
99546 logical_4 _wnlt2 (int_4 _p_ me_, int_4 _p_ mend_, int_4 _p_ ir_, real_4 _p_ factor_, real_4 _p_ tau_, real_4 _p_ scale_
99547 , real_4 _p_ wic_)
99548 { // ** body not listed **
99570 }
99571
99572 // VIF THU 20 NOV 2025 22:21:23 ** WNLT3 ** WNLT3 PAGE 02688
99573
99574 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
99575 // S S U U B B R R O O U U T I NN N E
99576 // S U U B B R R O O U U T I N N N E
99577 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
99578 // S U U B B R R O O U U T I N N N E
99579 // S S U U B B R R O O U U T I N NN E
99580 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
99581
99582 // W W N N L TTTTTTT 33333
99583 // W W NN N L T 3 3
99584 // W W N N N L T 3
99585 // W W W N N N L T 33333
99586 // W W W N N N L T 3
99587 // W W W N NN L T 3 3
99588 // WW WW N N LLLLLLL T 33333
99589
99590
99591 // VIF THU 20 NOV 2025 22:21:23 ** WNLT3 ** DIAGNOSTICS PAGE 02689
99592
99593
99594 // VIF THU 20 NOV 2025 22:21:23 ** WNLT3 ** GENERATED CODE PAGE 02690
99595
99596 int_4 _wnlt3 (int_4 _p_ i_, int_4 _p_ imax_, int_4 _p_ m_, int_4 _p_ mdw_, int_4 _p_ ipivot_, real_4 _p_ h_, real_4 _p_
99597 w_)
99598 { // ** body not listed **
99613 }
99614
99615 // VIF THU 20 NOV 2025 22:21:23 ** WNNLS ** WNNLS PAGE 02691
99616
99617 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
99618 // S S U U B B R R O O U U T I NN N E
99619 // S U U B B R R O O U U T I N N N E
99620 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
99621 // S U U B B R R O O U U T I N N N E
99622 // S S U U B B R R O O U U T I N NN E
99623 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
99624
99625 // W W N N N N L SSSSS
99626 // W W NN N NN N L S S
99627 // W W N N N N N N L S
99628 // W W W N N N N N N L SSSSS
99629 // W W W N N N N N N L S
99630 // W W W N NN N NN L S S
99631 // WW WW N N N N LLLLLLL SSSSS
99632
99633
99634 // VIF THU 20 NOV 2025 22:21:23 ** WNNLS ** DIAGNOSTICS PAGE 02692
99635
99636
99637 // VIF THU 20 NOV 2025 22:21:23 ** WNNLS ** GENERATED CODE PAGE 02693
99638
99639 int_4 _wnnls (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_4 _p_
99640 prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_)
99641 { // ** body not listed **
99769 }
99770
99771 // VIF THU 20 NOV 2025 22:21:23 ** XADJ ** XADJ PAGE 02696
99772
99773 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
99774 // S S U U B B R R O O U U T I NN N E
99775 // S U U B B R R O O U U T I N N N E
99776 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
99777 // S U U B B R R O O U U T I N N N E
99778 // S S U U B B R R O O U U T I N NN E
99779 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
99780
99781 // X X A DDDDDD J
99782 // X X A A D D J
99783 // X X A A D D J
99784 // X A A D D J
99785 // X X AAAAAAA D D J J
99786 // X X A A D D J J
99787 // X X A A DDDDDD JJJJJ
99788
99789
99790 // VIF THU 20 NOV 2025 22:21:23 ** XADJ ** DIAGNOSTICS PAGE 02697
99791
99792
99793 // VIF THU 20 NOV 2025 22:21:23 ** XADJ ** GENERATED CODE PAGE 02698
99794
99795 int_4 _xadj (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
99796 { // ** body not listed **
99852 }
99853
99854 // VIF THU 20 NOV 2025 22:21:23 ** XC210 ** XC210 PAGE 02700
99855
99856 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
99857 // S S U U B B R R O O U U T I NN N E
99858 // S U U B B R R O O U U T I N N N E
99859 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
99860 // S U U B B R R O O U U T I N N N E
99861 // S S U U B B R R O O U U T I N NN E
99862 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
99863
99864 // X X CCCCC 22222 1 000
99865 // X X C C 2 2 11 0 0
99866 // X X C 2 1 1 0 0
99867 // X C 22222 1 0 0
99868 // X X C 2 1 0 0
99869 // X X C C 2 1 0 0
99870 // X X CCCCC 2222222 11111 000
99871
99872
99873 // VIF THU 20 NOV 2025 22:21:23 ** XC210 ** DIAGNOSTICS PAGE 02701
99874
99875
99876 // VIF THU 20 NOV 2025 22:21:23 ** XC210 ** GENERATED CODE PAGE 02702
99877
99878 int_4 _xc210 (int_4 _p_ k_, real_4 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
99879 { // ** body not listed **
99945 }
99946
99947 // VIF THU 20 NOV 2025 22:21:23 ** XPSI ** XPSI PAGE 02704
99948
99949 // RRRRRR EEEEEEE A L 4
99950 // R R E A A L * * 4 4
99951 // R R E A A L * * 4 4
99952 // RRRRRR EEEEE A A L ******* 4444444
99953 // R R E AAAAAAA L * * 4
99954 // R R E A A L * * 4
99955 // R R EEEEEEE A A LLLLLLL 4
99956
99957 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
99958 // F U U NN N C C T I O O NN N
99959 // F U U N N N C T I O O N N N
99960 // FFFFF U U N N N C T I O O N N N
99961 // F U U N N N C T I O O N N N
99962 // F U U N NN C C T I O O N NN
99963 // F UUUUU N N CCCCC T III OOOOO N N
99964
99965 // X X PPPPPP SSSSS III
99966 // X X P P S S I
99967 // X X P P S I
99968 // X PPPPPP SSSSS I
99969 // X X P S I
99970 // X X P S S I
99971 // X X P SSSSS III
99972
99973
99974 // VIF THU 20 NOV 2025 22:21:23 ** XPSI ** DIAGNOSTICS PAGE 02705
99975
99976
99977 // VIF THU 20 NOV 2025 22:21:23 ** XPSI ** GENERATED CODE PAGE 02706
99978
99979 real_4 _xpsi (real_4 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
99980 { // ** body not listed **
100167 }
100168
100169 // VIF THU 20 NOV 2025 22:21:23 ** XRED ** XRED PAGE 02710
100170
100171 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
100172 // S S U U B B R R O O U U T I NN N E
100173 // S U U B B R R O O U U T I N N N E
100174 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
100175 // S U U B B R R O O U U T I N N N E
100176 // S S U U B B R R O O U U T I N NN E
100177 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
100178
100179 // X X RRRRRR EEEEEEE DDDDDD
100180 // X X R R E D D
100181 // X X R R E D D
100182 // X RRRRRR EEEEE D D
100183 // X X R R E D D
100184 // X X R R E D D
100185 // X X R R EEEEEEE DDDDDD
100186
100187
100188 // VIF THU 20 NOV 2025 22:21:23 ** XRED ** DIAGNOSTICS PAGE 02711
100189
100190
100191 // VIF THU 20 NOV 2025 22:21:23 ** XRED ** GENERATED CODE PAGE 02712
100192
100193 int_4 _xred (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
100194 { // ** body not listed **
100267 }
100268
100269 // VIF THU 20 NOV 2025 22:21:23 ** YAIRY ** YAIRY PAGE 02714
100270
100271 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
100272 // S S U U B B R R O O U U T I NN N E
100273 // S U U B B R R O O U U T I N N N E
100274 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
100275 // S U U B B R R O O U U T I N N N E
100276 // S S U U B B R R O O U U T I N NN E
100277 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
100278
100279 // Y Y A III RRRRRR Y Y
100280 // Y Y A A I R R Y Y
100281 // Y Y A A I R R Y Y
100282 // Y A A I RRRRRR Y
100283 // Y AAAAAAA I R R Y
100284 // Y A A I R R Y
100285 // Y A A III R R Y
100286
100287
100288 // VIF THU 20 NOV 2025 22:21:23 ** YAIRY ** DIAGNOSTICS PAGE 02715
100289
100290
100291 // VIF THU 20 NOV 2025 22:21:23 ** YAIRY ** GENERATED CODE PAGE 02716
100292
100293 int_4 _yairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ bi_, real_4 _p_ dbi_)
100294 { // ** body not listed **
102515 }
|
© 2002-2025 J.M. van der Veer (jmvdveer@xs4all.nl)
|