mathlib-fftpack5.c
1 //! @file mathlib-fftpack5.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 FFTPACK5
24
25 // Compiled from Fortran source code by VIF.
26
27 // Source: https://people.sc.fsu.edu/~jburkardt/f77_src/fftpack5.1/fftpack5.1.html
28 //
29 // FFTPACK5.1, a FORTRAN77 code which computes the Fast Fourier Transform, by Paul Swarztrauber and
30 // Dick Valent.
31 //
32 // Special features include:
33 //
34 // Real or complex data can be handled;
35 // Separate routines for forward analysis (data => Fourier coefficients) and backward analysis
36 // (Fourier coefficients => data);
37 // Sine and cosine transform routines;
38 // Quarter wave sine and cosine transform routines;
39 // The amount of data is NOT required to be a power of 2.
40 //
41 // Routines in the library come in groups of three:
42 //
43 // An initialization routine;
44 // The forward computational routine (data to FFT coefficients);
45 // The backward computational routine (FFT coefficients to data).
46 //
47 // The following table shows how the names of the routines in each group:
48 //
49 // Initialization Forward Backward Purpose
50 // CFFT1I CFFT1F CFFT1B FFT for complex 1D data
51 // CFFT2I CFFT2F CFFT2B FFT for complex 2D data
52 // CFFTMI CFFTMF CFFTMB FFT for complex multi-D data
53 // COSQ1I COSQ1F COSQ1B Even function 1D quarter-cosine FFT
54 // COSQMI COSQMF COSQMB Even function 1D quarter-cosine FFT
55 // COST1I COST1F COST1B Even function 1D cosine FFT
56 // COSTMI COSTMF COSTMB Even function 1D cosine FFT
57 // RFFT1I RFFT1F RFFT1B FFT for real 1D data
58 // RFFT2I RFFT2F RFFT2B FFT for real 2D data
59 // RFFTMI RFFTMF RFFTMB FFT for real multi-D data
60 // SINQ1I SINQ1F SINQ1B Even function 1D quarter-sine FFT
61 // SINQMI SINQMF SINQMB Even function 1D quarter-sine FFT
62 // SINT1I SINT1F SINT1B Even function 1D sine FFT
63 // SINTMI SINTMF SINTMB Even function 1D sine FFT
64 //
65 // Bugfixes from FFTPACK 5.0 to FFTPACK 5.1
66 //
67 // The functionality of FFTPACK 5.1 is identical with the previous version 5.0.
68 // The following bugfixes have been applied:
69 //
70 // Corrected index error for high-level routines [CR]FFT[12][BFI] requiring WSAVE array, and all
71 // dependent routines to which LWSAVE is passed. Namely, in LWSAV = L + LOG(REAL(INT(L))) + 4
72 // definitions, the summand term LOG(REAL(INT(L))) has been corrected to LOG(REAL(INT(L)/LOG(2.)).
73 //
74 // Corrected index error in routime C1FM1F at label 56, where array offset was declared 1 that should
75 // have been 2. This resulted in C1FFTF transforms of length N calculated incorrectly, where N is any
76 // prime .GT. 5, or N=7*M, M .GE. 6.
77 //
78 // Corrected RFFT2x routines by rewriting them. The backward transform followed by forward now returns
79 // identity. Input argument LENSAV must be be at least L + 3*M + INT(LOG(REAL(L))/LOG(2.)) +
80 // 2*INT(LOG(REAL(M))/LOG(2.)) +12. Previously, the required value was smaller.
81
82 // The license for FFTPACK5 Fortran source code is:
83 //
84 // Source: https://people.sc.fsu.edu/~jburkardt/f77_src/fftpack5.1/fftpack5.1.html
85 //
86 // Licensed under the GNU General Public License (GPL).
87 // Copyright (C) 1995-2004, Scientific Computing Division,
88 // University Corporation for Atmospheric Research.
89 //
90
91 // VIF THU 20 NOV 2025 22:19:29 ** MARCEL ** FFTPACK5 PAGE 00001
92
93
94
95 // M M A RRRRRR CCCCC EEEEEEE L
96 // MM MM A A R R C C E L
97 // M M M M A A R R C E L
98 // M M M A A RRRRRR C EEEEE L
99 // M M AAAAAAA R R C E L
100 // M M A A R R C C E L
101 // M M A A R R CCCCC EEEEEEE LLLLLLL
102
103 // FFFFFFF FFFFFFF TTTTTTT PPPPPP A CCCCC K K 5555555
104 // F F T P P A A C C K K 5
105 // F F T P P A A C K K 5
106 // FFFFF FFFFF T PPPPPP A A C KKK 55555
107 // F F T P AAAAAAA C K K 5
108 // F F T P A A C C K K 5 5
109 // F F T P A A CCCCC K K 55555
110
111
112
113
114 // VIF THU 20 NOV 2025 22:19:29 ** GLOBAL SCOPE ** DIAGNOSTICS PAGE 00002
115
116 // ** linker ** object size 1380160 bytes
117 // ** statistics ** 220 subprograms, no errors, no warnings
118
119
120 // VIF THU 20 NOV 2025 22:19:29 ** GLOBAL SCOPE ** JOB CONTROL PAGE 00003
121
122
123 // Line JCL *...*....1....|....2....|....3....|....4....|....5....|....6....|....7..*.|....8
124
125
126
127 // VIF THU 20 NOV 2025 22:19:29 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00004
128
129 /*
130 Generated by VIF - experimental VIntage Fortran compiler.
131 VIF release 1.4.1
132 */
133
134 #if defined (__GNUC__)
135 #pragma GCC diagnostic ignored "-Wimplicit-function-declaration"
136 #pragma GCC diagnostic ignored "-Wincompatible-pointer-types"
137 #if (__GNUC__ >= 14)
138 #pragma GCC diagnostic ignored "-Wdeclaration-missing-parameter-type"
139 #pragma GCC diagnostic ignored "-Wimplicit-int"
140 #pragma GCC diagnostic ignored "-Wint-conversion"
141 #pragma GCC diagnostic ignored "-Wreturn-mismatch"
142 #endif
143 #else
144 #error VIF requires GCC
145 #endif
146
147 #include <vif.h>
148
149 static int_4 _km1 = -1, _k0 = 0, _k1 = 1;
150
151
152 #define _dc_0 "DCFFT1B "
153 #define _dc_1 "DCFFT1F "
154 #define _dc_2 "DCFFTMI "
155 #define _dc_3 "DCFFT2B"
156 #define _dc_4 "DCFFT2F"
157 #define _dc_5 "DCFFT2I"
158 #define _dc_6 "DCFFTMB "
159 #define _dc_7 "DCFFTMF "
160 #define _dc_8 "DCOSQ1B"
161 #define _dc_9 "DCOSQ1F"
162 #define _dc_10 "DCOSQ1I"
163 #define _dc_11 "DCOSQB1"
164 #define _dc_12 "DCOSQF1"
165 #define _dc_13 "DCOSQMB"
166 #define _dc_14 "DCOSQMF"
167 #define _dc_15 "DCOSQMI"
168 #define _dc_16 "DCOST1B"
169 #define _dc_17 "DCOST1F"
170 #define _dc_18 "DCOST1I"
171 #define _dc_19 "DCOSTB1"
172 #define _dc_20 "DCOSTF1"
173 #define _dc_21 "DCOSTMB"
174 #define _dc_22 "DCOSTMF"
175 #define _dc_23 "DCOSTMI"
176 #define _dc_24 "DMCSQB1"
177 #define _dc_25 "DMCSQF1"
178 #define _dc_26 "DMCSTB1"
179 #define _dc_27 "DMCSTF1"
180 #define _dc_28 "DMSNTB1"
181 #define _dc_29 "DMSNTF1"
182 // VIF THU 20 NOV 2025 22:19:29 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00005
183
184 #define _dc_30 "DRFFT1B "
185 #define _dc_31 "DRFFT1F "
186 #define _dc_32 "DRFFT1I "
187 #define _dc_33 "DRFFT2F"
188 #define _dc_34 "DRFFT2B"
189 #define _dc_35 "DRFFT2I"
190 #define _dc_36 "DRFFTMB "
191 #define _dc_37 "DRFFTMF "
192 #define _dc_38 "DRFFTMI "
193 #define _dc_39 "DSINQ1B"
194 #define _dc_40 "DSINQ1F"
195 #define _dc_41 "DSINQ1I"
196 #define _dc_42 "DSINQMB"
197 #define _dc_43 "DSINQMF"
198 #define _dc_44 "DSINQMI"
199 #define _dc_45 "DSINT1B"
200 #define _dc_46 "DSINT1F"
201 #define _dc_47 "DSINT1I"
202 #define _dc_48 "DSINTB1"
203 #define _dc_49 "DSINTF1"
204 #define _dc_50 "DSINTMB"
205 #define _dc_51 "DSINTMF"
206 #define _dc_52 "DSINTMI"
207 #define _dc_53 " ** On entry to "
208 #define _dc_54 " parameter number "
209 #define _dc_55 " had an illegal value"
210 #define _dc_56 " parameters LOT, JUMP, N and INC are inconsistent"
211 #define _dc_57 " parameter L is greater than LDIM"
212 #define _dc_58 " parameter M is greater than MDIM"
213 #define _dc_59 " ** Within "
214 #define _dc_60 " input error returned by lower level routine"
215 #define _dc_61 " parameter LDIM is less than 2*(L/2+1)"
216 #define _dc_62 "CFFT1B "
217 #define _dc_63 "CFFT1F "
218 #define _dc_64 "CFFTMI "
219 #define _dc_65 "CFFT2B"
220 #define _dc_66 "CFFT2F"
221 #define _dc_67 "CFFT2I"
222 #define _dc_68 "CFFTMB "
223 #define _dc_69 "CFFTMF "
224 #define _dc_70 "COSQ1B"
225 #define _dc_71 "COSQ1F"
226 #define _dc_72 "COSQ1I"
227 #define _dc_73 "COSQB1"
228 #define _dc_74 "COSQF1"
229 #define _dc_75 "COSQMB"
230 #define _dc_76 "COSQMF"
231 #define _dc_77 "COSQMI"
232 #define _dc_78 "COST1B"
233 #define _dc_79 "COST1F"
234 // VIF THU 20 NOV 2025 22:19:29 ** GLOBAL SCOPE ** DEFINITIONS PAGE 00006
235
236 #define _dc_80 "COST1I"
237 #define _dc_81 "COSTB1"
238 #define _dc_82 "COSTF1"
239 #define _dc_83 "COSTMB"
240 #define _dc_84 "COSTMF"
241 #define _dc_85 "COSTMI"
242 #define _dc_86 "MCSQB1"
243 #define _dc_87 "MCSQF1"
244 #define _dc_88 "MCSTB1"
245 #define _dc_89 "MCSTF1"
246 #define _dc_90 "MSNTB1"
247 #define _dc_91 "MSNTF1"
248 #define _dc_92 "RFFT1B "
249 #define _dc_93 "RFFT1F "
250 #define _dc_94 "RFFT1I "
251 #define _dc_95 "RFFT2F"
252 #define _dc_96 "RFFT2B"
253 #define _dc_97 "RFFT2I"
254 #define _dc_98 "RFFTMB "
255 #define _dc_99 "RFFTMF "
256 #define _dc_100 "RFFTMI "
257 #define _dc_101 "SINQ1B"
258 #define _dc_102 "SINQ1F"
259 #define _dc_103 "SINQ1I"
260 #define _dc_104 "SINQMB"
261 #define _dc_105 "SINQMF"
262 #define _dc_106 "SINQMI"
263 #define _dc_107 "SINT1B"
264 #define _dc_108 "SINT1F"
265 #define _dc_109 "SINT1I"
266 #define _dc_110 "SINTB1"
267 #define _dc_111 "SINTF1"
268 #define _dc_112 "SINTMB"
269 #define _dc_113 "SINTMF"
270 #define _dc_114 "SINTMI"
271
272
273
274 // VIF THU 20 NOV 2025 22:19:29 ** GLOBAL SCOPE ** TYPEDEFS PAGE 00007
275
276 static FORMAT *__fmt_a = NULL;
277 typedef char char_7[8];
278 typedef char char_15[16];
279 typedef char char_31[32];
280 typedef char char_63[64];
281
282
283 // VIF THU 20 NOV 2025 22:19:29 ** GLOBAL SCOPE ** FREQUENCY TABLE PAGE 00008
284
285 #define __ncalls 221
286 static CALLS __calls[__ncalls] = {
287 { // ** body not listed **"dc1f2kb", 0}, // subroutine
289 { // ** body not listed **"dc1f3kb", 0}, // subroutine
291 { // ** body not listed **"dc1f4kb", 0}, // subroutine
293 { // ** body not listed **"dc1f5kb", 0}, // subroutine
295 { // ** body not listed **"dc1fgkb", 0}, // subroutine
297 { // ** body not listed **"dc1fm1b", 0}, // subroutine
299 { // ** body not listed **"dcfft1b", 0}, // subroutine
301 { // ** body not listed **"dcfft1i", 0}, // subroutine
303 { // ** body not listed **"dcfft2f", 0}, // subroutine
305 { // ** body not listed **"dcfftmb", 0}, // subroutine
307 { // ** body not listed **"dcfftmi", 0}, // subroutine
309 { // ** body not listed **"dcmf2kf", 0}, // subroutine
311 { // ** body not listed **"dcmf3kf", 0}, // subroutine
313 { // ** body not listed **"dcmf4kf", 0}, // subroutine
315 { // ** body not listed **"dcmf5kf", 0}, // subroutine
317 { // ** body not listed **"dcmfgkf", 0}, // subroutine
319 { // ** body not listed **"dcmfm1f", 0}, // subroutine
321 { // ** body not listed **"dcosq1f", 0}, // subroutine
323 { // ** body not listed **"dcosqb1", 0}, // subroutine
325 { // ** body not listed **"dcosqmb", 0}, // subroutine
327 { // ** body not listed **"dcosqmi", 0}, // subroutine
329 { // ** body not listed **"dcost1f", 0}, // subroutine
331 { // ** body not listed **"dcostb1", 0}, // subroutine
333 { // ** body not listed **"dcostmb", 0}, // subroutine
337 { // ** body not listed **"dcostmi", 0}, // subroutine
339 { // ** body not listed **"dmcfti1", 0}, // subroutine
341 { // ** body not listed **"dmcsqf1", 0}, // subroutine
343 { // ** body not listed **"dmcstf1", 0}, // subroutine
345 { // ** body not listed **"dmradb3", 0}, // subroutine
347 { // ** body not listed **"dmradb5", 0}, // subroutine
349 { // ** body not listed **"dmradf2", 0}, // subroutine
351 { // ** body not listed **"dmradf4", 0}, // subroutine
353 { // ** body not listed **"dmradfg", 0}, // subroutine
355 { // ** body not listed **"dmrftf1", 0}, // subroutine
357 { // ** body not listed **"dmsntb1", 0}, // subroutine
359 { // ** body not listed **"dr1f2kb", 0}, // subroutine
361 { // ** body not listed **"dr1f3kb", 0}, // subroutine
363 { // ** body not listed **"dr1f4kb", 0}, // subroutine
365 { // ** body not listed **"dr1f5kb", 0}, // subroutine
367 { // ** body not listed **"dr1fgkb", 0}, // subroutine
369 { // ** body not listed **"dr2w", 0}, // subroutine
371 { // ** body not listed **"drfft1f", 0}, // subroutine
373 { // ** body not listed **"drfft2b", 0}, // subroutine
375 { // ** body not listed **"drfft2i", 0}, // subroutine
377 { // ** body not listed **"drfftf1", 0}, // subroutine
379 { // ** body not listed **"drfftmb", 0}, // subroutine
381 { // ** body not listed **"drfftmi", 0}, // subroutine
383 { // ** body not listed **"dsinq1f", 0}, // subroutine
385 { // ** body not listed **"dsinqmb", 0}, // subroutine
389 { // ** body not listed **"dsinqmi", 0}, // subroutine
391 { // ** body not listed **"dsint1f", 0}, // subroutine
393 { // ** body not listed **"dsintb1", 0}, // subroutine
395 { // ** body not listed **"dsintmb", 0}, // subroutine
397 { // ** body not listed **"dsintmi", 0}, // subroutine
399 { // ** body not listed **"dw2r", 0}, // subroutine
401 { // ** body not listed **"xerfft", 0}, // subroutine
403 { // ** body not listed **"c1f2kf", 0}, // subroutine
405 { // ** body not listed **"c1f3kf", 0}, // subroutine
407 { // ** body not listed **"c1f4kf", 0}, // subroutine
409 { // ** body not listed **"c1f5kf", 0}, // subroutine
411 { // ** body not listed **"c1fgkf", 0}, // subroutine
413 { // ** body not listed **"c1fm1f", 0}, // subroutine
415 { // ** body not listed **"cfft1f", 0}, // subroutine
417 { // ** body not listed **"cfft2b", 0}, // subroutine
419 { // ** body not listed **"cfft2i", 0}, // subroutine
421 { // ** body not listed **"cfftmf", 0}, // subroutine
423 { // ** body not listed **"cmf2kb", 0}, // subroutine
425 { // ** body not listed **"cmf3kb", 0}, // subroutine
427 { // ** body not listed **"cmf4kb", 0}, // subroutine
429 { // ** body not listed **"cmf5kb", 0}, // subroutine
431 { // ** body not listed **"cmfgkb", 0}, // subroutine
433 { // ** body not listed **"cmfm1b", 0}, // subroutine
435 { // ** body not listed **"cosq1b", 0}, // subroutine
437 { // ** body not listed **"cosq1i", 0}, // subroutine
441 { // ** body not listed **"cosqf1", 0}, // subroutine
443 { // ** body not listed **"cosqmf", 0}, // subroutine
445 { // ** body not listed **"cost1b", 0}, // subroutine
447 { // ** body not listed **"cost1i", 0}, // subroutine
449 { // ** body not listed **"costf1", 0}, // subroutine
451 { // ** body not listed **"costmf", 0}, // subroutine
453 { // ** body not listed **"factor", 0}, // subroutine
455 { // ** body not listed **"mcsqb1", 0}, // subroutine
457 { // ** body not listed **"mcstb1", 0}, // subroutine
459 { // ** body not listed **"mradb2", 0}, // subroutine
461 { // ** body not listed **"mradb4", 0}, // subroutine
463 { // ** body not listed **"mradbg", 0}, // subroutine
465 { // ** body not listed **"mradf3", 0}, // subroutine
467 { // ** body not listed **"mradf5", 0}, // subroutine
469 { // ** body not listed **"mrftb1", 0}, // subroutine
471 { // ** body not listed **"mrfti1", 0}, // subroutine
473 { // ** body not listed **"msntf1", 0}, // subroutine
475 { // ** body not listed **"r1f2kf", 0}, // subroutine
477 { // ** body not listed **"r1f3kf", 0}, // subroutine
479 { // ** body not listed **"r1f4kf", 0}, // subroutine
481 { // ** body not listed **"r1f5kf", 0}, // subroutine
483 { // ** body not listed **"r1fgkf", 0}, // subroutine
485 { // ** body not listed **"rfft1b", 0}, // subroutine
487 { // ** body not listed **"rfft1i", 0}, // subroutine
489 { // ** body not listed **"rfft2f", 0}, // subroutine
493 { // ** body not listed **"rfftb1", 0}, // subroutine
495 { // ** body not listed **"rffti1", 0}, // subroutine
497 { // ** body not listed **"rfftmf", 0}, // subroutine
499 { // ** body not listed **"sinq1b", 0}, // subroutine
501 { // ** body not listed **"sinq1i", 0}, // subroutine
503 { // ** body not listed **"sinqmf", 0}, // subroutine
505 { // ** body not listed **"sint1b", 0}, // subroutine
507 { // ** body not listed **"sint1i", 0}, // subroutine
509 { // ** body not listed **"sintf1", 0}, // subroutine
511 { // ** body not listed **"sintmf", 0}, // subroutine
513 { // ** body not listed **"tables", 0}, // subroutine
515 { // ** body not listed **NULL, 0}
516 };
982 { // ** body not listed **
1036 }
1037
1038 // VIF THU 20 NOV 2025 22:19:29 ** DC1F2KF ** DC1F2KF PAGE 00027
1039
1040 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
1041 // S S U U B B R R O O U U T I NN N E
1042 // S U U B B R R O O U U T I N N N E
1043 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
1044 // S U U B B R R O O U U T I N N N E
1045 // S S U U B B R R O O U U T I N NN E
1046 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
1047
1048 // DDDDDD CCCCC 1 FFFFFFF 22222 K K FFFFFFF
1049 // D D C C 11 F 2 2 K K F
1050 // D D C 1 1 F 2 K K F
1051 // D D C 1 FFFFF 22222 KKK FFFFF
1052 // D D C 1 F 2 K K F
1053 // D D C C 1 F 2 K K F
1054 // DDDDDD CCCCC 11111 F 2222222 K K F
1055
1056
1057 // VIF THU 20 NOV 2025 22:19:29 ** DC1F2KF ** DIAGNOSTICS PAGE 00028
1058
1059
1060 // VIF THU 20 NOV 2025 22:19:29 ** DC1F2KF ** GENERATED CODE PAGE 00029
1061
1062 int_4 _dc1f2kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_
1063 in2_, real_8 _p_ wa_)
1064 { // ** body not listed **
1131 }
1132
1133 // VIF THU 20 NOV 2025 22:19:29 ** DC1F3KB ** DC1F3KB PAGE 00031
1134
1135 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
1136 // S S U U B B R R O O U U T I NN N E
1137 // S U U B B R R O O U U T I N N N E
1138 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
1139 // S U U B B R R O O U U T I N N N E
1140 // S S U U B B R R O O U U T I N NN E
1141 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
1142
1143 // DDDDDD CCCCC 1 FFFFFFF 33333 K K BBBBBB
1144 // D D C C 11 F 3 3 K K B B
1145 // D D C 1 1 F 3 K K B B
1146 // D D C 1 FFFFF 33333 KKK BBBBBB
1147 // D D C 1 F 3 K K B B
1148 // D D C C 1 F 3 3 K K B B
1149 // DDDDDD CCCCC 11111 F 33333 K K BBBBBB
1150
1151
1152 // VIF THU 20 NOV 2025 22:19:29 ** DC1F3KB ** DIAGNOSTICS PAGE 00032
1153
1154
1155 // VIF THU 20 NOV 2025 22:19:29 ** DC1F3KB ** GENERATED CODE PAGE 00033
1156
1157 int_4 _dc1f3kb (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_
1158 in2_, real_8 _p_ wa_)
1159 { // ** body not listed **
1266 }
1267
1268 // VIF THU 20 NOV 2025 22:19:29 ** DC1F3KF ** DC1F3KF PAGE 00036
1269
1270 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
1271 // S S U U B B R R O O U U T I NN N E
1272 // S U U B B R R O O U U T I N N N E
1273 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
1274 // S U U B B R R O O U U T I N N N E
1275 // S S U U B B R R O O U U T I N NN E
1276 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
1277
1278 // DDDDDD CCCCC 1 FFFFFFF 33333 K K FFFFFFF
1279 // D D C C 11 F 3 3 K K F
1280 // D D C 1 1 F 3 K K F
1281 // D D C 1 FFFFF 33333 KKK FFFFF
1282 // D D C 1 F 3 K K F
1283 // D D C C 1 F 3 3 K K F
1284 // DDDDDD CCCCC 11111 F 33333 K K F
1285
1286
1287 // VIF THU 20 NOV 2025 22:19:29 ** DC1F3KF ** DIAGNOSTICS PAGE 00037
1288
1289
1290 // VIF THU 20 NOV 2025 22:19:29 ** DC1F3KF ** GENERATED CODE PAGE 00038
1291
1292 int_4 _dc1f3kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_
1293 in2_, real_8 _p_ wa_)
1294 { // ** body not listed **
1424 }
1425
1426 // VIF THU 20 NOV 2025 22:19:29 ** DC1F4KB ** DC1F4KB PAGE 00041
1427
1428 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
1429 // S S U U B B R R O O U U T I NN N E
1430 // S U U B B R R O O U U T I N N N E
1431 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
1432 // S U U B B R R O O U U T I N N N E
1433 // S S U U B B R R O O U U T I N NN E
1434 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
1435
1436 // DDDDDD CCCCC 1 FFFFFFF 4 K K BBBBBB
1437 // D D C C 11 F 4 4 K K B B
1438 // D D C 1 1 F 4 4 K K B B
1439 // D D C 1 FFFFF 4444444 KKK BBBBBB
1440 // D D C 1 F 4 K K B B
1441 // D D C C 1 F 4 K K B B
1442 // DDDDDD CCCCC 11111 F 4 K K BBBBBB
1443
1444
1445 // VIF THU 20 NOV 2025 22:19:29 ** DC1F4KB ** DIAGNOSTICS PAGE 00042
1446
1447
1448 // VIF THU 20 NOV 2025 22:19:29 ** DC1F4KB ** GENERATED CODE PAGE 00043
1449
1450 int_4 _dc1f4kb (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_
1451 in2_, real_8 _p_ wa_)
1452 { // ** body not listed **
1562 }
1563
1564 // VIF THU 20 NOV 2025 22:19:29 ** DC1F4KF ** DC1F4KF PAGE 00046
1565
1566 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
1567 // S S U U B B R R O O U U T I NN N E
1568 // S U U B B R R O O U U T I N N N E
1569 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
1570 // S U U B B R R O O U U T I N N N E
1571 // S S U U B B R R O O U U T I N NN E
1572 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
1573
1574 // DDDDDD CCCCC 1 FFFFFFF 4 K K FFFFFFF
1575 // D D C C 11 F 4 4 K K F
1576 // D D C 1 1 F 4 4 K K F
1577 // D D C 1 FFFFF 4444444 KKK FFFFF
1578 // D D C 1 F 4 K K F
1579 // D D C C 1 F 4 K K F
1580 // DDDDDD CCCCC 11111 F 4 K K F
1581
1582
1583 // VIF THU 20 NOV 2025 22:19:29 ** DC1F4KF ** DIAGNOSTICS PAGE 00047
1584
1585
1586 // VIF THU 20 NOV 2025 22:19:29 ** DC1F4KF ** GENERATED CODE PAGE 00048
1587
1588 int_4 _dc1f4kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_
1589 in2_, real_8 _p_ wa_)
1590 { // ** body not listed **
1729 }
1730
1731 // VIF THU 20 NOV 2025 22:19:29 ** DC1F5KB ** DC1F5KB PAGE 00051
1732
1733 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
1734 // S S U U B B R R O O U U T I NN N E
1735 // S U U B B R R O O U U T I N N N E
1736 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
1737 // S U U B B R R O O U U T I N N N E
1738 // S S U U B B R R O O U U T I N NN E
1739 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
1740
1741 // DDDDDD CCCCC 1 FFFFFFF 5555555 K K BBBBBB
1742 // D D C C 11 F 5 K K B B
1743 // D D C 1 1 F 5 K K B B
1744 // D D C 1 FFFFF 55555 KKK BBBBBB
1745 // D D C 1 F 5 K K B B
1746 // D D C C 1 F 5 5 K K B B
1747 // DDDDDD CCCCC 11111 F 55555 K K BBBBBB
1748
1749
1750 // VIF THU 20 NOV 2025 22:19:29 ** DC1F5KB ** DIAGNOSTICS PAGE 00052
1751
1752
1753 // VIF THU 20 NOV 2025 22:19:29 ** DC1F5KB ** GENERATED CODE PAGE 00053
1754
1755 int_4 _dc1f5kb (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_
1756 in2_, real_8 _p_ wa_)
1757 { // ** body not listed **
1941 }
1942
1943 // VIF THU 20 NOV 2025 22:19:29 ** DC1F5KF ** DC1F5KF PAGE 00057
1944
1945 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
1946 // S S U U B B R R O O U U T I NN N E
1947 // S U U B B R R O O U U T I N N N E
1948 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
1949 // S U U B B R R O O U U T I N N N E
1950 // S S U U B B R R O O U U T I N NN E
1951 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
1952
1953 // DDDDDD CCCCC 1 FFFFFFF 5555555 K K FFFFFFF
1954 // D D C C 11 F 5 K K F
1955 // D D C 1 1 F 5 K K F
1956 // D D C 1 FFFFF 55555 KKK FFFFF
1957 // D D C 1 F 5 K K F
1958 // D D C C 1 F 5 5 K K F
1959 // DDDDDD CCCCC 11111 F 55555 K K F
1960
1961
1962 // VIF THU 20 NOV 2025 22:19:29 ** DC1F5KF ** DIAGNOSTICS PAGE 00058
1963
1964
1965 // VIF THU 20 NOV 2025 22:19:29 ** DC1F5KF ** GENERATED CODE PAGE 00059
1966
1967 int_4 _dc1f5kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_
1968 in2_, real_8 _p_ wa_)
1969 { // ** body not listed **
2196 }
2197
2198 // VIF THU 20 NOV 2025 22:19:29 ** DC1FGKB ** DC1FGKB PAGE 00064
2199
2200 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2201 // S S U U B B R R O O U U T I NN N E
2202 // S U U B B R R O O U U T I N N N E
2203 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2204 // S U U B B R R O O U U T I N N N E
2205 // S S U U B B R R O O U U T I N NN E
2206 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2207
2208 // DDDDDD CCCCC 1 FFFFFFF GGGGG K K BBBBBB
2209 // D D C C 11 F G G K K B B
2210 // D D C 1 1 F G K K B B
2211 // D D C 1 FFFFF G GGGG KKK BBBBBB
2212 // D D C 1 F G G K K B B
2213 // D D C C 1 F G G K K B B
2214 // DDDDDD CCCCC 11111 F GGGGG K K BBBBBB
2215
2216
2217 // VIF THU 20 NOV 2025 22:19:29 ** DC1FGKB ** DIAGNOSTICS PAGE 00065
2218
2219
2220 // VIF THU 20 NOV 2025 22:19:29 ** DC1FGKB ** GENERATED CODE PAGE 00066
2221
2222 int_4 _dc1fgkb (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_8 _p_ cc_, real_8 _p_
2223 cc1_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch1_, int_4 _p_ in2_, real_8 _p_ wa_)
2224 { // ** body not listed **
2360 }
2361
2362 // VIF THU 20 NOV 2025 22:19:29 ** DC1FGKF ** DC1FGKF PAGE 00069
2363
2364 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2365 // S S U U B B R R O O U U T I NN N E
2366 // S U U B B R R O O U U T I N N N E
2367 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2368 // S U U B B R R O O U U T I N N N E
2369 // S S U U B B R R O O U U T I N NN E
2370 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2371
2372 // DDDDDD CCCCC 1 FFFFFFF GGGGG K K FFFFFFF
2373 // D D C C 11 F G G K K F
2374 // D D C 1 1 F G K K F
2375 // D D C 1 FFFFF G GGGG KKK FFFFF
2376 // D D C 1 F G G K K F
2377 // D D C C 1 F G G K K F
2378 // DDDDDD CCCCC 11111 F GGGGG K K F
2379
2380
2381 // VIF THU 20 NOV 2025 22:19:29 ** DC1FGKF ** DIAGNOSTICS PAGE 00070
2382
2383
2384 // VIF THU 20 NOV 2025 22:19:29 ** DC1FGKF ** GENERATED CODE PAGE 00071
2385
2386 int_4 _dc1fgkf (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_8 _p_ cc_, real_8 _p_
2387 cc1_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch1_, int_4 _p_ in2_, real_8 _p_ wa_)
2388 { // ** body not listed **
2550 }
2551
2552 // VIF THU 20 NOV 2025 22:19:29 ** DC1FM1B ** DC1FM1B PAGE 00075
2553
2554 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2555 // S S U U B B R R O O U U T I NN N E
2556 // S U U B B R R O O U U T I N N N E
2557 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2558 // S U U B B R R O O U U T I N N N E
2559 // S S U U B B R R O O U U T I N NN E
2560 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2561
2562 // DDDDDD CCCCC 1 FFFFFFF M M 1 BBBBBB
2563 // D D C C 11 F MM MM 11 B B
2564 // D D C 1 1 F M M M M 1 1 B B
2565 // D D C 1 FFFFF M M M 1 BBBBBB
2566 // D D C 1 F M M 1 B B
2567 // D D C C 1 F M M 1 B B
2568 // DDDDDD CCCCC 11111 F M M 11111 BBBBBB
2569
2570
2571 // VIF THU 20 NOV 2025 22:19:29 ** DC1FM1B ** DIAGNOSTICS PAGE 00076
2572
2573
2574 // VIF THU 20 NOV 2025 22:19:29 ** DC1FM1B ** GENERATED CODE PAGE 00077
2575
2576 int_4 _dc1fm1b (int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, real_8 _p_ ch_, real_8 _p_ wa_, real_4 _p_ fnf_,
2577 real_8 _p_ fac_)
2578 { // ** body not listed **
2645 }
2646
2647 // VIF THU 20 NOV 2025 22:19:29 ** DC1FM1F ** DC1FM1F PAGE 00079
2648
2649 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2650 // S S U U B B R R O O U U T I NN N E
2651 // S U U B B R R O O U U T I N N N E
2652 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2653 // S U U B B R R O O U U T I N N N E
2654 // S S U U B B R R O O U U T I N NN E
2655 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2656
2657 // DDDDDD CCCCC 1 FFFFFFF M M 1 FFFFFFF
2658 // D D C C 11 F MM MM 11 F
2659 // D D C 1 1 F M M M M 1 1 F
2660 // D D C 1 FFFFF M M M 1 FFFFF
2661 // D D C 1 F M M 1 F
2662 // D D C C 1 F M M 1 F
2663 // DDDDDD CCCCC 11111 F M M 11111 F
2664
2665
2666 // VIF THU 20 NOV 2025 22:19:29 ** DC1FM1F ** DIAGNOSTICS PAGE 00080
2667
2668
2669 // VIF THU 20 NOV 2025 22:19:29 ** DC1FM1F ** GENERATED CODE PAGE 00081
2670
2671 int_4 _dc1fm1f (int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, real_8 _p_ ch_, real_8 _p_ wa_, real_4 _p_ fnf_,
2672 real_8 _p_ fac_)
2673 { // ** body not listed **
2740 }
2741
2742 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1B ** DCFFT1B PAGE 00083
2743
2744 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2745 // S S U U B B R R O O U U T I NN N E
2746 // S U U B B R R O O U U T I N N N E
2747 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2748 // S U U B B R R O O U U T I N N N E
2749 // S S U U B B R R O O U U T I N NN E
2750 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2751
2752 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT 1 BBBBBB
2753 // D D C C F F T 11 B B
2754 // D D C F F T 1 1 B B
2755 // D D C FFFFF FFFFF T 1 BBBBBB
2756 // D D C F F T 1 B B
2757 // D D C C F F T 1 B B
2758 // DDDDDD CCCCC F F T 11111 BBBBBB
2759
2760
2761 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1B ** DIAGNOSTICS PAGE 00084
2762
2763
2764 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1B ** GENERATED CODE PAGE 00085
2765
2766 int_4 _dcfft1b (int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, int_4 _p_ lenc_, real_8 _p_ wsave_, int_4 _p_ lensav_,
2767 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
2768 { // ** body not listed **
2793 }
2794
2795 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1F ** DCFFT1F PAGE 00086
2796
2797 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2798 // S S U U B B R R O O U U T I NN N E
2799 // S U U B B R R O O U U T I N N N E
2800 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2801 // S U U B B R R O O U U T I N N N E
2802 // S S U U B B R R O O U U T I N NN E
2803 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2804
2805 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT 1 FFFFFFF
2806 // D D C C F F T 11 F
2807 // D D C F F T 1 1 F
2808 // D D C FFFFF FFFFF T 1 FFFFF
2809 // D D C F F T 1 F
2810 // D D C C F F T 1 F
2811 // DDDDDD CCCCC F F T 11111 F
2812
2813
2814 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1F ** DIAGNOSTICS PAGE 00087
2815
2816
2817 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1F ** GENERATED CODE PAGE 00088
2818
2819 int_4 _dcfft1f (int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, int_4 _p_ lenc_, real_8 _p_ wsave_, int_4 _p_ lensav_,
2820 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
2821 { // ** body not listed **
2846 }
2847
2848 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1I ** DCFFT1I PAGE 00089
2849
2850 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2851 // S S U U B B R R O O U U T I NN N E
2852 // S U U B B R R O O U U T I N N N E
2853 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2854 // S U U B B R R O O U U T I N N N E
2855 // S S U U B B R R O O U U T I N NN E
2856 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2857
2858 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT 1 III
2859 // D D C C F F T 11 I
2860 // D D C F F T 1 1 I
2861 // D D C FFFFF FFFFF T 1 I
2862 // D D C F F T 1 I
2863 // D D C C F F T 1 I
2864 // DDDDDD CCCCC F F T 11111 III
2865
2866
2867 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1I ** DIAGNOSTICS PAGE 00090
2868
2869
2870 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT1I ** GENERATED CODE PAGE 00091
2871
2872 int_4 _dcfft1i (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
2873 { // ** body not listed **
2890 }
2891
2892 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2B ** DCFFT2B PAGE 00092
2893
2894 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2895 // S S U U B B R R O O U U T I NN N E
2896 // S U U B B R R O O U U T I N N N E
2897 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2898 // S U U B B R R O O U U T I N N N E
2899 // S S U U B B R R O O U U T I N NN E
2900 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2901
2902 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT 22222 BBBBBB
2903 // D D C C F F T 2 2 B B
2904 // D D C F F T 2 B B
2905 // D D C FFFFF FFFFF T 22222 BBBBBB
2906 // D D C F F T 2 B B
2907 // D D C C F F T 2 B B
2908 // DDDDDD CCCCC F F T 2222222 BBBBBB
2909
2910
2911 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2B ** DIAGNOSTICS PAGE 00093
2912
2913
2914 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2B ** GENERATED CODE PAGE 00094
2915
2916 int_4 _dcfft2b (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, complex_16 _p_ c_, real_8 _p_ wsave_, int_4 _p_ lensav_,
2917 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
2918 { // ** body not listed **
2962 }
2963
2964 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2F ** DCFFT2F PAGE 00095
2965
2966 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
2967 // S S U U B B R R O O U U T I NN N E
2968 // S U U B B R R O O U U T I N N N E
2969 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
2970 // S U U B B R R O O U U T I N N N E
2971 // S S U U B B R R O O U U T I N NN E
2972 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
2973
2974 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT 22222 FFFFFFF
2975 // D D C C F F T 2 2 F
2976 // D D C F F T 2 F
2977 // D D C FFFFF FFFFF T 22222 FFFFF
2978 // D D C F F T 2 F
2979 // D D C C F F T 2 F
2980 // DDDDDD CCCCC F F T 2222222 F
2981
2982
2983 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2F ** DIAGNOSTICS PAGE 00096
2984
2985
2986 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2F ** GENERATED CODE PAGE 00097
2987
2988 int_4 _dcfft2f (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, complex_16 _p_ c_, real_8 _p_ wsave_, int_4 _p_ lensav_,
2989 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
2990 { // ** body not listed **
3034 }
3035
3036 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2I ** DCFFT2I PAGE 00098
3037
3038 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3039 // S S U U B B R R O O U U T I NN N E
3040 // S U U B B R R O O U U T I N N N E
3041 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3042 // S U U B B R R O O U U T I N N N E
3043 // S S U U B B R R O O U U T I N NN E
3044 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3045
3046 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT 22222 III
3047 // D D C C F F T 2 2 I
3048 // D D C F F T 2 I
3049 // D D C FFFFF FFFFF T 22222 I
3050 // D D C F F T 2 I
3051 // D D C C F F T 2 I
3052 // DDDDDD CCCCC F F T 2222222 III
3053
3054
3055 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2I ** DIAGNOSTICS PAGE 00099
3056
3057
3058 // VIF THU 20 NOV 2025 22:19:29 ** DCFFT2I ** GENERATED CODE PAGE 00100
3059
3060 int_4 _dcfft2i (int_4 _p_ l_, int_4 _p_ m_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
3061 { // ** body not listed **
3090 }
3091
3092 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMB ** DCFFTMB PAGE 00101
3093
3094 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3095 // S S U U B B R R O O U U T I NN N E
3096 // S U U B B R R O O U U T I N N N E
3097 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3098 // S U U B B R R O O U U T I N N N E
3099 // S S U U B B R R O O U U T I N NN E
3100 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3101
3102 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT M M BBBBBB
3103 // D D C C F F T MM MM B B
3104 // D D C F F T M M M M B B
3105 // D D C FFFFF FFFFF T M M M BBBBBB
3106 // D D C F F T M M B B
3107 // D D C C F F T M M B B
3108 // DDDDDD CCCCC F F T M M BBBBBB
3109
3110
3111 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMB ** DIAGNOSTICS PAGE 00102
3112
3113
3114 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMB ** GENERATED CODE PAGE 00103
3115
3116 int_4 _dcfftmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, int_4 _p_ lenc_,
3117 real_8 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
3118 { // ** body not listed **
3147 }
3148
3149 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMF ** DCFFTMF PAGE 00104
3150
3151 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3152 // S S U U B B R R O O U U T I NN N E
3153 // S U U B B R R O O U U T I N N N E
3154 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3155 // S U U B B R R O O U U T I N N N E
3156 // S S U U B B R R O O U U T I N NN E
3157 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3158
3159 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT M M FFFFFFF
3160 // D D C C F F T MM MM F
3161 // D D C F F T M M M M F
3162 // D D C FFFFF FFFFF T M M M FFFFF
3163 // D D C F F T M M F
3164 // D D C C F F T M M F
3165 // DDDDDD CCCCC F F T M M F
3166
3167
3168 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMF ** DIAGNOSTICS PAGE 00105
3169
3170
3171 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMF ** GENERATED CODE PAGE 00106
3172
3173 int_4 _dcfftmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, int_4 _p_ lenc_,
3174 real_8 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
3175 { // ** body not listed **
3204 }
3205
3206 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMI ** DCFFTMI PAGE 00107
3207
3208 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3209 // S S U U B B R R O O U U T I NN N E
3210 // S U U B B R R O O U U T I N N N E
3211 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3212 // S U U B B R R O O U U T I N N N E
3213 // S S U U B B R R O O U U T I N NN E
3214 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3215
3216 // DDDDDD CCCCC FFFFFFF FFFFFFF TTTTTTT M M III
3217 // D D C C F F T MM MM I
3218 // D D C F F T M M M M I
3219 // D D C FFFFF FFFFF T M M M I
3220 // D D C F F T M M I
3221 // D D C C F F T M M I
3222 // DDDDDD CCCCC F F T M M III
3223
3224
3225 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMI ** DIAGNOSTICS PAGE 00108
3226
3227
3228 // VIF THU 20 NOV 2025 22:19:29 ** DCFFTMI ** GENERATED CODE PAGE 00109
3229
3230 int_4 _dcfftmi (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
3231 { // ** body not listed **
3248 }
3249
3250 // VIF THU 20 NOV 2025 22:19:29 ** DCMF2KB ** DCMF2KB PAGE 00110
3251
3252 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3253 // S S U U B B R R O O U U T I NN N E
3254 // S U U B B R R O O U U T I N N N E
3255 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3256 // S U U B B R R O O U U T I N N N E
3257 // S S U U B B R R O O U U T I N NN E
3258 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3259
3260 // DDDDDD CCCCC M M FFFFFFF 22222 K K BBBBBB
3261 // D D C C MM MM F 2 2 K K B B
3262 // D D C M M M M F 2 K K B B
3263 // D D C M M M FFFFF 22222 KKK BBBBBB
3264 // D D C M M F 2 K K B B
3265 // D D C C M M F 2 K K B B
3266 // DDDDDD CCCCC M M F 2222222 K K BBBBBB
3267
3268
3269 // VIF THU 20 NOV 2025 22:19:29 ** DCMF2KB ** DIAGNOSTICS PAGE 00111
3270
3271
3272 // VIF THU 20 NOV 2025 22:19:29 ** DCMF2KB ** GENERATED CODE PAGE 00112
3273
3274 int_4 _dcmf2kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
3275 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
3276 { // ** body not listed **
3350 }
3351
3352 // VIF THU 20 NOV 2025 22:19:29 ** DCMF2KF ** DCMF2KF PAGE 00114
3353
3354 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3355 // S S U U B B R R O O U U T I NN N E
3356 // S U U B B R R O O U U T I N N N E
3357 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3358 // S U U B B R R O O U U T I N N N E
3359 // S S U U B B R R O O U U T I N NN E
3360 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3361
3362 // DDDDDD CCCCC M M FFFFFFF 22222 K K FFFFFFF
3363 // D D C C MM MM F 2 2 K K F
3364 // D D C M M M M F 2 K K F
3365 // D D C M M M FFFFF 22222 KKK FFFFF
3366 // D D C M M F 2 K K F
3367 // D D C C M M F 2 K K F
3368 // DDDDDD CCCCC M M F 2222222 K K F
3369
3370
3371 // VIF THU 20 NOV 2025 22:19:29 ** DCMF2KF ** DIAGNOSTICS PAGE 00115
3372
3373
3374 // VIF THU 20 NOV 2025 22:19:29 ** DCMF2KF ** GENERATED CODE PAGE 00116
3375
3376 int_4 _dcmf2kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
3377 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
3378 { // ** body not listed **
3473 }
3474
3475 // VIF THU 20 NOV 2025 22:19:29 ** DCMF3KB ** DCMF3KB PAGE 00118
3476
3477 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3478 // S S U U B B R R O O U U T I NN N E
3479 // S U U B B R R O O U U T I N N N E
3480 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3481 // S U U B B R R O O U U T I N N N E
3482 // S S U U B B R R O O U U T I N NN E
3483 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3484
3485 // DDDDDD CCCCC M M FFFFFFF 33333 K K BBBBBB
3486 // D D C C MM MM F 3 3 K K B B
3487 // D D C M M M M F 3 K K B B
3488 // D D C M M M FFFFF 33333 KKK BBBBBB
3489 // D D C M M F 3 K K B B
3490 // D D C C M M F 3 3 K K B B
3491 // DDDDDD CCCCC M M F 33333 K K BBBBBB
3492
3493
3494 // VIF THU 20 NOV 2025 22:19:29 ** DCMF3KB ** DIAGNOSTICS PAGE 00119
3495
3496
3497 // VIF THU 20 NOV 2025 22:19:29 ** DCMF3KB ** GENERATED CODE PAGE 00120
3498
3499 int_4 _dcmf3kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
3500 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
3501 { // ** body not listed **
3620 }
3621
3622 // VIF THU 20 NOV 2025 22:19:29 ** DCMF3KF ** DCMF3KF PAGE 00123
3623
3624 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3625 // S S U U B B R R O O U U T I NN N E
3626 // S U U B B R R O O U U T I N N N E
3627 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3628 // S U U B B R R O O U U T I N N N E
3629 // S S U U B B R R O O U U T I N NN E
3630 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3631
3632 // DDDDDD CCCCC M M FFFFFFF 33333 K K FFFFFFF
3633 // D D C C MM MM F 3 3 K K F
3634 // D D C M M M M F 3 K K F
3635 // D D C M M M FFFFF 33333 KKK FFFFF
3636 // D D C M M F 3 K K F
3637 // D D C C M M F 3 3 K K F
3638 // DDDDDD CCCCC M M F 33333 K K F
3639
3640
3641 // VIF THU 20 NOV 2025 22:19:29 ** DCMF3KF ** DIAGNOSTICS PAGE 00124
3642
3643
3644 // VIF THU 20 NOV 2025 22:19:29 ** DCMF3KF ** GENERATED CODE PAGE 00125
3645
3646 int_4 _dcmf3kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
3647 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
3648 { // ** body not listed **
3794 }
3795
3796 // VIF THU 20 NOV 2025 22:19:29 ** DCMF4KB ** DCMF4KB PAGE 00128
3797
3798 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3799 // S S U U B B R R O O U U T I NN N E
3800 // S U U B B R R O O U U T I N N N E
3801 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3802 // S U U B B R R O O U U T I N N N E
3803 // S S U U B B R R O O U U T I N NN E
3804 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3805
3806 // DDDDDD CCCCC M M FFFFFFF 4 K K BBBBBB
3807 // D D C C MM MM F 4 4 K K B B
3808 // D D C M M M M F 4 4 K K B B
3809 // D D C M M M FFFFF 4444444 KKK BBBBBB
3810 // D D C M M F 4 K K B B
3811 // D D C C M M F 4 K K B B
3812 // DDDDDD CCCCC M M F 4 K K BBBBBB
3813
3814
3815 // VIF THU 20 NOV 2025 22:19:29 ** DCMF4KB ** DIAGNOSTICS PAGE 00129
3816
3817
3818 // VIF THU 20 NOV 2025 22:19:29 ** DCMF4KB ** GENERATED CODE PAGE 00130
3819
3820 int_4 _dcmf4kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
3821 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
3822 { // ** body not listed **
3944 }
3945
3946 // VIF THU 20 NOV 2025 22:19:29 ** DCMF4KF ** DCMF4KF PAGE 00133
3947
3948 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
3949 // S S U U B B R R O O U U T I NN N E
3950 // S U U B B R R O O U U T I N N N E
3951 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
3952 // S U U B B R R O O U U T I N N N E
3953 // S S U U B B R R O O U U T I N NN E
3954 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
3955
3956 // DDDDDD CCCCC M M FFFFFFF 4 K K FFFFFFF
3957 // D D C C MM MM F 4 4 K K F
3958 // D D C M M M M F 4 4 K K F
3959 // D D C M M M FFFFF 4444444 KKK FFFFF
3960 // D D C M M F 4 K K F
3961 // D D C C M M F 4 K K F
3962 // DDDDDD CCCCC M M F 4 K K F
3963
3964
3965 // VIF THU 20 NOV 2025 22:19:29 ** DCMF4KF ** DIAGNOSTICS PAGE 00134
3966
3967
3968 // VIF THU 20 NOV 2025 22:19:29 ** DCMF4KF ** GENERATED CODE PAGE 00135
3969
3970 int_4 _dcmf4kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
3971 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
3972 { // ** body not listed **
4129 }
4130
4131 // VIF THU 20 NOV 2025 22:19:29 ** DCMF5KB ** DCMF5KB PAGE 00139
4132
4133 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
4134 // S S U U B B R R O O U U T I NN N E
4135 // S U U B B R R O O U U T I N N N E
4136 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
4137 // S U U B B R R O O U U T I N N N E
4138 // S S U U B B R R O O U U T I N NN E
4139 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
4140
4141 // DDDDDD CCCCC M M FFFFFFF 5555555 K K BBBBBB
4142 // D D C C MM MM F 5 K K B B
4143 // D D C M M M M F 5 K K B B
4144 // D D C M M M FFFFF 55555 KKK BBBBBB
4145 // D D C M M F 5 K K B B
4146 // D D C C M M F 5 5 K K B B
4147 // DDDDDD CCCCC M M F 55555 K K BBBBBB
4148
4149
4150 // VIF THU 20 NOV 2025 22:19:29 ** DCMF5KB ** DIAGNOSTICS PAGE 00140
4151
4152
4153 // VIF THU 20 NOV 2025 22:19:29 ** DCMF5KB ** GENERATED CODE PAGE 00141
4154
4155 int_4 _dcmf5kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
4156 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
4157 { // ** body not listed **
4367 }
4368
4369 // VIF THU 20 NOV 2025 22:19:29 ** DCMF5KF ** DCMF5KF PAGE 00146
4370
4371 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
4372 // S S U U B B R R O O U U T I NN N E
4373 // S U U B B R R O O U U T I N N N E
4374 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
4375 // S U U B B R R O O U U T I N N N E
4376 // S S U U B B R R O O U U T I N NN E
4377 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
4378
4379 // DDDDDD CCCCC M M FFFFFFF 5555555 K K FFFFFFF
4380 // D D C C MM MM F 5 K K F
4381 // D D C M M M M F 5 K K F
4382 // D D C M M M FFFFF 55555 KKK FFFFF
4383 // D D C M M F 5 K K F
4384 // D D C C M M F 5 5 K K F
4385 // DDDDDD CCCCC M M F 55555 K K F
4386
4387
4388 // VIF THU 20 NOV 2025 22:19:29 ** DCMF5KF ** DIAGNOSTICS PAGE 00147
4389
4390
4391 // VIF THU 20 NOV 2025 22:19:29 ** DCMF5KF ** GENERATED CODE PAGE 00148
4392
4393 int_4 _dcmf5kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_
4394 in1_, real_8 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa_)
4395 { // ** body not listed **
4658 }
4659
4660 // VIF THU 20 NOV 2025 22:19:29 ** DCMFGKB ** DCMFGKB PAGE 00154
4661
4662 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
4663 // S S U U B B R R O O U U T I NN N E
4664 // S U U B B R R O O U U T I N N N E
4665 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
4666 // S U U B B R R O O U U T I N N N E
4667 // S S U U B B R R O O U U T I N NN E
4668 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
4669
4670 // DDDDDD CCCCC M M FFFFFFF GGGGG K K BBBBBB
4671 // D D C C MM MM F G G K K B B
4672 // D D C M M M M F G K K B B
4673 // D D C M M M FFFFF G GGGG KKK BBBBBB
4674 // D D C M M F G G K K B B
4675 // D D C C M M F G G K K B B
4676 // DDDDDD CCCCC M M F GGGGG K K BBBBBB
4677
4678
4679 // VIF THU 20 NOV 2025 22:19:29 ** DCMFGKB ** DIAGNOSTICS PAGE 00155
4680
4681
4682 // VIF THU 20 NOV 2025 22:19:29 ** DCMFGKB ** GENERATED CODE PAGE 00156
4683
4684 int_4 _dcmfgkb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_8 _p_
4685 cc_, real_8 _p_ cc1_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch1_, int_4 _p_ im2_, int_4 _p_ in2_,
4686 real_8 _p_ wa_)
4687 { // ** body not listed **
4889 }
4890 // VIF THU 20 NOV 2025 22:19:29 ** DCMFGKB ** GENERATED CODE PAGE 00160
4891
4892
4893 // VIF THU 20 NOV 2025 22:19:29 ** DCMFGKF ** DCMFGKF PAGE 00161
4894
4895 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
4896 // S S U U B B R R O O U U T I NN N E
4897 // S U U B B R R O O U U T I N N N E
4898 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
4899 // S U U B B R R O O U U T I N N N E
4900 // S S U U B B R R O O U U T I N NN E
4901 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
4902
4903 // DDDDDD CCCCC M M FFFFFFF GGGGG K K FFFFFFF
4904 // D D C C MM MM F G G K K F
4905 // D D C M M M M F G K K F
4906 // D D C M M M FFFFF G GGGG KKK FFFFF
4907 // D D C M M F G G K K F
4908 // D D C C M M F G G K K F
4909 // DDDDDD CCCCC M M F GGGGG K K F
4910
4911
4912 // VIF THU 20 NOV 2025 22:19:29 ** DCMFGKF ** DIAGNOSTICS PAGE 00162
4913
4914
4915 // VIF THU 20 NOV 2025 22:19:29 ** DCMFGKF ** GENERATED CODE PAGE 00163
4916
4917 int_4 _dcmfgkf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_8 _p_
4918 cc_, real_8 _p_ cc1_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch1_, int_4 _p_ im2_, int_4 _p_ in2_,
4919 real_8 _p_ wa_)
4920 { // ** body not listed **
5168 }
5169
5170 // VIF THU 20 NOV 2025 22:19:29 ** DCMFM1B ** DCMFM1B PAGE 00168
5171
5172 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5173 // S S U U B B R R O O U U T I NN N E
5174 // S U U B B R R O O U U T I N N N E
5175 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5176 // S U U B B R R O O U U T I N N N E
5177 // S S U U B B R R O O U U T I N NN E
5178 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5179
5180 // DDDDDD CCCCC M M FFFFFFF M M 1 BBBBBB
5181 // D D C C MM MM F MM MM 11 B B
5182 // D D C M M M M F M M M M 1 1 B B
5183 // D D C M M M FFFFF M M M 1 BBBBBB
5184 // D D C M M F M M 1 B B
5185 // D D C C M M F M M 1 B B
5186 // DDDDDD CCCCC M M F M M 11111 BBBBBB
5187
5188
5189 // VIF THU 20 NOV 2025 22:19:29 ** DCMFM1B ** DIAGNOSTICS PAGE 00169
5190
5191
5192 // VIF THU 20 NOV 2025 22:19:29 ** DCMFM1B ** GENERATED CODE PAGE 00170
5193
5194 int_4 _dcmfm1b (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, real_8 _p_ ch_,
5195 real_8 _p_ wa_, real_4 _p_ fnf_, real_8 _p_ fac_)
5196 { // ** body not listed **
5261 }
5262
5263 // VIF THU 20 NOV 2025 22:19:29 ** DCMFM1F ** DCMFM1F PAGE 00172
5264
5265 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5266 // S S U U B B R R O O U U T I NN N E
5267 // S U U B B R R O O U U T I N N N E
5268 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5269 // S U U B B R R O O U U T I N N N E
5270 // S S U U B B R R O O U U T I N NN E
5271 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5272
5273 // DDDDDD CCCCC M M FFFFFFF M M 1 FFFFFFF
5274 // D D C C MM MM F MM MM 11 F
5275 // D D C M M M M F M M M M 1 1 F
5276 // D D C M M M FFFFF M M M 1 FFFFF
5277 // D D C M M F M M 1 F
5278 // D D C C M M F M M 1 F
5279 // DDDDDD CCCCC M M F M M 11111 F
5280
5281
5282 // VIF THU 20 NOV 2025 22:19:29 ** DCMFM1F ** DIAGNOSTICS PAGE 00173
5283
5284
5285 // VIF THU 20 NOV 2025 22:19:29 ** DCMFM1F ** GENERATED CODE PAGE 00174
5286
5287 int_4 _dcmfm1f (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_16 _p_ c_, real_8 _p_ ch_,
5288 real_8 _p_ wa_, real_4 _p_ fnf_, real_8 _p_ fac_)
5289 { // ** body not listed **
5354 }
5355
5356 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1B ** DCOSQ1B PAGE 00176
5357
5358 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5359 // S S U U B B R R O O U U T I NN N E
5360 // S U U B B R R O O U U T I N N N E
5361 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5362 // S U U B B R R O O U U T I N N N E
5363 // S S U U B B R R O O U U T I N NN E
5364 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5365
5366 // DDDDDD CCCCC OOOOO SSSSS QQQQQ 1 BBBBBB
5367 // D D C C O O S S Q Q 11 B B
5368 // D D C O O S Q Q 1 1 B B
5369 // D D C O O SSSSS Q Q 1 BBBBBB
5370 // D D C O O S Q Q Q 1 B B
5371 // D D C C O O S S Q Q 1 B B
5372 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q 11111 BBBBBB
5373
5374
5375 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1B ** DIAGNOSTICS PAGE 00177
5376
5377
5378 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1B ** GENERATED CODE PAGE 00178
5379
5380 int_4 _dcosq1b (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
5381 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
5382 { // ** body not listed **
5427 }
5428
5429 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1F ** DCOSQ1F PAGE 00179
5430
5431 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5432 // S S U U B B R R O O U U T I NN N E
5433 // S U U B B R R O O U U T I N N N E
5434 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5435 // S U U B B R R O O U U T I N N N E
5436 // S S U U B B R R O O U U T I N NN E
5437 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5438
5439 // DDDDDD CCCCC OOOOO SSSSS QQQQQ 1 FFFFFFF
5440 // D D C C O O S S Q Q 11 F
5441 // D D C O O S Q Q 1 1 F
5442 // D D C O O SSSSS Q Q 1 FFFFF
5443 // D D C O O S Q Q Q 1 F
5444 // D D C C O O S S Q Q 1 F
5445 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q 11111 F
5446
5447
5448 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1F ** DIAGNOSTICS PAGE 00180
5449
5450
5451 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1F ** GENERATED CODE PAGE 00181
5452
5453 int_4 _dcosq1f (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
5454 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
5455 { // ** body not listed **
5501 }
5502
5503 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1I ** DCOSQ1I PAGE 00182
5504
5505 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5506 // S S U U B B R R O O U U T I NN N E
5507 // S U U B B R R O O U U T I N N N E
5508 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5509 // S U U B B R R O O U U T I N N N E
5510 // S S U U B B R R O O U U T I N NN E
5511 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5512
5513 // DDDDDD CCCCC OOOOO SSSSS QQQQQ 1 III
5514 // D D C C O O S S Q Q 11 I
5515 // D D C O O S Q Q 1 1 I
5516 // D D C O O SSSSS Q Q 1 I
5517 // D D C O O S Q Q Q 1 I
5518 // D D C C O O S S Q Q 1 I
5519 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q 11111 III
5520
5521
5522 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1I ** DIAGNOSTICS PAGE 00183
5523
5524
5525 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQ1I ** GENERATED CODE PAGE 00184
5526
5527 int_4 _dcosq1i (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
5528 { // ** body not listed **
5556 }
5557
5558 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQB1 ** DCOSQB1 PAGE 00185
5559
5560 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5561 // S S U U B B R R O O U U T I NN N E
5562 // S U U B B R R O O U U T I N N N E
5563 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5564 // S U U B B R R O O U U T I N N N E
5565 // S S U U B B R R O O U U T I N NN E
5566 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5567
5568 // DDDDDD CCCCC OOOOO SSSSS QQQQQ BBBBBB 1
5569 // D D C C O O S S Q Q B B 11
5570 // D D C O O S Q Q B B 1 1
5571 // D D C O O SSSSS Q Q BBBBBB 1
5572 // D D C O O S Q Q Q B B 1
5573 // D D C C O O S S Q Q B B 1
5574 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q BBBBBB 11111
5575
5576
5577 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQB1 ** DIAGNOSTICS PAGE 00186
5578
5579
5580 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQB1 ** GENERATED CODE PAGE 00187
5581
5582 int_4 _dcosqb1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
5583 { // ** body not listed **
5636 }
5637
5638 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQF1 ** DCOSQF1 PAGE 00189
5639
5640 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5641 // S S U U B B R R O O U U T I NN N E
5642 // S U U B B R R O O U U T I N N N E
5643 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5644 // S U U B B R R O O U U T I N N N E
5645 // S S U U B B R R O O U U T I N NN E
5646 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5647
5648 // DDDDDD CCCCC OOOOO SSSSS QQQQQ FFFFFFF 1
5649 // D D C C O O S S Q Q F 11
5650 // D D C O O S Q Q F 1 1
5651 // D D C O O SSSSS Q Q FFFFF 1
5652 // D D C O O S Q Q Q F 1
5653 // D D C C O O S S Q Q F 1
5654 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q F 11111
5655
5656
5657 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQF1 ** DIAGNOSTICS PAGE 00190
5658
5659
5660 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQF1 ** GENERATED CODE PAGE 00191
5661
5662 int_4 _dcosqf1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
5663 { // ** body not listed **
5709 }
5710
5711 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMB ** DCOSQMB PAGE 00192
5712
5713 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5714 // S S U U B B R R O O U U T I NN N E
5715 // S U U B B R R O O U U T I N N N E
5716 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5717 // S U U B B R R O O U U T I N N N E
5718 // S S U U B B R R O O U U T I N NN E
5719 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5720
5721 // DDDDDD CCCCC OOOOO SSSSS QQQQQ M M BBBBBB
5722 // D D C C O O S S Q Q MM MM B B
5723 // D D C O O S Q Q M M M M B B
5724 // D D C O O SSSSS Q Q M M M BBBBBB
5725 // D D C O O S Q Q Q M M B B
5726 // D D C C O O S S Q Q M M B B
5727 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q M M BBBBBB
5728
5729
5730 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMB ** DIAGNOSTICS PAGE 00193
5731
5732
5733 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMB ** GENERATED CODE PAGE 00194
5734
5735 int_4 _dcosqmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
5736 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
5737 { // ** body not listed **
5797 }
5798
5799 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMF ** DCOSQMF PAGE 00196
5800
5801 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5802 // S S U U B B R R O O U U T I NN N E
5803 // S U U B B R R O O U U T I N N N E
5804 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5805 // S U U B B R R O O U U T I N N N E
5806 // S S U U B B R R O O U U T I N NN E
5807 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5808
5809 // DDDDDD CCCCC OOOOO SSSSS QQQQQ M M FFFFFFF
5810 // D D C C O O S S Q Q MM MM F
5811 // D D C O O S Q Q M M M M F
5812 // D D C O O SSSSS Q Q M M M FFFFF
5813 // D D C O O S Q Q Q M M F
5814 // D D C C O O S S Q Q M M F
5815 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q M M F
5816
5817
5818 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMF ** DIAGNOSTICS PAGE 00197
5819
5820
5821 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMF ** GENERATED CODE PAGE 00198
5822
5823 int_4 _dcosqmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
5824 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
5825 { // ** body not listed **
5881 }
5882
5883 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMI ** DCOSQMI PAGE 00200
5884
5885 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5886 // S S U U B B R R O O U U T I NN N E
5887 // S U U B B R R O O U U T I N N N E
5888 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5889 // S U U B B R R O O U U T I N N N E
5890 // S S U U B B R R O O U U T I N NN E
5891 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5892
5893 // DDDDDD CCCCC OOOOO SSSSS QQQQQ M M III
5894 // D D C C O O S S Q Q MM MM I
5895 // D D C O O S Q Q M M M M I
5896 // D D C O O SSSSS Q Q M M M I
5897 // D D C O O S Q Q Q M M I
5898 // D D C C O O S S Q Q M M I
5899 // DDDDDD CCCCC OOOOO SSSSS QQQQ Q M M III
5900
5901
5902 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMI ** DIAGNOSTICS PAGE 00201
5903
5904
5905 // VIF THU 20 NOV 2025 22:19:29 ** DCOSQMI ** GENERATED CODE PAGE 00202
5906
5907 int_4 _dcosqmi (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
5908 { // ** body not listed **
5936 }
5937
5938 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1B ** DCOST1B PAGE 00203
5939
5940 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
5941 // S S U U B B R R O O U U T I NN N E
5942 // S U U B B R R O O U U T I N N N E
5943 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
5944 // S U U B B R R O O U U T I N N N E
5945 // S S U U B B R R O O U U T I N NN E
5946 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
5947
5948 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT 1 BBBBBB
5949 // D D C C O O S S T 11 B B
5950 // D D C O O S T 1 1 B B
5951 // D D C O O SSSSS T 1 BBBBBB
5952 // D D C O O S T 1 B B
5953 // D D C C O O S S T 1 B B
5954 // DDDDDD CCCCC OOOOO SSSSS T 11111 BBBBBB
5955
5956
5957 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1B ** DIAGNOSTICS PAGE 00204
5958
5959
5960 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1B ** GENERATED CODE PAGE 00205
5961
5962 int_4 _dcost1b (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
5963 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
5964 { // ** body not listed **
5996 }
5997
5998 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1F ** DCOST1F PAGE 00206
5999
6000 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6001 // S S U U B B R R O O U U T I NN N E
6002 // S U U B B R R O O U U T I N N N E
6003 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6004 // S U U B B R R O O U U T I N N N E
6005 // S S U U B B R R O O U U T I N NN E
6006 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6007
6008 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT 1 FFFFFFF
6009 // D D C C O O S S T 11 F
6010 // D D C O O S T 1 1 F
6011 // D D C O O SSSSS T 1 FFFFF
6012 // D D C O O S T 1 F
6013 // D D C C O O S S T 1 F
6014 // DDDDDD CCCCC OOOOO SSSSS T 11111 F
6015
6016
6017 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1F ** DIAGNOSTICS PAGE 00207
6018
6019
6020 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1F ** GENERATED CODE PAGE 00208
6021
6022 int_4 _dcost1f (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
6023 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
6024 { // ** body not listed **
6056 }
6057
6058 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1I ** DCOST1I PAGE 00209
6059
6060 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6061 // S S U U B B R R O O U U T I NN N E
6062 // S U U B B R R O O U U T I N N N E
6063 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6064 // S U U B B R R O O U U T I N N N E
6065 // S S U U B B R R O O U U T I N NN E
6066 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6067
6068 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT 1 III
6069 // D D C C O O S S T 11 I
6070 // D D C O O S T 1 1 I
6071 // D D C O O SSSSS T 1 I
6072 // D D C O O S T 1 I
6073 // D D C C O O S S T 1 I
6074 // DDDDDD CCCCC OOOOO SSSSS T 11111 III
6075
6076
6077 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1I ** DIAGNOSTICS PAGE 00210
6078
6079
6080 // VIF THU 20 NOV 2025 22:19:29 ** DCOST1I ** GENERATED CODE PAGE 00211
6081
6082 int_4 _dcost1i (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
6083 { // ** body not listed **
6120 }
6121
6122 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTB1 ** DCOSTB1 PAGE 00212
6123
6124 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6125 // S S U U B B R R O O U U T I NN N E
6126 // S U U B B R R O O U U T I N N N E
6127 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6128 // S U U B B R R O O U U T I N N N E
6129 // S S U U B B R R O O U U T I N NN E
6130 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6131
6132 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT BBBBBB 1
6133 // D D C C O O S S T B B 11
6134 // D D C O O S T B B 1 1
6135 // D D C O O SSSSS T BBBBBB 1
6136 // D D C O O S T B B 1
6137 // D D C C O O S S T B B 1
6138 // DDDDDD CCCCC OOOOO SSSSS T BBBBBB 11111
6139
6140
6141 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTB1 ** DIAGNOSTICS PAGE 00213
6142
6143
6144 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTB1 ** GENERATED CODE PAGE 00214
6145
6146 int_4 _dcostb1 (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
6147 { // ** body not listed **
6234 }
6235
6236 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTF1 ** DCOSTF1 PAGE 00216
6237
6238 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6239 // S S U U B B R R O O U U T I NN N E
6240 // S U U B B R R O O U U T I N N N E
6241 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6242 // S U U B B R R O O U U T I N N N E
6243 // S S U U B B R R O O U U T I N NN E
6244 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6245
6246 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT FFFFFFF 1
6247 // D D C C O O S S T F 11
6248 // D D C O O S T F 1 1
6249 // D D C O O SSSSS T FFFFF 1
6250 // D D C O O S T F 1
6251 // D D C C O O S S T F 1
6252 // DDDDDD CCCCC OOOOO SSSSS T F 11111
6253
6254
6255 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTF1 ** DIAGNOSTICS PAGE 00217
6256
6257
6258 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTF1 ** GENERATED CODE PAGE 00218
6259
6260 int_4 _dcostf1 (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
6261 { // ** body not listed **
6346 }
6347
6348 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMB ** DCOSTMB PAGE 00220
6349
6350 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6351 // S S U U B B R R O O U U T I NN N E
6352 // S U U B B R R O O U U T I N N N E
6353 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6354 // S U U B B R R O O U U T I N N N E
6355 // S S U U B B R R O O U U T I N NN E
6356 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6357
6358 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT M M BBBBBB
6359 // D D C C O O S S T MM MM B B
6360 // D D C O O S T M M M M B B
6361 // D D C O O SSSSS T M M M BBBBBB
6362 // D D C O O S T M M B B
6363 // D D C C O O S S T M M B B
6364 // DDDDDD CCCCC OOOOO SSSSS T M M BBBBBB
6365
6366
6367 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMB ** DIAGNOSTICS PAGE 00221
6368
6369
6370 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMB ** GENERATED CODE PAGE 00222
6371
6372 int_4 _dcostmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
6373 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
6374 { // ** body not listed **
6408 }
6409
6410 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMF ** DCOSTMF PAGE 00223
6411
6412 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6413 // S S U U B B R R O O U U T I NN N E
6414 // S U U B B R R O O U U T I N N N E
6415 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6416 // S U U B B R R O O U U T I N N N E
6417 // S S U U B B R R O O U U T I N NN E
6418 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6419
6420 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT M M FFFFFFF
6421 // D D C C O O S S T MM MM F
6422 // D D C O O S T M M M M F
6423 // D D C O O SSSSS T M M M FFFFF
6424 // D D C O O S T M M F
6425 // D D C C O O S S T M M F
6426 // DDDDDD CCCCC OOOOO SSSSS T M M F
6427
6428
6429 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMF ** DIAGNOSTICS PAGE 00224
6430
6431
6432 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMF ** GENERATED CODE PAGE 00225
6433
6434 int_4 _dcostmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
6435 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
6436 { // ** body not listed **
6470 }
6471
6472 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMI ** DCOSTMI PAGE 00226
6473
6474 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6475 // S S U U B B R R O O U U T I NN N E
6476 // S U U B B R R O O U U T I N N N E
6477 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6478 // S U U B B R R O O U U T I N N N E
6479 // S S U U B B R R O O U U T I N NN E
6480 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6481
6482 // DDDDDD CCCCC OOOOO SSSSS TTTTTTT M M III
6483 // D D C C O O S S T MM MM I
6484 // D D C O O S T M M M M I
6485 // D D C O O SSSSS T M M M I
6486 // D D C O O S T M M I
6487 // D D C C O O S S T M M I
6488 // DDDDDD CCCCC OOOOO SSSSS T M M III
6489
6490
6491 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMI ** DIAGNOSTICS PAGE 00227
6492
6493
6494 // VIF THU 20 NOV 2025 22:19:29 ** DCOSTMI ** GENERATED CODE PAGE 00228
6495
6496 int_4 _dcostmi (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
6497 { // ** body not listed **
6534 }
6535
6536 // VIF THU 20 NOV 2025 22:19:29 ** DFACTOR ** DFACTOR PAGE 00229
6537
6538 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6539 // S S U U B B R R O O U U T I NN N E
6540 // S U U B B R R O O U U T I N N N E
6541 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6542 // S U U B B R R O O U U T I N N N E
6543 // S S U U B B R R O O U U T I N NN E
6544 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6545
6546 // DDDDDD FFFFFFF A CCCCC TTTTTTT OOOOO RRRRRR
6547 // D D F A A C C T O O R R
6548 // D D F A A C T O O R R
6549 // D D FFFFF A A C T O O RRRRRR
6550 // D D F AAAAAAA C T O O R R
6551 // D D F A A C C T O O R R
6552 // DDDDDD F A A CCCCC T OOOOO R R
6553
6554
6555 // VIF THU 20 NOV 2025 22:19:29 ** DFACTOR ** DIAGNOSTICS PAGE 00230
6556
6557
6558 // VIF THU 20 NOV 2025 22:19:29 ** DFACTOR ** GENERATED CODE PAGE 00231
6559
6560 int_4 _dfactor (int_4 _p_ n_, int_4 _p_ nf_, real_8 _p_ fac_)
6561 { // ** body not listed **
6634 }
6635
6636 // VIF THU 20 NOV 2025 22:19:29 ** DMCFTI1 ** DMCFTI1 PAGE 00233
6637
6638 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6639 // S S U U B B R R O O U U T I NN N E
6640 // S U U B B R R O O U U T I N N N E
6641 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6642 // S U U B B R R O O U U T I N N N E
6643 // S S U U B B R R O O U U T I N NN E
6644 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6645
6646 // DDDDDD M M CCCCC FFFFFFF TTTTTTT III 1
6647 // D D MM MM C C F T I 11
6648 // D D M M M M C F T I 1 1
6649 // D D M M M C FFFFF T I 1
6650 // D D M M C F T I 1
6651 // D D M M C C F T I 1
6652 // DDDDDD M M CCCCC F T III 11111
6653
6654
6655 // VIF THU 20 NOV 2025 22:19:29 ** DMCFTI1 ** DIAGNOSTICS PAGE 00234
6656
6657
6658 // VIF THU 20 NOV 2025 22:19:29 ** DMCFTI1 ** GENERATED CODE PAGE 00235
6659
6660 int_4 _dmcfti1 (int_4 _p_ n_, real_8 _p_ wa_, real_4 _p_ fnf_, real_8 _p_ fac_)
6661 { // ** body not listed **
6677 }
6678
6679 // VIF THU 20 NOV 2025 22:19:29 ** DMCSQB1 ** DMCSQB1 PAGE 00236
6680
6681 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6682 // S S U U B B R R O O U U T I NN N E
6683 // S U U B B R R O O U U T I N N N E
6684 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6685 // S U U B B R R O O U U T I N N N E
6686 // S S U U B B R R O O U U T I N NN E
6687 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6688
6689 // DDDDDD M M CCCCC SSSSS QQQQQ BBBBBB 1
6690 // D D MM MM C C S S Q Q B B 11
6691 // D D M M M M C S Q Q B B 1 1
6692 // D D M M M C SSSSS Q Q BBBBBB 1
6693 // D D M M C S Q Q Q B B 1
6694 // D D M M C C S S Q Q B B 1
6695 // DDDDDD M M CCCCC SSSSS QQQQ Q BBBBBB 11111
6696
6697
6698 // VIF THU 20 NOV 2025 22:19:29 ** DMCSQB1 ** DIAGNOSTICS PAGE 00237
6699
6700
6701 // VIF THU 20 NOV 2025 22:19:29 ** DMCSQB1 ** GENERATED CODE PAGE 00238
6702
6703 int_4 _dmcsqb1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4
6704 _p_ work_, int_4 _p_ ier_)
6705 { // ** body not listed **
6780 }
6781
6782 // VIF THU 20 NOV 2025 22:19:29 ** DMCSQF1 ** DMCSQF1 PAGE 00240
6783
6784 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6785 // S S U U B B R R O O U U T I NN N E
6786 // S U U B B R R O O U U T I N N N E
6787 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6788 // S U U B B R R O O U U T I N N N E
6789 // S S U U B B R R O O U U T I N NN E
6790 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6791
6792 // DDDDDD M M CCCCC SSSSS QQQQQ FFFFFFF 1
6793 // D D MM MM C C S S Q Q F 11
6794 // D D M M M M C S Q Q F 1 1
6795 // D D M M M C SSSSS Q Q FFFFF 1
6796 // D D M M C S Q Q Q F 1
6797 // D D M M C C S S Q Q F 1
6798 // DDDDDD M M CCCCC SSSSS QQQQ Q F 11111
6799
6800
6801 // VIF THU 20 NOV 2025 22:19:29 ** DMCSQF1 ** DIAGNOSTICS PAGE 00241
6802
6803
6804 // VIF THU 20 NOV 2025 22:19:29 ** DMCSQF1 ** GENERATED CODE PAGE 00242
6805
6806 int_4 _dmcsqf1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4
6807 _p_ work_, int_4 _p_ ier_)
6808 { // ** body not listed **
6879 }
6880
6881 // VIF THU 20 NOV 2025 22:19:29 ** DMCSTB1 ** DMCSTB1 PAGE 00244
6882
6883 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
6884 // S S U U B B R R O O U U T I NN N E
6885 // S U U B B R R O O U U T I N N N E
6886 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
6887 // S U U B B R R O O U U T I N N N E
6888 // S S U U B B R R O O U U T I N NN E
6889 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
6890
6891 // DDDDDD M M CCCCC SSSSS TTTTTTT BBBBBB 1
6892 // D D MM MM C C S S T B B 11
6893 // D D M M M M C S T B B 1 1
6894 // D D M M M C SSSSS T BBBBBB 1
6895 // D D M M C S T B B 1
6896 // D D M M C C S S T B B 1
6897 // DDDDDD M M CCCCC SSSSS T BBBBBB 11111
6898
6899
6900 // VIF THU 20 NOV 2025 22:19:29 ** DMCSTB1 ** DIAGNOSTICS PAGE 00245
6901
6902
6903 // VIF THU 20 NOV 2025 22:19:29 ** DMCSTB1 ** GENERATED CODE PAGE 00246
6904
6905 int_4 _dmcstb1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_8
6906 _p_ dsum_, real_4 _p_ work_, int_4 _p_ ier_)
6907 { // ** body not listed **
7028 }
7029
7030 // VIF THU 20 NOV 2025 22:19:29 ** DMCSTF1 ** DMCSTF1 PAGE 00249
7031
7032 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7033 // S S U U B B R R O O U U T I NN N E
7034 // S U U B B R R O O U U T I N N N E
7035 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7036 // S U U B B R R O O U U T I N N N E
7037 // S S U U B B R R O O U U T I N NN E
7038 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7039
7040 // DDDDDD M M CCCCC SSSSS TTTTTTT FFFFFFF 1
7041 // D D MM MM C C S S T F 11
7042 // D D M M M M C S T F 1 1
7043 // D D M M M C SSSSS T FFFFF 1
7044 // D D M M C S T F 1
7045 // D D M M C C S S T F 1
7046 // DDDDDD M M CCCCC SSSSS T F 11111
7047
7048
7049 // VIF THU 20 NOV 2025 22:19:29 ** DMCSTF1 ** DIAGNOSTICS PAGE 00250
7050
7051
7052 // VIF THU 20 NOV 2025 22:19:29 ** DMCSTF1 ** GENERATED CODE PAGE 00251
7053
7054 int_4 _dmcstf1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_8
7055 _p_ dsum_, real_4 _p_ work_, int_4 _p_ ier_)
7056 { // ** body not listed **
7172 }
7173
7174 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB2 ** DMRADB2 PAGE 00254
7175
7176 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7177 // S S U U B B R R O O U U T I NN N E
7178 // S U U B B R R O O U U T I N N N E
7179 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7180 // S U U B B R R O O U U T I N N N E
7181 // S S U U B B R R O O U U T I N NN E
7182 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7183
7184 // DDDDDD M M RRRRRR A DDDDDD BBBBBB 22222
7185 // D D MM MM R R A A D D B B 2 2
7186 // D D M M M M R R A A D D B B 2
7187 // D D M M M RRRRRR A A D D BBBBBB 22222
7188 // D D M M R R AAAAAAA D D B B 2
7189 // D D M M R R A A D D B B 2
7190 // DDDDDD M M R R A A DDDDDD BBBBBB 2222222
7191
7192
7193 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB2 ** DIAGNOSTICS PAGE 00255
7194
7195
7196 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB2 ** GENERATED CODE PAGE 00256
7197
7198 int_4 _dmradb2 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
7199 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_)
7200 { // ** body not listed **
7272 }
7273
7274 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB3 ** DMRADB3 PAGE 00258
7275
7276 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7277 // S S U U B B R R O O U U T I NN N E
7278 // S U U B B R R O O U U T I N N N E
7279 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7280 // S U U B B R R O O U U T I N N N E
7281 // S S U U B B R R O O U U T I N NN E
7282 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7283
7284 // DDDDDD M M RRRRRR A DDDDDD BBBBBB 33333
7285 // D D MM MM R R A A D D B B 3 3
7286 // D D M M M M R R A A D D B B 3
7287 // D D M M M RRRRRR A A D D BBBBBB 33333
7288 // D D M M R R AAAAAAA D D B B 3
7289 // D D M M R R A A D D B B 3 3
7290 // DDDDDD M M R R A A DDDDDD BBBBBB 33333
7291
7292
7293 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB3 ** DIAGNOSTICS PAGE 00259
7294
7295
7296 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB3 ** GENERATED CODE PAGE 00260
7297
7298 int_4 _dmradb3 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
7299 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_, real_8 _p_ wa2_)
7300 { // ** body not listed **
7383 }
7384
7385 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB4 ** DMRADB4 PAGE 00262
7386
7387 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7388 // S S U U B B R R O O U U T I NN N E
7389 // S U U B B R R O O U U T I N N N E
7390 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7391 // S U U B B R R O O U U T I N N N E
7392 // S S U U B B R R O O U U T I N NN E
7393 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7394
7395 // DDDDDD M M RRRRRR A DDDDDD BBBBBB 4
7396 // D D MM MM R R A A D D B B 4 4
7397 // D D M M M M R R A A D D B B 4 4
7398 // D D M M M RRRRRR A A D D BBBBBB 4444444
7399 // D D M M R R AAAAAAA D D B B 4
7400 // D D M M R R A A D D B B 4
7401 // DDDDDD M M R R A A DDDDDD BBBBBB 4
7402
7403
7404 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB4 ** DIAGNOSTICS PAGE 00263
7405
7406
7407 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB4 ** GENERATED CODE PAGE 00264
7408
7409 int_4 _dmradb4 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
7410 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_)
7411 { // ** body not listed **
7543 }
7544
7545 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB5 ** DMRADB5 PAGE 00267
7546
7547 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7548 // S S U U B B R R O O U U T I NN N E
7549 // S U U B B R R O O U U T I N N N E
7550 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7551 // S U U B B R R O O U U T I N N N E
7552 // S S U U B B R R O O U U T I N NN E
7553 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7554
7555 // DDDDDD M M RRRRRR A DDDDDD BBBBBB 5555555
7556 // D D MM MM R R A A D D B B 5
7557 // D D M M M M R R A A D D B B 5
7558 // D D M M M RRRRRR A A D D BBBBBB 55555
7559 // D D M M R R AAAAAAA D D B B 5
7560 // D D M M R R A A D D B B 5 5
7561 // DDDDDD M M R R A A DDDDDD BBBBBB 55555
7562
7563
7564 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB5 ** DIAGNOSTICS PAGE 00268
7565
7566
7567 // VIF THU 20 NOV 2025 22:19:29 ** DMRADB5 ** GENERATED CODE PAGE 00269
7568
7569 int_4 _dmradb5 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
7570 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
7571 { // ** body not listed **
7762 }
7763
7764 // VIF THU 20 NOV 2025 22:19:29 ** DMRADBG ** DMRADBG PAGE 00273
7765
7766 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
7767 // S S U U B B R R O O U U T I NN N E
7768 // S U U B B R R O O U U T I N N N E
7769 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
7770 // S U U B B R R O O U U T I N N N E
7771 // S S U U B B R R O O U U T I N NN E
7772 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
7773
7774 // DDDDDD M M RRRRRR A DDDDDD BBBBBB GGGGG
7775 // D D MM MM R R A A D D B B G G
7776 // D D M M M M R R A A D D B B G
7777 // D D M M M RRRRRR A A D D BBBBBB G GGGG
7778 // D D M M R R AAAAAAA D D B B G G
7779 // D D M M R R A A D D B B G G
7780 // DDDDDD M M R R A A DDDDDD BBBBBB GGGGG
7781
7782
7783 // VIF THU 20 NOV 2025 22:19:29 ** DMRADBG ** DIAGNOSTICS PAGE 00274
7784
7785
7786 // VIF THU 20 NOV 2025 22:19:29 ** DMRADBG ** GENERATED CODE PAGE 00275
7787
7788 int_4 _dmradbg (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_8 _p_ cc_, real_8 _p_
7789 c1_, real_8 _p_ c2_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch2_, int_4 _p_ im2_, int_4 _p_ in2_,
7790 real_8 _p_ wa_)
7791 { // ** body not listed **
8103 }
8104
8105 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF2 ** DMRADF2 PAGE 00282
8106
8107 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8108 // S S U U B B R R O O U U T I NN N E
8109 // S U U B B R R O O U U T I N N N E
8110 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8111 // S U U B B R R O O U U T I N N N E
8112 // S S U U B B R R O O U U T I N NN E
8113 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8114
8115 // DDDDDD M M RRRRRR A DDDDDD FFFFFFF 22222
8116 // D D MM MM R R A A D D F 2 2
8117 // D D M M M M R R A A D D F 2
8118 // D D M M M RRRRRR A A D D FFFFF 22222
8119 // D D M M R R AAAAAAA D D F 2
8120 // D D M M R R A A D D F 2
8121 // DDDDDD M M R R A A DDDDDD F 2222222
8122
8123
8124 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF2 ** DIAGNOSTICS PAGE 00283
8125
8126
8127 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF2 ** GENERATED CODE PAGE 00284
8128
8129 int_4 _dmradf2 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
8130 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_)
8131 { // ** body not listed **
8202 }
8203
8204 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF3 ** DMRADF3 PAGE 00286
8205
8206 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8207 // S S U U B B R R O O U U T I NN N E
8208 // S U U B B R R O O U U T I N N N E
8209 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8210 // S U U B B R R O O U U T I N N N E
8211 // S S U U B B R R O O U U T I N NN E
8212 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8213
8214 // DDDDDD M M RRRRRR A DDDDDD FFFFFFF 33333
8215 // D D MM MM R R A A D D F 3 3
8216 // D D M M M M R R A A D D F 3
8217 // D D M M M RRRRRR A A D D FFFFF 33333
8218 // D D M M R R AAAAAAA D D F 3
8219 // D D M M R R A A D D F 3 3
8220 // DDDDDD M M R R A A DDDDDD F 33333
8221
8222
8223 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF3 ** DIAGNOSTICS PAGE 00287
8224
8225
8226 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF3 ** GENERATED CODE PAGE 00288
8227
8228 int_4 _dmradf3 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
8229 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_, real_8 _p_ wa2_)
8230 { // ** body not listed **
8318 }
8319
8320 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF4 ** DMRADF4 PAGE 00290
8321
8322 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8323 // S S U U B B R R O O U U T I NN N E
8324 // S U U B B R R O O U U T I N N N E
8325 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8326 // S U U B B R R O O U U T I N N N E
8327 // S S U U B B R R O O U U T I N NN E
8328 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8329
8330 // DDDDDD M M RRRRRR A DDDDDD FFFFFFF 4
8331 // D D MM MM R R A A D D F 4 4
8332 // D D M M M M R R A A D D F 4 4
8333 // D D M M M RRRRRR A A D D FFFFF 4444444
8334 // D D M M R R AAAAAAA D D F 4
8335 // D D M M R R A A D D F 4
8336 // DDDDDD M M R R A A DDDDDD F 4
8337
8338
8339 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF4 ** DIAGNOSTICS PAGE 00291
8340
8341
8342 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF4 ** GENERATED CODE PAGE 00292
8343
8344 int_4 _dmradf4 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
8345 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_)
8346 { // ** body not listed **
8481 }
8482
8483 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF5 ** DMRADF5 PAGE 00295
8484
8485 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8486 // S S U U B B R R O O U U T I NN N E
8487 // S U U B B R R O O U U T I N N N E
8488 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8489 // S U U B B R R O O U U T I N N N E
8490 // S S U U B B R R O O U U T I N NN E
8491 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8492
8493 // DDDDDD M M RRRRRR A DDDDDD FFFFFFF 5555555
8494 // D D MM MM R R A A D D F 5
8495 // D D M M M M R R A A D D F 5
8496 // D D M M M RRRRRR A A D D FFFFF 55555
8497 // D D M M R R AAAAAAA D D F 5
8498 // D D M M R R A A D D F 5 5
8499 // DDDDDD M M R R A A DDDDDD F 55555
8500
8501
8502 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF5 ** DIAGNOSTICS PAGE 00296
8503
8504
8505 // VIF THU 20 NOV 2025 22:19:29 ** DMRADF5 ** GENERATED CODE PAGE 00297
8506
8507 int_4 _dmradf5 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_
8508 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
8509 { // ** body not listed **
8726 }
8727
8728 // VIF THU 20 NOV 2025 22:19:29 ** DMRADFG ** DMRADFG PAGE 00302
8729
8730 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
8731 // S S U U B B R R O O U U T I NN N E
8732 // S U U B B R R O O U U T I N N N E
8733 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
8734 // S U U B B R R O O U U T I N N N E
8735 // S S U U B B R R O O U U T I N NN E
8736 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
8737
8738 // DDDDDD M M RRRRRR A DDDDDD FFFFFFF GGGGG
8739 // D D MM MM R R A A D D F G G
8740 // D D M M M M R R A A D D F G
8741 // D D M M M RRRRRR A A D D FFFFF G GGGG
8742 // D D M M R R AAAAAAA D D F G G
8743 // D D M M R R A A D D F G G
8744 // DDDDDD M M R R A A DDDDDD F GGGGG
8745
8746
8747 // VIF THU 20 NOV 2025 22:19:29 ** DMRADFG ** DIAGNOSTICS PAGE 00303
8748
8749
8750 // VIF THU 20 NOV 2025 22:19:29 ** DMRADFG ** GENERATED CODE PAGE 00304
8751
8752 int_4 _dmradfg (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_8 _p_ cc_, real_8 _p_
8753 c1_, real_8 _p_ c2_, int_4 _p_ im1_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch2_, int_4 _p_ im2_, int_4 _p_ in2_,
8754 real_8 _p_ wa_)
8755 { // ** body not listed **
9073 }
9074
9075 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTB1 ** DMRFTB1 PAGE 00311
9076
9077 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9078 // S S U U B B R R O O U U T I NN N E
9079 // S U U B B R R O O U U T I N N N E
9080 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9081 // S U U B B R R O O U U T I N N N E
9082 // S S U U B B R R O O U U T I N NN E
9083 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9084
9085 // DDDDDD M M RRRRRR FFFFFFF TTTTTTT BBBBBB 1
9086 // D D MM MM R R F T B B 11
9087 // D D M M M M R R F T B B 1 1
9088 // D D M M M RRRRRR FFFFF T BBBBBB 1
9089 // D D M M R R F T B B 1
9090 // D D M M R R F T B B 1
9091 // DDDDDD M M R R F T BBBBBB 11111
9092
9093
9094 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTB1 ** DIAGNOSTICS PAGE 00312
9095
9096
9097 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTB1 ** GENERATED CODE PAGE 00313
9098
9099 int_4 _dmrftb1 (int_4 _p_ m_, int_4 _p_ im_, int_4 _p_ n_, int_4 _p_ in_, real_8 _p_ c_, real_8 _p_ ch_, real_8 _p_ wa_
9100 , real_8 _p_ fac_)
9101 { // ** body not listed **
9245 }
9246
9247 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTF1 ** DMRFTF1 PAGE 00316
9248
9249 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9250 // S S U U B B R R O O U U T I NN N E
9251 // S U U B B R R O O U U T I N N N E
9252 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9253 // S U U B B R R O O U U T I N N N E
9254 // S S U U B B R R O O U U T I N NN E
9255 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9256
9257 // DDDDDD M M RRRRRR FFFFFFF TTTTTTT FFFFFFF 1
9258 // D D MM MM R R F T F 11
9259 // D D M M M M R R F T F 1 1
9260 // D D M M M RRRRRR FFFFF T FFFFF 1
9261 // D D M M R R F T F 1
9262 // D D M M R R F T F 1
9263 // DDDDDD M M R R F T F 11111
9264
9265
9266 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTF1 ** DIAGNOSTICS PAGE 00317
9267
9268
9269 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTF1 ** GENERATED CODE PAGE 00318
9270
9271 int_4 _dmrftf1 (int_4 _p_ m_, int_4 _p_ im_, int_4 _p_ n_, int_4 _p_ in_, real_8 _p_ c_, real_8 _p_ ch_, real_8 _p_ wa_
9272 , real_8 _p_ fac_)
9273 { // ** body not listed **
9421 }
9422
9423 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTI1 ** DMRFTI1 PAGE 00321
9424
9425 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9426 // S S U U B B R R O O U U T I NN N E
9427 // S U U B B R R O O U U T I N N N E
9428 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9429 // S U U B B R R O O U U T I N N N E
9430 // S S U U B B R R O O U U T I N NN E
9431 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9432
9433 // DDDDDD M M RRRRRR FFFFFFF TTTTTTT III 1
9434 // D D MM MM R R F T I 11
9435 // D D M M M M R R F T I 1 1
9436 // D D M M M RRRRRR FFFFF T I 1
9437 // D D M M R R F T I 1
9438 // D D M M R R F T I 1
9439 // DDDDDD M M R R F T III 11111
9440
9441
9442 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTI1 ** DIAGNOSTICS PAGE 00322
9443
9444
9445 // VIF THU 20 NOV 2025 22:19:29 ** DMRFTI1 ** GENERATED CODE PAGE 00323
9446
9447 int_4 _dmrfti1 (int_4 _p_ n_, real_8 _p_ wa_, real_8 _p_ fac_)
9448 { // ** body not listed **
9570 }
9571
9572 // VIF THU 20 NOV 2025 22:19:29 ** DMSNTB1 ** DMSNTB1 PAGE 00326
9573
9574 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9575 // S S U U B B R R O O U U T I NN N E
9576 // S U U B B R R O O U U T I N N N E
9577 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9578 // S U U B B R R O O U U T I N N N E
9579 // S S U U B B R R O O U U T I N NN E
9580 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9581
9582 // DDDDDD M M SSSSS N N TTTTTTT BBBBBB 1
9583 // D D MM MM S S NN N T B B 11
9584 // D D M M M M S N N N T B B 1 1
9585 // D D M M M SSSSS N N N T BBBBBB 1
9586 // D D M M S N N N T B B 1
9587 // D D M M S S N NN T B B 1
9588 // DDDDDD M M SSSSS N N T BBBBBB 11111
9589
9590
9591 // VIF THU 20 NOV 2025 22:19:29 ** DMSNTB1 ** DIAGNOSTICS PAGE 00327
9592
9593
9594 // VIF THU 20 NOV 2025 22:19:29 ** DMSNTB1 ** GENERATED CODE PAGE 00328
9595
9596 int_4 _dmsntb1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_8
9597 _p_ dsum_, real_8 _p_ xh_, real_4 _p_ work_, int_4 _p_ ier_)
9598 { // ** body not listed **
9694 }
9695
9696 // VIF THU 20 NOV 2025 22:19:29 ** DMSNTF1 ** DMSNTF1 PAGE 00330
9697
9698 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9699 // S S U U B B R R O O U U T I NN N E
9700 // S U U B B R R O O U U T I N N N E
9701 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9702 // S U U B B R R O O U U T I N N N E
9703 // S S U U B B R R O O U U T I N NN E
9704 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9705
9706 // DDDDDD M M SSSSS N N TTTTTTT FFFFFFF 1
9707 // D D MM MM S S NN N T F 11
9708 // D D M M M M S N N N T F 1 1
9709 // D D M M M SSSSS N N N T FFFFF 1
9710 // D D M M S N N N T F 1
9711 // D D M M S S N NN T F 1
9712 // DDDDDD M M SSSSS N N T F 11111
9713
9714
9715 // VIF THU 20 NOV 2025 22:19:29 ** DMSNTF1 ** DIAGNOSTICS PAGE 00331
9716
9717
9718 // VIF THU 20 NOV 2025 22:19:29 ** DMSNTF1 ** GENERATED CODE PAGE 00332
9719
9720 int_4 _dmsntf1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_8
9721 _p_ dsum_, real_8 _p_ xh_, real_4 _p_ work_, int_4 _p_ ier_)
9722 { // ** body not listed **
9819 }
9820
9821 // VIF THU 20 NOV 2025 22:19:29 ** DR1F2KB ** DR1F2KB PAGE 00334
9822
9823 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9824 // S S U U B B R R O O U U T I NN N E
9825 // S U U B B R R O O U U T I N N N E
9826 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9827 // S U U B B R R O O U U T I N N N E
9828 // S S U U B B R R O O U U T I N NN E
9829 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9830
9831 // DDDDDD RRRRRR 1 FFFFFFF 22222 K K BBBBBB
9832 // D D R R 11 F 2 2 K K B B
9833 // D D R R 1 1 F 2 K K B B
9834 // D D RRRRRR 1 FFFFF 22222 KKK BBBBBB
9835 // D D R R 1 F 2 K K B B
9836 // D D R R 1 F 2 K K B B
9837 // DDDDDD R R 11111 F 2222222 K K BBBBBB
9838
9839
9840 // VIF THU 20 NOV 2025 22:19:29 ** DR1F2KB ** DIAGNOSTICS PAGE 00335
9841
9842
9843 // VIF THU 20 NOV 2025 22:19:29 ** DR1F2KB ** GENERATED CODE PAGE 00336
9844
9845 int_4 _dr1f2kb (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
9846 _p_ wa1_)
9847 { // ** body not listed **
9899 }
9900
9901 // VIF THU 20 NOV 2025 22:19:29 ** DR1F2KF ** DR1F2KF PAGE 00338
9902
9903 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9904 // S S U U B B R R O O U U T I NN N E
9905 // S U U B B R R O O U U T I N N N E
9906 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9907 // S U U B B R R O O U U T I N N N E
9908 // S S U U B B R R O O U U T I N NN E
9909 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9910
9911 // DDDDDD RRRRRR 1 FFFFFFF 22222 K K FFFFFFF
9912 // D D R R 11 F 2 2 K K F
9913 // D D R R 1 1 F 2 K K F
9914 // D D RRRRRR 1 FFFFF 22222 KKK FFFFF
9915 // D D R R 1 F 2 K K F
9916 // D D R R 1 F 2 K K F
9917 // DDDDDD R R 11111 F 2222222 K K F
9918
9919
9920 // VIF THU 20 NOV 2025 22:19:29 ** DR1F2KF ** DIAGNOSTICS PAGE 00339
9921
9922
9923 // VIF THU 20 NOV 2025 22:19:29 ** DR1F2KF ** GENERATED CODE PAGE 00340
9924
9925 int_4 _dr1f2kf (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
9926 _p_ wa1_)
9927 { // ** body not listed **
9981 }
9982
9983 // VIF THU 20 NOV 2025 22:19:29 ** DR1F3KB ** DR1F3KB PAGE 00342
9984
9985 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
9986 // S S U U B B R R O O U U T I NN N E
9987 // S U U B B R R O O U U T I N N N E
9988 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
9989 // S U U B B R R O O U U T I N N N E
9990 // S S U U B B R R O O U U T I N NN E
9991 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
9992
9993 // DDDDDD RRRRRR 1 FFFFFFF 33333 K K BBBBBB
9994 // D D R R 11 F 3 3 K K B B
9995 // D D R R 1 1 F 3 K K B B
9996 // D D RRRRRR 1 FFFFF 33333 KKK BBBBBB
9997 // D D R R 1 F 3 K K B B
9998 // D D R R 1 F 3 3 K K B B
9999 // DDDDDD R R 11111 F 33333 K K BBBBBB
10000
10001
10002 // VIF THU 20 NOV 2025 22:19:29 ** DR1F3KB ** DIAGNOSTICS PAGE 00343
10003
10004
10005 // VIF THU 20 NOV 2025 22:19:29 ** DR1F3KB ** GENERATED CODE PAGE 00344
10006
10007 int_4 _dr1f3kb (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
10008 _p_ wa1_, real_8 _p_ wa2_)
10009 { // ** body not listed **
10077 }
10078
10079 // VIF THU 20 NOV 2025 22:19:29 ** DR1F3KF ** DR1F3KF PAGE 00346
10080
10081 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10082 // S S U U B B R R O O U U T I NN N E
10083 // S U U B B R R O O U U T I N N N E
10084 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10085 // S U U B B R R O O U U T I N N N E
10086 // S S U U B B R R O O U U T I N NN E
10087 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10088
10089 // DDDDDD RRRRRR 1 FFFFFFF 33333 K K FFFFFFF
10090 // D D R R 11 F 3 3 K K F
10091 // D D R R 1 1 F 3 K K F
10092 // D D RRRRRR 1 FFFFF 33333 KKK FFFFF
10093 // D D R R 1 F 3 K K F
10094 // D D R R 1 F 3 3 K K F
10095 // DDDDDD R R 11111 F 33333 K K F
10096
10097
10098 // VIF THU 20 NOV 2025 22:19:29 ** DR1F3KF ** DIAGNOSTICS PAGE 00347
10099
10100
10101 // VIF THU 20 NOV 2025 22:19:29 ** DR1F3KF ** GENERATED CODE PAGE 00348
10102
10103 int_4 _dr1f3kf (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
10104 _p_ wa1_, real_8 _p_ wa2_)
10105 { // ** body not listed **
10181 }
10182
10183 // VIF THU 20 NOV 2025 22:19:29 ** DR1F4KB ** DR1F4KB PAGE 00350
10184
10185 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10186 // S S U U B B R R O O U U T I NN N E
10187 // S U U B B R R O O U U T I N N N E
10188 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10189 // S U U B B R R O O U U T I N N N E
10190 // S S U U B B R R O O U U T I N NN E
10191 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10192
10193 // DDDDDD RRRRRR 1 FFFFFFF 4 K K BBBBBB
10194 // D D R R 11 F 4 4 K K B B
10195 // D D R R 1 1 F 4 4 K K B B
10196 // D D RRRRRR 1 FFFFF 4444444 KKK BBBBBB
10197 // D D R R 1 F 4 K K B B
10198 // D D R R 1 F 4 K K B B
10199 // DDDDDD R R 11111 F 4 K K BBBBBB
10200
10201
10202 // VIF THU 20 NOV 2025 22:19:29 ** DR1F4KB ** DIAGNOSTICS PAGE 00351
10203
10204
10205 // VIF THU 20 NOV 2025 22:19:29 ** DR1F4KB ** GENERATED CODE PAGE 00352
10206
10207 int_4 _dr1f4kb (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
10208 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_)
10209 { // ** body not listed **
10325 }
10326
10327 // VIF THU 20 NOV 2025 22:19:29 ** DR1F4KF ** DR1F4KF PAGE 00355
10328
10329 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10330 // S S U U B B R R O O U U T I NN N E
10331 // S U U B B R R O O U U T I N N N E
10332 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10333 // S U U B B R R O O U U T I N N N E
10334 // S S U U B B R R O O U U T I N NN E
10335 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10336
10337 // DDDDDD RRRRRR 1 FFFFFFF 4 K K FFFFFFF
10338 // D D R R 11 F 4 4 K K F
10339 // D D R R 1 1 F 4 4 K K F
10340 // D D RRRRRR 1 FFFFF 4444444 KKK FFFFF
10341 // D D R R 1 F 4 K K F
10342 // D D R R 1 F 4 K K F
10343 // DDDDDD R R 11111 F 4 K K F
10344
10345
10346 // VIF THU 20 NOV 2025 22:19:29 ** DR1F4KF ** DIAGNOSTICS PAGE 00356
10347
10348
10349 // VIF THU 20 NOV 2025 22:19:29 ** DR1F4KF ** GENERATED CODE PAGE 00357
10350
10351 int_4 _dr1f4kf (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
10352 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_)
10353 { // ** body not listed **
10469 }
10470
10471 // VIF THU 20 NOV 2025 22:19:29 ** DR1F5KB ** DR1F5KB PAGE 00360
10472
10473 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10474 // S S U U B B R R O O U U T I NN N E
10475 // S U U B B R R O O U U T I N N N E
10476 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10477 // S U U B B R R O O U U T I N N N E
10478 // S S U U B B R R O O U U T I N NN E
10479 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10480
10481 // DDDDDD RRRRRR 1 FFFFFFF 5555555 K K BBBBBB
10482 // D D R R 11 F 5 K K B B
10483 // D D R R 1 1 F 5 K K B B
10484 // D D RRRRRR 1 FFFFF 55555 KKK BBBBBB
10485 // D D R R 1 F 5 K K B B
10486 // D D R R 1 F 5 5 K K B B
10487 // DDDDDD R R 11111 F 55555 K K BBBBBB
10488
10489
10490 // VIF THU 20 NOV 2025 22:19:29 ** DR1F5KB ** DIAGNOSTICS PAGE 00361
10491
10492
10493 // VIF THU 20 NOV 2025 22:19:29 ** DR1F5KB ** GENERATED CODE PAGE 00362
10494
10495 int_4 _dr1f5kb (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
10496 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
10497 { // ** body not listed **
10668 }
10669
10670 // VIF THU 20 NOV 2025 22:19:29 ** DR1F5KF ** DR1F5KF PAGE 00366
10671
10672 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10673 // S S U U B B R R O O U U T I NN N E
10674 // S U U B B R R O O U U T I N N N E
10675 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10676 // S U U B B R R O O U U T I N N N E
10677 // S S U U B B R R O O U U T I N NN E
10678 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10679
10680 // DDDDDD RRRRRR 1 FFFFFFF 5555555 K K FFFFFFF
10681 // D D R R 11 F 5 K K F
10682 // D D R R 1 1 F 5 K K F
10683 // D D RRRRRR 1 FFFFF 55555 KKK FFFFF
10684 // D D R R 1 F 5 K K F
10685 // D D R R 1 F 5 5 K K F
10686 // DDDDDD R R 11111 F 55555 K K F
10687
10688
10689 // VIF THU 20 NOV 2025 22:19:29 ** DR1F5KF ** DIAGNOSTICS PAGE 00367
10690
10691
10692 // VIF THU 20 NOV 2025 22:19:29 ** DR1F5KF ** GENERATED CODE PAGE 00368
10693
10694 int_4 _dr1f5kf (int_4 _p_ ido_, int_4 _p_ l1_, real_8 _p_ cc_, int_4 _p_ in1_, real_8 _p_ ch_, int_4 _p_ in2_, real_8
10695 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
10696 { // ** body not listed **
10890 }
10891
10892 // VIF THU 20 NOV 2025 22:19:29 ** DR1FGKB ** DR1FGKB PAGE 00372
10893
10894 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
10895 // S S U U B B R R O O U U T I NN N E
10896 // S U U B B R R O O U U T I N N N E
10897 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
10898 // S U U B B R R O O U U T I N N N E
10899 // S S U U B B R R O O U U T I N NN E
10900 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
10901
10902 // DDDDDD RRRRRR 1 FFFFFFF GGGGG K K BBBBBB
10903 // D D R R 11 F G G K K B B
10904 // D D R R 1 1 F G K K B B
10905 // D D RRRRRR 1 FFFFF G GGGG KKK BBBBBB
10906 // D D R R 1 F G G K K B B
10907 // D D R R 1 F G G K K B B
10908 // DDDDDD R R 11111 F GGGGG K K BBBBBB
10909
10910
10911 // VIF THU 20 NOV 2025 22:19:29 ** DR1FGKB ** DIAGNOSTICS PAGE 00373
10912
10913
10914 // VIF THU 20 NOV 2025 22:19:29 ** DR1FGKB ** GENERATED CODE PAGE 00374
10915
10916 int_4 _dr1fgkb (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_8 _p_ cc_, real_8 _p_ c1_, real_8
10917 _p_ c2_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch2_, int_4 _p_ in2_, real_8 _p_ wa_)
10918 { // ** body not listed **
11161 }
11162
11163 // VIF THU 20 NOV 2025 22:19:29 ** DR1FGKF ** DR1FGKF PAGE 00379
11164
11165 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11166 // S S U U B B R R O O U U T I NN N E
11167 // S U U B B R R O O U U T I N N N E
11168 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11169 // S U U B B R R O O U U T I N N N E
11170 // S S U U B B R R O O U U T I N NN E
11171 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11172
11173 // DDDDDD RRRRRR 1 FFFFFFF GGGGG K K FFFFFFF
11174 // D D R R 11 F G G K K F
11175 // D D R R 1 1 F G K K F
11176 // D D RRRRRR 1 FFFFF G GGGG KKK FFFFF
11177 // D D R R 1 F G G K K F
11178 // D D R R 1 F G G K K F
11179 // DDDDDD R R 11111 F GGGGG K K F
11180
11181
11182 // VIF THU 20 NOV 2025 22:19:29 ** DR1FGKF ** DIAGNOSTICS PAGE 00380
11183
11184
11185 // VIF THU 20 NOV 2025 22:19:29 ** DR1FGKF ** GENERATED CODE PAGE 00381
11186
11187 int_4 _dr1fgkf (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_8 _p_ cc_, real_8 _p_ c1_, real_8
11188 _p_ c2_, int_4 _p_ in1_, real_8 _p_ ch_, real_8 _p_ ch2_, int_4 _p_ in2_, real_8 _p_ wa_)
11189 { // ** body not listed **
11433 }
11434
11435 // VIF THU 20 NOV 2025 22:19:29 ** DR2W ** DR2W PAGE 00386
11436
11437 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11438 // S S U U B B R R O O U U T I NN N E
11439 // S U U B B R R O O U U T I N N N E
11440 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11441 // S U U B B R R O O U U T I N N N E
11442 // S S U U B B R R O O U U T I N NN E
11443 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11444
11445 // DDDDDD RRRRRR 22222 W W
11446 // D D R R 2 2 W W
11447 // D D R R 2 W W
11448 // D D RRRRRR 22222 W W W
11449 // D D R R 2 W W W
11450 // D D R R 2 W W W
11451 // DDDDDD R R 2222222 WW WW
11452
11453
11454 // VIF THU 20 NOV 2025 22:19:29 ** DR2W ** DIAGNOSTICS PAGE 00387
11455
11456
11457 // VIF THU 20 NOV 2025 22:19:29 ** DR2W ** GENERATED CODE PAGE 00388
11458
11459 int_4 _dr2w (int_4 _p_ ldr_, int_4 _p_ ldw_, int_4 _p_ l_, int_4 _p_ m_, real_8 _p_ r_, real_8 _p_ w_)
11460 { // ** body not listed **
11469 }
11470
11471 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1B ** DRFFT1B PAGE 00389
11472
11473 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11474 // S S U U B B R R O O U U T I NN N E
11475 // S U U B B R R O O U U T I N N N E
11476 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11477 // S U U B B R R O O U U T I N N N E
11478 // S S U U B B R R O O U U T I N NN E
11479 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11480
11481 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT 1 BBBBBB
11482 // D D R R F F T 11 B B
11483 // D D R R F F T 1 1 B B
11484 // D D RRRRRR FFFFF FFFFF T 1 BBBBBB
11485 // D D R R F F T 1 B B
11486 // D D R R F F T 1 B B
11487 // DDDDDD R R F F T 11111 BBBBBB
11488
11489
11490 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1B ** DIAGNOSTICS PAGE 00390
11491
11492
11493 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1B ** GENERATED CODE PAGE 00391
11494
11495 int_4 _drfft1b (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ r_, int_4 _p_ lenr_, real_8 _p_ wsave_, int_4 _p_ lensav_,
11496 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
11497 { // ** body not listed **
11520 }
11521
11522 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1F ** DRFFT1F PAGE 00392
11523
11524 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11525 // S S U U B B R R O O U U T I NN N E
11526 // S U U B B R R O O U U T I N N N E
11527 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11528 // S U U B B R R O O U U T I N N N E
11529 // S S U U B B R R O O U U T I N NN E
11530 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11531
11532 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT 1 FFFFFFF
11533 // D D R R F F T 11 F
11534 // D D R R F F T 1 1 F
11535 // D D RRRRRR FFFFF FFFFF T 1 FFFFF
11536 // D D R R F F T 1 F
11537 // D D R R F F T 1 F
11538 // DDDDDD R R F F T 11111 F
11539
11540
11541 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1F ** DIAGNOSTICS PAGE 00393
11542
11543
11544 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1F ** GENERATED CODE PAGE 00394
11545
11546 int_4 _drfft1f (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ r_, int_4 _p_ lenr_, real_8 _p_ wsave_, int_4 _p_ lensav_,
11547 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
11548 { // ** body not listed **
11571 }
11572
11573 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1I ** DRFFT1I PAGE 00395
11574
11575 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11576 // S S U U B B R R O O U U T I NN N E
11577 // S U U B B R R O O U U T I N N N E
11578 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11579 // S U U B B R R O O U U T I N N N E
11580 // S S U U B B R R O O U U T I N NN E
11581 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11582
11583 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT 1 III
11584 // D D R R F F T 11 I
11585 // D D R R F F T 1 1 I
11586 // D D RRRRRR FFFFF FFFFF T 1 I
11587 // D D R R F F T 1 I
11588 // D D R R F F T 1 I
11589 // DDDDDD R R F F T 11111 III
11590
11591
11592 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1I ** DIAGNOSTICS PAGE 00396
11593
11594
11595 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT1I ** GENERATED CODE PAGE 00397
11596
11597 int_4 _drfft1i (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
11598 { // ** body not listed **
11613 }
11614
11615 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2B ** DRFFT2B PAGE 00398
11616
11617 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11618 // S S U U B B R R O O U U T I NN N E
11619 // S U U B B R R O O U U T I N N N E
11620 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11621 // S U U B B R R O O U U T I N N N E
11622 // S S U U B B R R O O U U T I N NN E
11623 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11624
11625 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT 22222 BBBBBB
11626 // D D R R F F T 2 2 B B
11627 // D D R R F F T 2 B B
11628 // D D RRRRRR FFFFF FFFFF T 22222 BBBBBB
11629 // D D R R F F T 2 B B
11630 // D D R R F F T 2 B B
11631 // DDDDDD R R F F T 2222222 BBBBBB
11632
11633
11634 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2B ** DIAGNOSTICS PAGE 00399
11635
11636
11637 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2B ** GENERATED CODE PAGE 00400
11638
11639 int_4 _drfft2b (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, real_8 _p_ r_, real_8 _p_ wsave_, int_4 _p_ lensav_,
11640 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
11641 { // ** body not listed **
11729 }
11730
11731 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2F ** DRFFT2F PAGE 00402
11732
11733 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11734 // S S U U B B R R O O U U T I NN N E
11735 // S U U B B R R O O U U T I N N N E
11736 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11737 // S U U B B R R O O U U T I N N N E
11738 // S S U U B B R R O O U U T I N NN E
11739 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11740
11741 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT 22222 FFFFFFF
11742 // D D R R F F T 2 2 F
11743 // D D R R F F T 2 F
11744 // D D RRRRRR FFFFF FFFFF T 22222 FFFFF
11745 // D D R R F F T 2 F
11746 // D D R R F F T 2 F
11747 // DDDDDD R R F F T 2222222 F
11748
11749
11750 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2F ** DIAGNOSTICS PAGE 00403
11751
11752
11753 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2F ** GENERATED CODE PAGE 00404
11754
11755 int_4 _drfft2f (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, real_8 _p_ r_, real_8 _p_ wsave_, int_4 _p_ lensav_,
11756 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
11757 { // ** body not listed **
11844 }
11845
11846 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2I ** DRFFT2I PAGE 00406
11847
11848 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11849 // S S U U B B R R O O U U T I NN N E
11850 // S U U B B R R O O U U T I N N N E
11851 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11852 // S U U B B R R O O U U T I N N N E
11853 // S S U U B B R R O O U U T I N NN E
11854 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11855
11856 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT 22222 III
11857 // D D R R F F T 2 2 I
11858 // D D R R F F T 2 I
11859 // D D RRRRRR FFFFF FFFFF T 22222 I
11860 // D D R R F F T 2 I
11861 // D D R R F F T 2 I
11862 // DDDDDD R R F F T 2222222 III
11863
11864
11865 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2I ** DIAGNOSTICS PAGE 00407
11866
11867
11868 // VIF THU 20 NOV 2025 22:19:29 ** DRFFT2I ** GENERATED CODE PAGE 00408
11869
11870 int_4 _drfft2i (int_4 _p_ l_, int_4 _p_ m_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
11871 { // ** body not listed **
11907 }
11908
11909 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTB1 ** DRFFTB1 PAGE 00409
11910
11911 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
11912 // S S U U B B R R O O U U T I NN N E
11913 // S U U B B R R O O U U T I N N N E
11914 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
11915 // S U U B B R R O O U U T I N N N E
11916 // S S U U B B R R O O U U T I N NN E
11917 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
11918
11919 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT BBBBBB 1
11920 // D D R R F F T B B 11
11921 // D D R R F F T B B 1 1
11922 // D D RRRRRR FFFFF FFFFF T BBBBBB 1
11923 // D D R R F F T B B 1
11924 // D D R R F F T B B 1
11925 // DDDDDD R R F F T BBBBBB 11111
11926
11927
11928 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTB1 ** DIAGNOSTICS PAGE 00410
11929
11930
11931 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTB1 ** GENERATED CODE PAGE 00411
11932
11933 int_4 _drfftb1 (int_4 _p_ n_, int_4 _p_ in_, real_8 _p_ c_, real_8 _p_ ch_, real_8 _p_ wa_, real_8 _p_ fac_)
11934 { // ** body not listed **
12064 }
12065
12066 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTF1 ** DRFFTF1 PAGE 00414
12067
12068 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12069 // S S U U B B R R O O U U T I NN N E
12070 // S U U B B R R O O U U T I N N N E
12071 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12072 // S U U B B R R O O U U T I N N N E
12073 // S S U U B B R R O O U U T I N NN E
12074 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12075
12076 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT FFFFFFF 1
12077 // D D R R F F T F 11
12078 // D D R R F F T F 1 1
12079 // D D RRRRRR FFFFF FFFFF T FFFFF 1
12080 // D D R R F F T F 1
12081 // D D R R F F T F 1
12082 // DDDDDD R R F F T F 11111
12083
12084
12085 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTF1 ** DIAGNOSTICS PAGE 00415
12086
12087
12088 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTF1 ** GENERATED CODE PAGE 00416
12089
12090 int_4 _drfftf1 (int_4 _p_ n_, int_4 _p_ in_, real_8 _p_ c_, real_8 _p_ ch_, real_8 _p_ wa_, real_8 _p_ fac_)
12091 { // ** body not listed **
12213 }
12214
12215 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTI1 ** DRFFTI1 PAGE 00419
12216
12217 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12218 // S S U U B B R R O O U U T I NN N E
12219 // S U U B B R R O O U U T I N N N E
12220 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12221 // S U U B B R R O O U U T I N N N E
12222 // S S U U B B R R O O U U T I N NN E
12223 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12224
12225 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT III 1
12226 // D D R R F F T I 11
12227 // D D R R F F T I 1 1
12228 // D D RRRRRR FFFFF FFFFF T I 1
12229 // D D R R F F T I 1
12230 // D D R R F F T I 1
12231 // DDDDDD R R F F T III 11111
12232
12233
12234 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTI1 ** DIAGNOSTICS PAGE 00420
12235
12236
12237 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTI1 ** GENERATED CODE PAGE 00421
12238
12239 int_4 _drffti1 (int_4 _p_ n_, real_8 _p_ wa_, real_8 _p_ fac_)
12240 { // ** body not listed **
12362 }
12363
12364 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMB ** DRFFTMB PAGE 00424
12365
12366 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12367 // S S U U B B R R O O U U T I NN N E
12368 // S U U B B R R O O U U T I N N N E
12369 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12370 // S U U B B R R O O U U T I N N N E
12371 // S S U U B B R R O O U U T I N NN E
12372 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12373
12374 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT M M BBBBBB
12375 // D D R R F F T MM MM B B
12376 // D D R R F F T M M M M B B
12377 // D D RRRRRR FFFFF FFFFF T M M M BBBBBB
12378 // D D R R F F T M M B B
12379 // D D R R F F T M M B B
12380 // DDDDDD R R F F T M M BBBBBB
12381
12382
12383 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMB ** DIAGNOSTICS PAGE 00425
12384
12385
12386 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMB ** GENERATED CODE PAGE 00426
12387
12388 int_4 _drfftmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ r_, int_4 _p_ lenr_, real_8
12389 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
12390 { // ** body not listed **
12417 }
12418
12419 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMF ** DRFFTMF PAGE 00427
12420
12421 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12422 // S S U U B B R R O O U U T I NN N E
12423 // S U U B B R R O O U U T I N N N E
12424 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12425 // S U U B B R R O O U U T I N N N E
12426 // S S U U B B R R O O U U T I N NN E
12427 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12428
12429 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT M M FFFFFFF
12430 // D D R R F F T MM MM F
12431 // D D R R F F T M M M M F
12432 // D D RRRRRR FFFFF FFFFF T M M M FFFFF
12433 // D D R R F F T M M F
12434 // D D R R F F T M M F
12435 // DDDDDD R R F F T M M F
12436
12437
12438 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMF ** DIAGNOSTICS PAGE 00428
12439
12440
12441 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMF ** GENERATED CODE PAGE 00429
12442
12443 int_4 _drfftmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ r_, int_4 _p_ lenr_, real_8
12444 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
12445 { // ** body not listed **
12472 }
12473
12474 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMI ** DRFFTMI PAGE 00430
12475
12476 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12477 // S S U U B B R R O O U U T I NN N E
12478 // S U U B B R R O O U U T I N N N E
12479 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12480 // S U U B B R R O O U U T I N N N E
12481 // S S U U B B R R O O U U T I N NN E
12482 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12483
12484 // DDDDDD RRRRRR FFFFFFF FFFFFFF TTTTTTT M M III
12485 // D D R R F F T MM MM I
12486 // D D R R F F T M M M M I
12487 // D D RRRRRR FFFFF FFFFF T M M M I
12488 // D D R R F F T M M I
12489 // D D R R F F T M M I
12490 // DDDDDD R R F F T M M III
12491
12492
12493 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMI ** DIAGNOSTICS PAGE 00431
12494
12495
12496 // VIF THU 20 NOV 2025 22:19:29 ** DRFFTMI ** GENERATED CODE PAGE 00432
12497
12498 int_4 _drfftmi (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
12499 { // ** body not listed **
12514 }
12515
12516 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1B ** DSINQ1B PAGE 00433
12517
12518 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12519 // S S U U B B R R O O U U T I NN N E
12520 // S U U B B R R O O U U T I N N N E
12521 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12522 // S U U B B R R O O U U T I N N N E
12523 // S S U U B B R R O O U U T I N NN E
12524 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12525
12526 // DDDDDD SSSSS III N N QQQQQ 1 BBBBBB
12527 // D D S S I NN N Q Q 11 B B
12528 // D D S I N N N Q Q 1 1 B B
12529 // D D SSSSS I N N N Q Q 1 BBBBBB
12530 // D D S I N N N Q Q Q 1 B B
12531 // D D S S I N NN Q Q 1 B B
12532 // DDDDDD SSSSS III N N QQQQ Q 11111 BBBBBB
12533
12534
12535 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1B ** DIAGNOSTICS PAGE 00434
12536
12537
12538 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1B ** GENERATED CODE PAGE 00435
12539
12540 int_4 _dsinq1b (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
12541 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
12542 { // ** body not listed **
12585 }
12586
12587 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1F ** DSINQ1F PAGE 00436
12588
12589 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12590 // S S U U B B R R O O U U T I NN N E
12591 // S U U B B R R O O U U T I N N N E
12592 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12593 // S U U B B R R O O U U T I N N N E
12594 // S S U U B B R R O O U U T I N NN E
12595 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12596
12597 // DDDDDD SSSSS III N N QQQQQ 1 FFFFFFF
12598 // D D S S I NN N Q Q 11 F
12599 // D D S I N N N Q Q 1 1 F
12600 // D D SSSSS I N N N Q Q 1 FFFFF
12601 // D D S I N N N Q Q Q 1 F
12602 // D D S S I N NN Q Q 1 F
12603 // DDDDDD SSSSS III N N QQQQ Q 11111 F
12604
12605
12606 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1F ** DIAGNOSTICS PAGE 00437
12607
12608
12609 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1F ** GENERATED CODE PAGE 00438
12610
12611 int_4 _dsinq1f (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
12612 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
12613 { // ** body not listed **
12657 }
12658
12659 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1I ** DSINQ1I PAGE 00439
12660
12661 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12662 // S S U U B B R R O O U U T I NN N E
12663 // S U U B B R R O O U U T I N N N E
12664 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12665 // S U U B B R R O O U U T I N N N E
12666 // S S U U B B R R O O U U T I N NN E
12667 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12668
12669 // DDDDDD SSSSS III N N QQQQQ 1 III
12670 // D D S S I NN N Q Q 11 I
12671 // D D S I N N N Q Q 1 1 I
12672 // D D SSSSS I N N N Q Q 1 I
12673 // D D S I N N N Q Q Q 1 I
12674 // D D S S I N NN Q Q 1 I
12675 // DDDDDD SSSSS III N N QQQQ Q 11111 III
12676
12677
12678 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1I ** DIAGNOSTICS PAGE 00440
12679
12680
12681 // VIF THU 20 NOV 2025 22:19:29 ** DSINQ1I ** GENERATED CODE PAGE 00441
12682
12683 int_4 _dsinq1i (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
12684 { // ** body not listed **
12702 }
12703
12704 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMB ** DSINQMB PAGE 00442
12705
12706 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12707 // S S U U B B R R O O U U T I NN N E
12708 // S U U B B R R O O U U T I N N N E
12709 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12710 // S U U B B R R O O U U T I N N N E
12711 // S S U U B B R R O O U U T I N NN E
12712 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12713
12714 // DDDDDD SSSSS III N N QQQQQ M M BBBBBB
12715 // D D S S I NN N Q Q MM MM B B
12716 // D D S I N N N Q Q M M M M B B
12717 // D D SSSSS I N N N Q Q M M M BBBBBB
12718 // D D S I N N N Q Q Q M M B B
12719 // D D S S I N NN Q Q M M B B
12720 // DDDDDD SSSSS III N N QQQQ Q M M BBBBBB
12721
12722
12723 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMB ** DIAGNOSTICS PAGE 00443
12724
12725
12726 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMB ** GENERATED CODE PAGE 00444
12727
12728 int_4 _dsinqmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
12729 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
12730 { // ** body not listed **
12787 }
12788
12789 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMF ** DSINQMF PAGE 00446
12790
12791 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12792 // S S U U B B R R O O U U T I NN N E
12793 // S U U B B R R O O U U T I N N N E
12794 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12795 // S U U B B R R O O U U T I N N N E
12796 // S S U U B B R R O O U U T I N NN E
12797 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12798
12799 // DDDDDD SSSSS III N N QQQQQ M M FFFFFFF
12800 // D D S S I NN N Q Q MM MM F
12801 // D D S I N N N Q Q M M M M F
12802 // D D SSSSS I N N N Q Q M M M FFFFF
12803 // D D S I N N N Q Q Q M M F
12804 // D D S S I N NN Q Q M M F
12805 // DDDDDD SSSSS III N N QQQQ Q M M F
12806
12807
12808 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMF ** DIAGNOSTICS PAGE 00447
12809
12810
12811 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMF ** GENERATED CODE PAGE 00448
12812
12813 int_4 _dsinqmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
12814 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
12815 { // ** body not listed **
12871 }
12872
12873 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMI ** DSINQMI PAGE 00450
12874
12875 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12876 // S S U U B B R R O O U U T I NN N E
12877 // S U U B B R R O O U U T I N N N E
12878 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12879 // S U U B B R R O O U U T I N N N E
12880 // S S U U B B R R O O U U T I N NN E
12881 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12882
12883 // DDDDDD SSSSS III N N QQQQQ M M III
12884 // D D S S I NN N Q Q MM MM I
12885 // D D S I N N N Q Q M M M M I
12886 // D D SSSSS I N N N Q Q M M M I
12887 // D D S I N N N Q Q Q M M I
12888 // D D S S I N NN Q Q M M I
12889 // DDDDDD SSSSS III N N QQQQ Q M M III
12890
12891
12892 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMI ** DIAGNOSTICS PAGE 00451
12893
12894
12895 // VIF THU 20 NOV 2025 22:19:29 ** DSINQMI ** GENERATED CODE PAGE 00452
12896
12897 int_4 _dsinqmi (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
12898 { // ** body not listed **
12916 }
12917
12918 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1B ** DSINT1B PAGE 00453
12919
12920 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12921 // S S U U B B R R O O U U T I NN N E
12922 // S U U B B R R O O U U T I N N N E
12923 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12924 // S U U B B R R O O U U T I N N N E
12925 // S S U U B B R R O O U U T I N NN E
12926 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12927
12928 // DDDDDD SSSSS III N N TTTTTTT 1 BBBBBB
12929 // D D S S I NN N T 11 B B
12930 // D D S I N N N T 1 1 B B
12931 // D D SSSSS I N N N T 1 BBBBBB
12932 // D D S I N N N T 1 B B
12933 // D D S S I N NN T 1 B B
12934 // DDDDDD SSSSS III N N T 11111 BBBBBB
12935
12936
12937 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1B ** DIAGNOSTICS PAGE 00454
12938
12939
12940 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1B ** GENERATED CODE PAGE 00455
12941
12942 int_4 _dsint1b (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
12943 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
12944 { // ** body not listed **
12972 }
12973
12974 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1F ** DSINT1F PAGE 00456
12975
12976 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
12977 // S S U U B B R R O O U U T I NN N E
12978 // S U U B B R R O O U U T I N N N E
12979 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
12980 // S U U B B R R O O U U T I N N N E
12981 // S S U U B B R R O O U U T I N NN E
12982 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
12983
12984 // DDDDDD SSSSS III N N TTTTTTT 1 FFFFFFF
12985 // D D S S I NN N T 11 F
12986 // D D S I N N N T 1 1 F
12987 // D D SSSSS I N N N T 1 FFFFF
12988 // D D S I N N N T 1 F
12989 // D D S S I N NN T 1 F
12990 // DDDDDD SSSSS III N N T 11111 F
12991
12992
12993 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1F ** DIAGNOSTICS PAGE 00457
12994
12995
12996 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1F ** GENERATED CODE PAGE 00458
12997
12998 int_4 _dsint1f (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8 _p_ wsave_, int_4 _p_ lensav_,
12999 real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
13000 { // ** body not listed **
13028 }
13029
13030 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1I ** DSINT1I PAGE 00459
13031
13032 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13033 // S S U U B B R R O O U U T I NN N E
13034 // S U U B B R R O O U U T I N N N E
13035 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13036 // S U U B B R R O O U U T I N N N E
13037 // S S U U B B R R O O U U T I N NN E
13038 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13039
13040 // DDDDDD SSSSS III N N TTTTTTT 1 III
13041 // D D S S I NN N T 11 I
13042 // D D S I N N N T 1 1 I
13043 // D D SSSSS I N N N T 1 I
13044 // D D S I N N N T 1 I
13045 // D D S S I N NN T 1 I
13046 // DDDDDD SSSSS III N N T 11111 III
13047
13048
13049 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1I ** DIAGNOSTICS PAGE 00460
13050
13051
13052 // VIF THU 20 NOV 2025 22:19:29 ** DSINT1I ** GENERATED CODE PAGE 00461
13053
13054 int_4 _dsint1i (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
13055 { // ** body not listed **
13087 }
13088
13089 // VIF THU 20 NOV 2025 22:19:29 ** DSINTB1 ** DSINTB1 PAGE 00462
13090
13091 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13092 // S S U U B B R R O O U U T I NN N E
13093 // S U U B B R R O O U U T I N N N E
13094 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13095 // S U U B B R R O O U U T I N N N E
13096 // S S U U B B R R O O U U T I N NN E
13097 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13098
13099 // DDDDDD SSSSS III N N TTTTTTT BBBBBB 1
13100 // D D S S I NN N T B B 11
13101 // D D S I N N N T B B 1 1
13102 // D D SSSSS I N N N T BBBBBB 1
13103 // D D S I N N N T B B 1
13104 // D D S S I N NN T B B 1
13105 // DDDDDD SSSSS III N N T BBBBBB 11111
13106
13107
13108 // VIF THU 20 NOV 2025 22:19:29 ** DSINTB1 ** DIAGNOSTICS PAGE 00463
13109
13110
13111 // VIF THU 20 NOV 2025 22:19:29 ** DSINTB1 ** GENERATED CODE PAGE 00464
13112
13113 int_4 _dsintb1 (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_8 _p_ xh_, real_4 _p_ work_, int_4
13114 _p_ ier_)
13115 { // ** body not listed **
13184 }
13185
13186 // VIF THU 20 NOV 2025 22:19:29 ** DSINTF1 ** DSINTF1 PAGE 00466
13187
13188 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13189 // S S U U B B R R O O U U T I NN N E
13190 // S U U B B R R O O U U T I N N N E
13191 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13192 // S U U B B R R O O U U T I N N N E
13193 // S S U U B B R R O O U U T I N NN E
13194 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13195
13196 // DDDDDD SSSSS III N N TTTTTTT FFFFFFF 1
13197 // D D S S I NN N T F 11
13198 // D D S I N N N T F 1 1
13199 // D D SSSSS I N N N T FFFFF 1
13200 // D D S I N N N T F 1
13201 // D D S S I N NN T F 1
13202 // DDDDDD SSSSS III N N T F 11111
13203
13204
13205 // VIF THU 20 NOV 2025 22:19:29 ** DSINTF1 ** DIAGNOSTICS PAGE 00467
13206
13207
13208 // VIF THU 20 NOV 2025 22:19:29 ** DSINTF1 ** GENERATED CODE PAGE 00468
13209
13210 int_4 _dsintf1 (int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, real_8 _p_ wsave_, real_8 _p_ xh_, real_4 _p_ work_, int_4
13211 _p_ ier_)
13212 { // ** body not listed **
13281 }
13282
13283 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMB ** DSINTMB PAGE 00470
13284
13285 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13286 // S S U U B B R R O O U U T I NN N E
13287 // S U U B B R R O O U U T I N N N E
13288 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13289 // S U U B B R R O O U U T I N N N E
13290 // S S U U B B R R O O U U T I N NN E
13291 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13292
13293 // DDDDDD SSSSS III N N TTTTTTT M M BBBBBB
13294 // D D S S I NN N T MM MM B B
13295 // D D S I N N N T M M M M B B
13296 // D D SSSSS I N N N T M M M BBBBBB
13297 // D D S I N N N T M M B B
13298 // D D S S I N NN T M M B B
13299 // DDDDDD SSSSS III N N T M M BBBBBB
13300
13301
13302 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMB ** DIAGNOSTICS PAGE 00471
13303
13304
13305 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMB ** GENERATED CODE PAGE 00472
13306
13307 int_4 _dsintmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
13308 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
13309 { // ** body not listed **
13344 }
13345
13346 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMF ** DSINTMF PAGE 00473
13347
13348 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13349 // S S U U B B R R O O U U T I NN N E
13350 // S U U B B R R O O U U T I N N N E
13351 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13352 // S U U B B R R O O U U T I N N N E
13353 // S S U U B B R R O O U U T I N NN E
13354 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13355
13356 // DDDDDD SSSSS III N N TTTTTTT M M FFFFFFF
13357 // D D S S I NN N T MM MM F
13358 // D D S I N N N T M M M M F
13359 // D D SSSSS I N N N T M M M FFFFF
13360 // D D S I N N N T M M F
13361 // D D S S I N NN T M M F
13362 // DDDDDD SSSSS III N N T M M F
13363
13364
13365 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMF ** DIAGNOSTICS PAGE 00474
13366
13367
13368 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMF ** GENERATED CODE PAGE 00475
13369
13370 int_4 _dsintmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_8 _p_ x_, int_4 _p_ lenx_, real_8
13371 _p_ wsave_, int_4 _p_ lensav_, real_8 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
13372 { // ** body not listed **
13407 }
13408
13409 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMI ** DSINTMI PAGE 00476
13410
13411 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13412 // S S U U B B R R O O U U T I NN N E
13413 // S U U B B R R O O U U T I N N N E
13414 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13415 // S U U B B R R O O U U T I N N N E
13416 // S S U U B B R R O O U U T I N NN E
13417 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13418
13419 // DDDDDD SSSSS III N N TTTTTTT M M III
13420 // D D S S I NN N T MM MM I
13421 // D D S I N N N T M M M M I
13422 // D D SSSSS I N N N T M M M I
13423 // D D S I N N N T M M I
13424 // D D S S I N NN T M M I
13425 // DDDDDD SSSSS III N N T M M III
13426
13427
13428 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMI ** DIAGNOSTICS PAGE 00477
13429
13430
13431 // VIF THU 20 NOV 2025 22:19:29 ** DSINTMI ** GENERATED CODE PAGE 00478
13432
13433 int_4 _dsintmi (int_4 _p_ n_, real_8 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
13434 { // ** body not listed **
13466 }
13467
13468 // VIF THU 20 NOV 2025 22:19:29 ** DTABLES ** DTABLES PAGE 00479
13469
13470 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13471 // S S U U B B R R O O U U T I NN N E
13472 // S U U B B R R O O U U T I N N N E
13473 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13474 // S U U B B R R O O U U T I N N N E
13475 // S S U U B B R R O O U U T I N NN E
13476 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13477
13478 // DDDDDD TTTTTTT A BBBBBB L EEEEEEE SSSSS
13479 // D D T A A B B L E S S
13480 // D D T A A B B L E S
13481 // D D T A A BBBBBB L EEEEE SSSSS
13482 // D D T AAAAAAA B B L E S
13483 // D D T A A B B L E S S
13484 // DDDDDD T A A BBBBBB LLLLLLL EEEEEEE SSSSS
13485
13486
13487 // VIF THU 20 NOV 2025 22:19:29 ** DTABLES ** DIAGNOSTICS PAGE 00480
13488
13489
13490 // VIF THU 20 NOV 2025 22:19:29 ** DTABLES ** GENERATED CODE PAGE 00481
13491
13492 int_4 _dtables (int_4 _p_ ido_, int_4 _p_ ip_, real_8 _p_ wa_)
13493 { // ** body not listed **
13516 }
13517
13518 // VIF THU 20 NOV 2025 22:19:29 ** DW2R ** DW2R PAGE 00482
13519
13520 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13521 // S S U U B B R R O O U U T I NN N E
13522 // S U U B B R R O O U U T I N N N E
13523 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13524 // S U U B B R R O O U U T I N N N E
13525 // S S U U B B R R O O U U T I N NN E
13526 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13527
13528 // DDDDDD W W 22222 RRRRRR
13529 // D D W W 2 2 R R
13530 // D D W W 2 R R
13531 // D D W W W 22222 RRRRRR
13532 // D D W W W 2 R R
13533 // D D W W W 2 R R
13534 // DDDDDD WW WW 2222222 R R
13535
13536
13537 // VIF THU 20 NOV 2025 22:19:29 ** DW2R ** DIAGNOSTICS PAGE 00483
13538
13539
13540 // VIF THU 20 NOV 2025 22:19:29 ** DW2R ** GENERATED CODE PAGE 00484
13541
13542 int_4 _dw2r (int_4 _p_ ldr_, int_4 _p_ ldw_, int_4 _p_ l_, int_4 _p_ m_, real_8 _p_ r_, real_8 _p_ w_)
13543 { // ** body not listed **
13552 }
13553
13554 // VIF THU 20 NOV 2025 22:19:29 ** XERCON ** XERCON PAGE 00485
13555
13556 // L OOOOO GGGGG III CCCCC A L 4
13557 // L O O G G I C C A A L * * 4 4
13558 // L O O G I C A A L * * 4 4
13559 // L O O G GGGG I C A A L ******* 4444444
13560 // L O O G G I C AAAAAAA L * * 4
13561 // L O O G G I C C A A L * * 4
13562 // LLLLLLL OOOOO GGGGG III CCCCC A A LLLLLLL 4
13563
13564 // FFFFFFF U U N N CCCCC TTTTTTT III OOOOO N N
13565 // F U U NN N C C T I O O NN N
13566 // F U U N N N C T I O O N N N
13567 // FFFFF U U N N N C T I O O N N N
13568 // F U U N N N C T I O O N N N
13569 // F U U N NN C C T I O O N NN
13570 // F UUUUU N N CCCCC T III OOOOO N N
13571
13572 // X X EEEEEEE RRRRRR CCCCC OOOOO N N
13573 // X X E R R C C O O NN N
13574 // X X E R R C O O N N N
13575 // X EEEEE RRRRRR C O O N N N
13576 // X X E R R C O O N N N
13577 // X X E R R C C O O N NN
13578 // X X EEEEEEE R R CCCCC OOOOO N N
13579
13580
13581 // VIF THU 20 NOV 2025 22:19:29 ** XERCON ** DIAGNOSTICS PAGE 00486
13582
13583
13584 // VIF THU 20 NOV 2025 22:19:29 ** XERCON ** GENERATED CODE PAGE 00487
13585
13586 logical_4 _xercon (int_4 _p_ inc_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ lot_)
13587 { // ** body not listed **
13608 }
13609
13610 // VIF THU 20 NOV 2025 22:19:29 ** XERFFT ** XERFFT PAGE 00488
13611
13612 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
13613 // S S U U B B R R O O U U T I NN N E
13614 // S U U B B R R O O U U T I N N N E
13615 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
13616 // S U U B B R R O O U U T I N N N E
13617 // S S U U B B R R O O U U T I N NN E
13618 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
13619
13620 // X X EEEEEEE RRRRRR FFFFFFF FFFFFFF TTTTTTT
13621 // X X E R R F F T
13622 // X X E R R F F T
13623 // X EEEEE RRRRRR FFFFF FFFFF T
13624 // X X E R R F F T
13625 // X X E R R F F T
13626 // X X EEEEEEE R R F F T
13627
13628
13629 // VIF THU 20 NOV 2025 22:19:29 ** XERFFT ** DIAGNOSTICS PAGE 00489
13630
13631
13632 // VIF THU 20 NOV 2025 22:19:29 ** XERFFT ** GENERATED CODE PAGE 00490
13633
13634 int_4 _xerfft (char _p_ srname_, int_4 _p_ info_)
13635 { // ** body not listed **
14185 }
14186
14187 // VIF THU 20 NOV 2025 22:19:29 ** C1F2KB ** C1F2KB PAGE 00501
14188
14189 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14190 // S S U U B B R R O O U U T I NN N E
14191 // S U U B B R R O O U U T I N N N E
14192 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14193 // S U U B B R R O O U U T I N N N E
14194 // S S U U B B R R O O U U T I N NN E
14195 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14196
14197 // CCCCC 1 FFFFFFF 22222 K K BBBBBB
14198 // C C 11 F 2 2 K K B B
14199 // C 1 1 F 2 K K B B
14200 // C 1 FFFFF 22222 KKK BBBBBB
14201 // C 1 F 2 K K B B
14202 // C C 1 F 2 K K B B
14203 // CCCCC 11111 F 2222222 K K BBBBBB
14204
14205
14206 // VIF THU 20 NOV 2025 22:19:29 ** C1F2KB ** DIAGNOSTICS PAGE 00502
14207
14208
14209 // VIF THU 20 NOV 2025 22:19:29 ** C1F2KB ** GENERATED CODE PAGE 00503
14210
14211 int_4 _c1f2kb (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
14212 in2_, real_4 _p_ wa_)
14213 { // ** body not listed **
14267 }
14268
14269 // VIF THU 20 NOV 2025 22:19:29 ** C1F2KF ** C1F2KF PAGE 00505
14270
14271 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14272 // S S U U B B R R O O U U T I NN N E
14273 // S U U B B R R O O U U T I N N N E
14274 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14275 // S U U B B R R O O U U T I N N N E
14276 // S S U U B B R R O O U U T I N NN E
14277 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14278
14279 // CCCCC 1 FFFFFFF 22222 K K FFFFFFF
14280 // C C 11 F 2 2 K K F
14281 // C 1 1 F 2 K K F
14282 // C 1 FFFFF 22222 KKK FFFFF
14283 // C 1 F 2 K K F
14284 // C C 1 F 2 K K F
14285 // CCCCC 11111 F 2222222 K K F
14286
14287
14288 // VIF THU 20 NOV 2025 22:19:29 ** C1F2KF ** DIAGNOSTICS PAGE 00506
14289
14290
14291 // VIF THU 20 NOV 2025 22:19:29 ** C1F2KF ** GENERATED CODE PAGE 00507
14292
14293 int_4 _c1f2kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
14294 in2_, real_4 _p_ wa_)
14295 { // ** body not listed **
14362 }
14363
14364 // VIF THU 20 NOV 2025 22:19:29 ** C1F3KB ** C1F3KB PAGE 00509
14365
14366 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14367 // S S U U B B R R O O U U T I NN N E
14368 // S U U B B R R O O U U T I N N N E
14369 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14370 // S U U B B R R O O U U T I N N N E
14371 // S S U U B B R R O O U U T I N NN E
14372 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14373
14374 // CCCCC 1 FFFFFFF 33333 K K BBBBBB
14375 // C C 11 F 3 3 K K B B
14376 // C 1 1 F 3 K K B B
14377 // C 1 FFFFF 33333 KKK BBBBBB
14378 // C 1 F 3 K K B B
14379 // C C 1 F 3 3 K K B B
14380 // CCCCC 11111 F 33333 K K BBBBBB
14381
14382
14383 // VIF THU 20 NOV 2025 22:19:29 ** C1F3KB ** DIAGNOSTICS PAGE 00510
14384
14385
14386 // VIF THU 20 NOV 2025 22:19:29 ** C1F3KB ** GENERATED CODE PAGE 00511
14387
14388 int_4 _c1f3kb (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
14389 in2_, real_4 _p_ wa_)
14390 { // ** body not listed **
14497 }
14498
14499 // VIF THU 20 NOV 2025 22:19:29 ** C1F3KF ** C1F3KF PAGE 00514
14500
14501 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14502 // S S U U B B R R O O U U T I NN N E
14503 // S U U B B R R O O U U T I N N N E
14504 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14505 // S U U B B R R O O U U T I N N N E
14506 // S S U U B B R R O O U U T I N NN E
14507 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14508
14509 // CCCCC 1 FFFFFFF 33333 K K FFFFFFF
14510 // C C 11 F 3 3 K K F
14511 // C 1 1 F 3 K K F
14512 // C 1 FFFFF 33333 KKK FFFFF
14513 // C 1 F 3 K K F
14514 // C C 1 F 3 3 K K F
14515 // CCCCC 11111 F 33333 K K F
14516
14517
14518 // VIF THU 20 NOV 2025 22:19:29 ** C1F3KF ** DIAGNOSTICS PAGE 00515
14519
14520
14521 // VIF THU 20 NOV 2025 22:19:29 ** C1F3KF ** GENERATED CODE PAGE 00516
14522
14523 int_4 _c1f3kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
14524 in2_, real_4 _p_ wa_)
14525 { // ** body not listed **
14655 }
14656
14657 // VIF THU 20 NOV 2025 22:19:29 ** C1F4KB ** C1F4KB PAGE 00519
14658
14659 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14660 // S S U U B B R R O O U U T I NN N E
14661 // S U U B B R R O O U U T I N N N E
14662 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14663 // S U U B B R R O O U U T I N N N E
14664 // S S U U B B R R O O U U T I N NN E
14665 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14666
14667 // CCCCC 1 FFFFFFF 4 K K BBBBBB
14668 // C C 11 F 4 4 K K B B
14669 // C 1 1 F 4 4 K K B B
14670 // C 1 FFFFF 4444444 KKK BBBBBB
14671 // C 1 F 4 K K B B
14672 // C C 1 F 4 K K B B
14673 // CCCCC 11111 F 4 K K BBBBBB
14674
14675
14676 // VIF THU 20 NOV 2025 22:19:29 ** C1F4KB ** DIAGNOSTICS PAGE 00520
14677
14678
14679 // VIF THU 20 NOV 2025 22:19:29 ** C1F4KB ** GENERATED CODE PAGE 00521
14680
14681 int_4 _c1f4kb (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
14682 in2_, real_4 _p_ wa_)
14683 { // ** body not listed **
14793 }
14794
14795 // VIF THU 20 NOV 2025 22:19:29 ** C1F4KF ** C1F4KF PAGE 00524
14796
14797 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14798 // S S U U B B R R O O U U T I NN N E
14799 // S U U B B R R O O U U T I N N N E
14800 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14801 // S U U B B R R O O U U T I N N N E
14802 // S S U U B B R R O O U U T I N NN E
14803 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14804
14805 // CCCCC 1 FFFFFFF 4 K K FFFFFFF
14806 // C C 11 F 4 4 K K F
14807 // C 1 1 F 4 4 K K F
14808 // C 1 FFFFF 4444444 KKK FFFFF
14809 // C 1 F 4 K K F
14810 // C C 1 F 4 K K F
14811 // CCCCC 11111 F 4 K K F
14812
14813
14814 // VIF THU 20 NOV 2025 22:19:29 ** C1F4KF ** DIAGNOSTICS PAGE 00525
14815
14816
14817 // VIF THU 20 NOV 2025 22:19:29 ** C1F4KF ** GENERATED CODE PAGE 00526
14818
14819 int_4 _c1f4kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
14820 in2_, real_4 _p_ wa_)
14821 { // ** body not listed **
14960 }
14961
14962 // VIF THU 20 NOV 2025 22:19:29 ** C1F5KB ** C1F5KB PAGE 00529
14963
14964 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
14965 // S S U U B B R R O O U U T I NN N E
14966 // S U U B B R R O O U U T I N N N E
14967 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
14968 // S U U B B R R O O U U T I N N N E
14969 // S S U U B B R R O O U U T I N NN E
14970 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
14971
14972 // CCCCC 1 FFFFFFF 5555555 K K BBBBBB
14973 // C C 11 F 5 K K B B
14974 // C 1 1 F 5 K K B B
14975 // C 1 FFFFF 55555 KKK BBBBBB
14976 // C 1 F 5 K K B B
14977 // C C 1 F 5 5 K K B B
14978 // CCCCC 11111 F 55555 K K BBBBBB
14979
14980
14981 // VIF THU 20 NOV 2025 22:19:29 ** C1F5KB ** DIAGNOSTICS PAGE 00530
14982
14983
14984 // VIF THU 20 NOV 2025 22:19:29 ** C1F5KB ** GENERATED CODE PAGE 00531
14985
14986 int_4 _c1f5kb (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
14987 in2_, real_4 _p_ wa_)
14988 { // ** body not listed **
15172 }
15173
15174 // VIF THU 20 NOV 2025 22:19:29 ** C1F5KF ** C1F5KF PAGE 00535
15175
15176 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
15177 // S S U U B B R R O O U U T I NN N E
15178 // S U U B B R R O O U U T I N N N E
15179 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
15180 // S U U B B R R O O U U T I N N N E
15181 // S S U U B B R R O O U U T I N NN E
15182 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
15183
15184 // CCCCC 1 FFFFFFF 5555555 K K FFFFFFF
15185 // C C 11 F 5 K K F
15186 // C 1 1 F 5 K K F
15187 // C 1 FFFFF 55555 KKK FFFFF
15188 // C 1 F 5 K K F
15189 // C C 1 F 5 5 K K F
15190 // CCCCC 11111 F 55555 K K F
15191
15192
15193 // VIF THU 20 NOV 2025 22:19:29 ** C1F5KF ** DIAGNOSTICS PAGE 00536
15194
15195
15196 // VIF THU 20 NOV 2025 22:19:29 ** C1F5KF ** GENERATED CODE PAGE 00537
15197
15198 int_4 _c1f5kf (int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_
15199 in2_, real_4 _p_ wa_)
15200 { // ** body not listed **
15427 }
15428
15429 // VIF THU 20 NOV 2025 22:19:29 ** C1FGKB ** C1FGKB PAGE 00542
15430
15431 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
15432 // S S U U B B R R O O U U T I NN N E
15433 // S U U B B R R O O U U T I N N N E
15434 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
15435 // S U U B B R R O O U U T I N N N E
15436 // S S U U B B R R O O U U T I N NN E
15437 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
15438
15439 // CCCCC 1 FFFFFFF GGGGG K K BBBBBB
15440 // C C 11 F G G K K B B
15441 // C 1 1 F G K K B B
15442 // C 1 FFFFF G GGGG KKK BBBBBB
15443 // C 1 F G G K K B B
15444 // C C 1 F G G K K B B
15445 // CCCCC 11111 F GGGGG K K BBBBBB
15446
15447
15448 // VIF THU 20 NOV 2025 22:19:29 ** C1FGKB ** DIAGNOSTICS PAGE 00543
15449
15450
15451 // VIF THU 20 NOV 2025 22:19:29 ** C1FGKB ** GENERATED CODE PAGE 00544
15452
15453 int_4 _c1fgkb (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_4 _p_ cc_, real_4 _p_
15454 cc1_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch1_, int_4 _p_ in2_, real_4 _p_ wa_)
15455 { // ** body not listed **
15591 }
15592
15593 // VIF THU 20 NOV 2025 22:19:29 ** C1FGKF ** C1FGKF PAGE 00547
15594
15595 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
15596 // S S U U B B R R O O U U T I NN N E
15597 // S U U B B R R O O U U T I N N N E
15598 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
15599 // S U U B B R R O O U U T I N N N E
15600 // S S U U B B R R O O U U T I N NN E
15601 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
15602
15603 // CCCCC 1 FFFFFFF GGGGG K K FFFFFFF
15604 // C C 11 F G G K K F
15605 // C 1 1 F G K K F
15606 // C 1 FFFFF G GGGG KKK FFFFF
15607 // C 1 F G G K K F
15608 // C C 1 F G G K K F
15609 // CCCCC 11111 F GGGGG K K F
15610
15611
15612 // VIF THU 20 NOV 2025 22:19:29 ** C1FGKF ** DIAGNOSTICS PAGE 00548
15613
15614
15615 // VIF THU 20 NOV 2025 22:19:29 ** C1FGKF ** GENERATED CODE PAGE 00549
15616
15617 int_4 _c1fgkf (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_4 _p_ cc_, real_4 _p_
15618 cc1_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch1_, int_4 _p_ in2_, real_4 _p_ wa_)
15619 { // ** body not listed **
15781 }
15782
15783 // VIF THU 20 NOV 2025 22:19:29 ** C1FM1B ** C1FM1B PAGE 00553
15784
15785 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
15786 // S S U U B B R R O O U U T I NN N E
15787 // S U U B B R R O O U U T I N N N E
15788 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
15789 // S U U B B R R O O U U T I N N N E
15790 // S S U U B B R R O O U U T I N NN E
15791 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
15792
15793 // CCCCC 1 FFFFFFF M M 1 BBBBBB
15794 // C C 11 F MM MM 11 B B
15795 // C 1 1 F M M M M 1 1 B B
15796 // C 1 FFFFF M M M 1 BBBBBB
15797 // C 1 F M M 1 B B
15798 // C C 1 F M M 1 B B
15799 // CCCCC 11111 F M M 11111 BBBBBB
15800
15801
15802 // VIF THU 20 NOV 2025 22:19:29 ** C1FM1B ** DIAGNOSTICS PAGE 00554
15803
15804
15805 // VIF THU 20 NOV 2025 22:19:29 ** C1FM1B ** GENERATED CODE PAGE 00555
15806
15807 int_4 _c1fm1b (int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, real_4 _p_ ch_, real_4 _p_ wa_, real_4 _p_ fnf_, real_4
15808 _p_ fac_)
15809 { // ** body not listed **
15876 }
15877
15878 // VIF THU 20 NOV 2025 22:19:29 ** C1FM1F ** C1FM1F PAGE 00557
15879
15880 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
15881 // S S U U B B R R O O U U T I NN N E
15882 // S U U B B R R O O U U T I N N N E
15883 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
15884 // S U U B B R R O O U U T I N N N E
15885 // S S U U B B R R O O U U T I N NN E
15886 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
15887
15888 // CCCCC 1 FFFFFFF M M 1 FFFFFFF
15889 // C C 11 F MM MM 11 F
15890 // C 1 1 F M M M M 1 1 F
15891 // C 1 FFFFF M M M 1 FFFFF
15892 // C 1 F M M 1 F
15893 // C C 1 F M M 1 F
15894 // CCCCC 11111 F M M 11111 F
15895
15896
15897 // VIF THU 20 NOV 2025 22:19:29 ** C1FM1F ** DIAGNOSTICS PAGE 00558
15898
15899
15900 // VIF THU 20 NOV 2025 22:19:29 ** C1FM1F ** GENERATED CODE PAGE 00559
15901
15902 int_4 _c1fm1f (int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, real_4 _p_ ch_, real_4 _p_ wa_, real_4 _p_ fnf_, real_4
15903 _p_ fac_)
15904 { // ** body not listed **
15971 }
15972
15973 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1B ** CFFT1B PAGE 00561
15974
15975 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
15976 // S S U U B B R R O O U U T I NN N E
15977 // S U U B B R R O O U U T I N N N E
15978 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
15979 // S U U B B R R O O U U T I N N N E
15980 // S S U U B B R R O O U U T I N NN E
15981 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
15982
15983 // CCCCC FFFFFFF FFFFFFF TTTTTTT 1 BBBBBB
15984 // C C F F T 11 B B
15985 // C F F T 1 1 B B
15986 // C FFFFF FFFFF T 1 BBBBBB
15987 // C F F T 1 B B
15988 // C C F F T 1 B B
15989 // CCCCC F F T 11111 BBBBBB
15990
15991
15992 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1B ** DIAGNOSTICS PAGE 00562
15993
15994
15995 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1B ** GENERATED CODE PAGE 00563
15996
15997 int_4 _cfft1b (int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, int_4 _p_ lenc_, real_4 _p_ wsave_, int_4 _p_ lensav_,
15998 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
15999 { // ** body not listed **
16024 }
16025
16026 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1F ** CFFT1F PAGE 00564
16027
16028 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16029 // S S U U B B R R O O U U T I NN N E
16030 // S U U B B R R O O U U T I N N N E
16031 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16032 // S U U B B R R O O U U T I N N N E
16033 // S S U U B B R R O O U U T I N NN E
16034 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16035
16036 // CCCCC FFFFFFF FFFFFFF TTTTTTT 1 FFFFFFF
16037 // C C F F T 11 F
16038 // C F F T 1 1 F
16039 // C FFFFF FFFFF T 1 FFFFF
16040 // C F F T 1 F
16041 // C C F F T 1 F
16042 // CCCCC F F T 11111 F
16043
16044
16045 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1F ** DIAGNOSTICS PAGE 00565
16046
16047
16048 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1F ** GENERATED CODE PAGE 00566
16049
16050 int_4 _cfft1f (int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, int_4 _p_ lenc_, real_4 _p_ wsave_, int_4 _p_ lensav_,
16051 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
16052 { // ** body not listed **
16077 }
16078
16079 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1I ** CFFT1I PAGE 00567
16080
16081 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16082 // S S U U B B R R O O U U T I NN N E
16083 // S U U B B R R O O U U T I N N N E
16084 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16085 // S U U B B R R O O U U T I N N N E
16086 // S S U U B B R R O O U U T I N NN E
16087 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16088
16089 // CCCCC FFFFFFF FFFFFFF TTTTTTT 1 III
16090 // C C F F T 11 I
16091 // C F F T 1 1 I
16092 // C FFFFF FFFFF T 1 I
16093 // C F F T 1 I
16094 // C C F F T 1 I
16095 // CCCCC F F T 11111 III
16096
16097
16098 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1I ** DIAGNOSTICS PAGE 00568
16099
16100
16101 // VIF THU 20 NOV 2025 22:19:29 ** CFFT1I ** GENERATED CODE PAGE 00569
16102
16103 int_4 _cfft1i (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
16104 { // ** body not listed **
16121 }
16122
16123 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2B ** CFFT2B PAGE 00570
16124
16125 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16126 // S S U U B B R R O O U U T I NN N E
16127 // S U U B B R R O O U U T I N N N E
16128 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16129 // S U U B B R R O O U U T I N N N E
16130 // S S U U B B R R O O U U T I N NN E
16131 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16132
16133 // CCCCC FFFFFFF FFFFFFF TTTTTTT 22222 BBBBBB
16134 // C C F F T 2 2 B B
16135 // C F F T 2 B B
16136 // C FFFFF FFFFF T 22222 BBBBBB
16137 // C F F T 2 B B
16138 // C C F F T 2 B B
16139 // CCCCC F F T 2222222 BBBBBB
16140
16141
16142 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2B ** DIAGNOSTICS PAGE 00571
16143
16144
16145 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2B ** GENERATED CODE PAGE 00572
16146
16147 int_4 _cfft2b (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, complex_8 _p_ c_, real_4 _p_ wsave_, int_4 _p_ lensav_,
16148 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
16149 { // ** body not listed **
16193 }
16194
16195 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2F ** CFFT2F PAGE 00573
16196
16197 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16198 // S S U U B B R R O O U U T I NN N E
16199 // S U U B B R R O O U U T I N N N E
16200 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16201 // S U U B B R R O O U U T I N N N E
16202 // S S U U B B R R O O U U T I N NN E
16203 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16204
16205 // CCCCC FFFFFFF FFFFFFF TTTTTTT 22222 FFFFFFF
16206 // C C F F T 2 2 F
16207 // C F F T 2 F
16208 // C FFFFF FFFFF T 22222 FFFFF
16209 // C F F T 2 F
16210 // C C F F T 2 F
16211 // CCCCC F F T 2222222 F
16212
16213
16214 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2F ** DIAGNOSTICS PAGE 00574
16215
16216
16217 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2F ** GENERATED CODE PAGE 00575
16218
16219 int_4 _cfft2f (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, complex_8 _p_ c_, real_4 _p_ wsave_, int_4 _p_ lensav_,
16220 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
16221 { // ** body not listed **
16265 }
16266
16267 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2I ** CFFT2I PAGE 00576
16268
16269 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16270 // S S U U B B R R O O U U T I NN N E
16271 // S U U B B R R O O U U T I N N N E
16272 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16273 // S U U B B R R O O U U T I N N N E
16274 // S S U U B B R R O O U U T I N NN E
16275 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16276
16277 // CCCCC FFFFFFF FFFFFFF TTTTTTT 22222 III
16278 // C C F F T 2 2 I
16279 // C F F T 2 I
16280 // C FFFFF FFFFF T 22222 I
16281 // C F F T 2 I
16282 // C C F F T 2 I
16283 // CCCCC F F T 2222222 III
16284
16285
16286 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2I ** DIAGNOSTICS PAGE 00577
16287
16288
16289 // VIF THU 20 NOV 2025 22:19:29 ** CFFT2I ** GENERATED CODE PAGE 00578
16290
16291 int_4 _cfft2i (int_4 _p_ l_, int_4 _p_ m_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
16292 { // ** body not listed **
16321 }
16322
16323 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMB ** CFFTMB PAGE 00579
16324
16325 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16326 // S S U U B B R R O O U U T I NN N E
16327 // S U U B B R R O O U U T I N N N E
16328 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16329 // S U U B B R R O O U U T I N N N E
16330 // S S U U B B R R O O U U T I N NN E
16331 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16332
16333 // CCCCC FFFFFFF FFFFFFF TTTTTTT M M BBBBBB
16334 // C C F F T MM MM B B
16335 // C F F T M M M M B B
16336 // C FFFFF FFFFF T M M M BBBBBB
16337 // C F F T M M B B
16338 // C C F F T M M B B
16339 // CCCCC F F T M M BBBBBB
16340
16341
16342 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMB ** DIAGNOSTICS PAGE 00580
16343
16344
16345 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMB ** GENERATED CODE PAGE 00581
16346
16347 int_4 _cfftmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, int_4 _p_ lenc_, real_4
16348 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
16349 { // ** body not listed **
16378 }
16379
16380 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMF ** CFFTMF PAGE 00582
16381
16382 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16383 // S S U U B B R R O O U U T I NN N E
16384 // S U U B B R R O O U U T I N N N E
16385 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16386 // S U U B B R R O O U U T I N N N E
16387 // S S U U B B R R O O U U T I N NN E
16388 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16389
16390 // CCCCC FFFFFFF FFFFFFF TTTTTTT M M FFFFFFF
16391 // C C F F T MM MM F
16392 // C F F T M M M M F
16393 // C FFFFF FFFFF T M M M FFFFF
16394 // C F F T M M F
16395 // C C F F T M M F
16396 // CCCCC F F T M M F
16397
16398
16399 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMF ** DIAGNOSTICS PAGE 00583
16400
16401
16402 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMF ** GENERATED CODE PAGE 00584
16403
16404 int_4 _cfftmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, int_4 _p_ lenc_, real_4
16405 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
16406 { // ** body not listed **
16435 }
16436
16437 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMI ** CFFTMI PAGE 00585
16438
16439 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16440 // S S U U B B R R O O U U T I NN N E
16441 // S U U B B R R O O U U T I N N N E
16442 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16443 // S U U B B R R O O U U T I N N N E
16444 // S S U U B B R R O O U U T I N NN E
16445 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16446
16447 // CCCCC FFFFFFF FFFFFFF TTTTTTT M M III
16448 // C C F F T MM MM I
16449 // C F F T M M M M I
16450 // C FFFFF FFFFF T M M M I
16451 // C F F T M M I
16452 // C C F F T M M I
16453 // CCCCC F F T M M III
16454
16455
16456 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMI ** DIAGNOSTICS PAGE 00586
16457
16458
16459 // VIF THU 20 NOV 2025 22:19:29 ** CFFTMI ** GENERATED CODE PAGE 00587
16460
16461 int_4 _cfftmi (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
16462 { // ** body not listed **
16479 }
16480
16481 // VIF THU 20 NOV 2025 22:19:29 ** CMF2KB ** CMF2KB PAGE 00588
16482
16483 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16484 // S S U U B B R R O O U U T I NN N E
16485 // S U U B B R R O O U U T I N N N E
16486 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16487 // S U U B B R R O O U U T I N N N E
16488 // S S U U B B R R O O U U T I N NN E
16489 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16490
16491 // CCCCC M M FFFFFFF 22222 K K BBBBBB
16492 // C C MM MM F 2 2 K K B B
16493 // C M M M M F 2 K K B B
16494 // C M M M FFFFF 22222 KKK BBBBBB
16495 // C M M F 2 K K B B
16496 // C C M M F 2 K K B B
16497 // CCCCC M M F 2222222 K K BBBBBB
16498
16499
16500 // VIF THU 20 NOV 2025 22:19:29 ** CMF2KB ** DIAGNOSTICS PAGE 00589
16501
16502
16503 // VIF THU 20 NOV 2025 22:19:29 ** CMF2KB ** GENERATED CODE PAGE 00590
16504
16505 int_4 _cmf2kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
16506 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
16507 { // ** body not listed **
16581 }
16582
16583 // VIF THU 20 NOV 2025 22:19:29 ** CMF2KF ** CMF2KF PAGE 00592
16584
16585 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16586 // S S U U B B R R O O U U T I NN N E
16587 // S U U B B R R O O U U T I N N N E
16588 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16589 // S U U B B R R O O U U T I N N N E
16590 // S S U U B B R R O O U U T I N NN E
16591 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16592
16593 // CCCCC M M FFFFFFF 22222 K K FFFFFFF
16594 // C C MM MM F 2 2 K K F
16595 // C M M M M F 2 K K F
16596 // C M M M FFFFF 22222 KKK FFFFF
16597 // C M M F 2 K K F
16598 // C C M M F 2 K K F
16599 // CCCCC M M F 2222222 K K F
16600
16601
16602 // VIF THU 20 NOV 2025 22:19:29 ** CMF2KF ** DIAGNOSTICS PAGE 00593
16603
16604
16605 // VIF THU 20 NOV 2025 22:19:29 ** CMF2KF ** GENERATED CODE PAGE 00594
16606
16607 int_4 _cmf2kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
16608 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
16609 { // ** body not listed **
16704 }
16705
16706 // VIF THU 20 NOV 2025 22:19:29 ** CMF3KB ** CMF3KB PAGE 00596
16707
16708 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16709 // S S U U B B R R O O U U T I NN N E
16710 // S U U B B R R O O U U T I N N N E
16711 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16712 // S U U B B R R O O U U T I N N N E
16713 // S S U U B B R R O O U U T I N NN E
16714 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16715
16716 // CCCCC M M FFFFFFF 33333 K K BBBBBB
16717 // C C MM MM F 3 3 K K B B
16718 // C M M M M F 3 K K B B
16719 // C M M M FFFFF 33333 KKK BBBBBB
16720 // C M M F 3 K K B B
16721 // C C M M F 3 3 K K B B
16722 // CCCCC M M F 33333 K K BBBBBB
16723
16724
16725 // VIF THU 20 NOV 2025 22:19:29 ** CMF3KB ** DIAGNOSTICS PAGE 00597
16726
16727
16728 // VIF THU 20 NOV 2025 22:19:29 ** CMF3KB ** GENERATED CODE PAGE 00598
16729
16730 int_4 _cmf3kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
16731 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
16732 { // ** body not listed **
16851 }
16852
16853 // VIF THU 20 NOV 2025 22:19:29 ** CMF3KF ** CMF3KF PAGE 00601
16854
16855 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
16856 // S S U U B B R R O O U U T I NN N E
16857 // S U U B B R R O O U U T I N N N E
16858 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
16859 // S U U B B R R O O U U T I N N N E
16860 // S S U U B B R R O O U U T I N NN E
16861 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
16862
16863 // CCCCC M M FFFFFFF 33333 K K FFFFFFF
16864 // C C MM MM F 3 3 K K F
16865 // C M M M M F 3 K K F
16866 // C M M M FFFFF 33333 KKK FFFFF
16867 // C M M F 3 K K F
16868 // C C M M F 3 3 K K F
16869 // CCCCC M M F 33333 K K F
16870
16871
16872 // VIF THU 20 NOV 2025 22:19:29 ** CMF3KF ** DIAGNOSTICS PAGE 00602
16873
16874
16875 // VIF THU 20 NOV 2025 22:19:29 ** CMF3KF ** GENERATED CODE PAGE 00603
16876
16877 int_4 _cmf3kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
16878 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
16879 { // ** body not listed **
17025 }
17026
17027 // VIF THU 20 NOV 2025 22:19:29 ** CMF4KB ** CMF4KB PAGE 00606
17028
17029 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
17030 // S S U U B B R R O O U U T I NN N E
17031 // S U U B B R R O O U U T I N N N E
17032 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
17033 // S U U B B R R O O U U T I N N N E
17034 // S S U U B B R R O O U U T I N NN E
17035 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
17036
17037 // CCCCC M M FFFFFFF 4 K K BBBBBB
17038 // C C MM MM F 4 4 K K B B
17039 // C M M M M F 4 4 K K B B
17040 // C M M M FFFFF 4444444 KKK BBBBBB
17041 // C M M F 4 K K B B
17042 // C C M M F 4 K K B B
17043 // CCCCC M M F 4 K K BBBBBB
17044
17045
17046 // VIF THU 20 NOV 2025 22:19:29 ** CMF4KB ** DIAGNOSTICS PAGE 00607
17047
17048
17049 // VIF THU 20 NOV 2025 22:19:29 ** CMF4KB ** GENERATED CODE PAGE 00608
17050
17051 int_4 _cmf4kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
17052 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
17053 { // ** body not listed **
17175 }
17176
17177 // VIF THU 20 NOV 2025 22:19:29 ** CMF4KF ** CMF4KF PAGE 00611
17178
17179 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
17180 // S S U U B B R R O O U U T I NN N E
17181 // S U U B B R R O O U U T I N N N E
17182 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
17183 // S U U B B R R O O U U T I N N N E
17184 // S S U U B B R R O O U U T I N NN E
17185 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
17186
17187 // CCCCC M M FFFFFFF 4 K K FFFFFFF
17188 // C C MM MM F 4 4 K K F
17189 // C M M M M F 4 4 K K F
17190 // C M M M FFFFF 4444444 KKK FFFFF
17191 // C M M F 4 K K F
17192 // C C M M F 4 K K F
17193 // CCCCC M M F 4 K K F
17194
17195
17196 // VIF THU 20 NOV 2025 22:19:29 ** CMF4KF ** DIAGNOSTICS PAGE 00612
17197
17198
17199 // VIF THU 20 NOV 2025 22:19:29 ** CMF4KF ** GENERATED CODE PAGE 00613
17200
17201 int_4 _cmf4kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
17202 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
17203 { // ** body not listed **
17360 }
17361
17362 // VIF THU 20 NOV 2025 22:19:29 ** CMF5KB ** CMF5KB PAGE 00617
17363
17364 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
17365 // S S U U B B R R O O U U T I NN N E
17366 // S U U B B R R O O U U T I N N N E
17367 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
17368 // S U U B B R R O O U U T I N N N E
17369 // S S U U B B R R O O U U T I N NN E
17370 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
17371
17372 // CCCCC M M FFFFFFF 5555555 K K BBBBBB
17373 // C C MM MM F 5 K K B B
17374 // C M M M M F 5 K K B B
17375 // C M M M FFFFF 55555 KKK BBBBBB
17376 // C M M F 5 K K B B
17377 // C C M M F 5 5 K K B B
17378 // CCCCC M M F 55555 K K BBBBBB
17379
17380
17381 // VIF THU 20 NOV 2025 22:19:29 ** CMF5KB ** DIAGNOSTICS PAGE 00618
17382
17383
17384 // VIF THU 20 NOV 2025 22:19:29 ** CMF5KB ** GENERATED CODE PAGE 00619
17385
17386 int_4 _cmf5kb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
17387 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
17388 { // ** body not listed **
17598 }
17599
17600 // VIF THU 20 NOV 2025 22:19:29 ** CMF5KF ** CMF5KF PAGE 00624
17601
17602 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
17603 // S S U U B B R R O O U U T I NN N E
17604 // S U U B B R R O O U U T I N N N E
17605 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
17606 // S U U B B R R O O U U T I N N N E
17607 // S S U U B B R R O O U U T I N NN E
17608 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
17609
17610 // CCCCC M M FFFFFFF 5555555 K K FFFFFFF
17611 // C C MM MM F 5 K K F
17612 // C M M M M F 5 K K F
17613 // C M M M FFFFF 55555 KKK FFFFF
17614 // C M M F 5 K K F
17615 // C C M M F 5 5 K K F
17616 // CCCCC M M F 55555 K K F
17617
17618
17619 // VIF THU 20 NOV 2025 22:19:29 ** CMF5KF ** DIAGNOSTICS PAGE 00625
17620
17621
17622 // VIF THU 20 NOV 2025 22:19:29 ** CMF5KF ** GENERATED CODE PAGE 00626
17623
17624 int_4 _cmf5kf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ l1_, int_4 _p_ na_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_
17625 in1_, real_4 _p_ ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa_)
17626 { // ** body not listed **
17889 }
17890
17891 // VIF THU 20 NOV 2025 22:19:29 ** CMFGKB ** CMFGKB PAGE 00632
17892
17893 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
17894 // S S U U B B R R O O U U T I NN N E
17895 // S U U B B R R O O U U T I N N N E
17896 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
17897 // S U U B B R R O O U U T I N N N E
17898 // S S U U B B R R O O U U T I N NN E
17899 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
17900
17901 // CCCCC M M FFFFFFF GGGGG K K BBBBBB
17902 // C C MM MM F G G K K B B
17903 // C M M M M F G K K B B
17904 // C M M M FFFFF G GGGG KKK BBBBBB
17905 // C M M F G G K K B B
17906 // C C M M F G G K K B B
17907 // CCCCC M M F GGGGG K K BBBBBB
17908
17909
17910 // VIF THU 20 NOV 2025 22:19:29 ** CMFGKB ** DIAGNOSTICS PAGE 00633
17911
17912
17913 // VIF THU 20 NOV 2025 22:19:29 ** CMFGKB ** GENERATED CODE PAGE 00634
17914
17915 int_4 _cmfgkb (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_4 _p_
17916 cc_, real_4 _p_ cc1_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch1_, int_4 _p_ im2_, int_4 _p_ in2_,
17917 real_4 _p_ wa_)
17918 { // ** body not listed **
18120 }
18121 // VIF THU 20 NOV 2025 22:19:29 ** CMFGKB ** GENERATED CODE PAGE 00638
18122
18123
18124 // VIF THU 20 NOV 2025 22:19:29 ** CMFGKF ** CMFGKF PAGE 00639
18125
18126 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18127 // S S U U B B R R O O U U T I NN N E
18128 // S U U B B R R O O U U T I N N N E
18129 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18130 // S U U B B R R O O U U T I N N N E
18131 // S S U U B B R R O O U U T I N NN E
18132 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18133
18134 // CCCCC M M FFFFFFF GGGGG K K FFFFFFF
18135 // C C MM MM F G G K K F
18136 // C M M M M F G K K F
18137 // C M M M FFFFF G GGGG KKK FFFFF
18138 // C M M F G G K K F
18139 // C C M M F G G K K F
18140 // CCCCC M M F GGGGG K K F
18141
18142
18143 // VIF THU 20 NOV 2025 22:19:29 ** CMFGKF ** DIAGNOSTICS PAGE 00640
18144
18145
18146 // VIF THU 20 NOV 2025 22:19:29 ** CMFGKF ** GENERATED CODE PAGE 00641
18147
18148 int_4 _cmfgkf (int_4 _p_ lot_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ lid_, int_4 _p_ na_, real_4 _p_
18149 cc_, real_4 _p_ cc1_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch1_, int_4 _p_ im2_, int_4 _p_ in2_,
18150 real_4 _p_ wa_)
18151 { // ** body not listed **
18399 }
18400
18401 // VIF THU 20 NOV 2025 22:19:29 ** CMFM1B ** CMFM1B PAGE 00646
18402
18403 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18404 // S S U U B B R R O O U U T I NN N E
18405 // S U U B B R R O O U U T I N N N E
18406 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18407 // S U U B B R R O O U U T I N N N E
18408 // S S U U B B R R O O U U T I N NN E
18409 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18410
18411 // CCCCC M M FFFFFFF M M 1 BBBBBB
18412 // C C MM MM F MM MM 11 B B
18413 // C M M M M F M M M M 1 1 B B
18414 // C M M M FFFFF M M M 1 BBBBBB
18415 // C M M F M M 1 B B
18416 // C C M M F M M 1 B B
18417 // CCCCC M M F M M 11111 BBBBBB
18418
18419
18420 // VIF THU 20 NOV 2025 22:19:29 ** CMFM1B ** DIAGNOSTICS PAGE 00647
18421
18422
18423 // VIF THU 20 NOV 2025 22:19:29 ** CMFM1B ** GENERATED CODE PAGE 00648
18424
18425 int_4 _cmfm1b (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, real_4 _p_ ch_, real_4
18426 _p_ wa_, real_4 _p_ fnf_, real_4 _p_ fac_)
18427 { // ** body not listed **
18492 }
18493
18494 // VIF THU 20 NOV 2025 22:19:29 ** CMFM1F ** CMFM1F PAGE 00650
18495
18496 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18497 // S S U U B B R R O O U U T I NN N E
18498 // S U U B B R R O O U U T I N N N E
18499 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18500 // S U U B B R R O O U U T I N N N E
18501 // S S U U B B R R O O U U T I N NN E
18502 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18503
18504 // CCCCC M M FFFFFFF M M 1 FFFFFFF
18505 // C C MM MM F MM MM 11 F
18506 // C M M M M F M M M M 1 1 F
18507 // C M M M FFFFF M M M 1 FFFFF
18508 // C M M F M M 1 F
18509 // C C M M F M M 1 F
18510 // CCCCC M M F M M 11111 F
18511
18512
18513 // VIF THU 20 NOV 2025 22:19:29 ** CMFM1F ** DIAGNOSTICS PAGE 00651
18514
18515
18516 // VIF THU 20 NOV 2025 22:19:29 ** CMFM1F ** GENERATED CODE PAGE 00652
18517
18518 int_4 _cmfm1f (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, complex_8 _p_ c_, real_4 _p_ ch_, real_4
18519 _p_ wa_, real_4 _p_ fnf_, real_4 _p_ fac_)
18520 { // ** body not listed **
18585 }
18586
18587 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1B ** COSQ1B PAGE 00654
18588
18589 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18590 // S S U U B B R R O O U U T I NN N E
18591 // S U U B B R R O O U U T I N N N E
18592 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18593 // S U U B B R R O O U U T I N N N E
18594 // S S U U B B R R O O U U T I N NN E
18595 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18596
18597 // CCCCC OOOOO SSSSS QQQQQ 1 BBBBBB
18598 // C C O O S S Q Q 11 B B
18599 // C O O S Q Q 1 1 B B
18600 // C O O SSSSS Q Q 1 BBBBBB
18601 // C O O S Q Q Q 1 B B
18602 // C C O O S S Q Q 1 B B
18603 // CCCCC OOOOO SSSSS QQQQ Q 11111 BBBBBB
18604
18605
18606 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1B ** DIAGNOSTICS PAGE 00655
18607
18608
18609 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1B ** GENERATED CODE PAGE 00656
18610
18611 int_4 _cosq1b (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
18612 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
18613 { // ** body not listed **
18658 }
18659
18660 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1F ** COSQ1F PAGE 00657
18661
18662 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18663 // S S U U B B R R O O U U T I NN N E
18664 // S U U B B R R O O U U T I N N N E
18665 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18666 // S U U B B R R O O U U T I N N N E
18667 // S S U U B B R R O O U U T I N NN E
18668 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18669
18670 // CCCCC OOOOO SSSSS QQQQQ 1 FFFFFFF
18671 // C C O O S S Q Q 11 F
18672 // C O O S Q Q 1 1 F
18673 // C O O SSSSS Q Q 1 FFFFF
18674 // C O O S Q Q Q 1 F
18675 // C C O O S S Q Q 1 F
18676 // CCCCC OOOOO SSSSS QQQQ Q 11111 F
18677
18678
18679 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1F ** DIAGNOSTICS PAGE 00658
18680
18681
18682 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1F ** GENERATED CODE PAGE 00659
18683
18684 int_4 _cosq1f (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
18685 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
18686 { // ** body not listed **
18732 }
18733
18734 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1I ** COSQ1I PAGE 00660
18735
18736 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18737 // S S U U B B R R O O U U T I NN N E
18738 // S U U B B R R O O U U T I N N N E
18739 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18740 // S U U B B R R O O U U T I N N N E
18741 // S S U U B B R R O O U U T I N NN E
18742 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18743
18744 // CCCCC OOOOO SSSSS QQQQQ 1 III
18745 // C C O O S S Q Q 11 I
18746 // C O O S Q Q 1 1 I
18747 // C O O SSSSS Q Q 1 I
18748 // C O O S Q Q Q 1 I
18749 // C C O O S S Q Q 1 I
18750 // CCCCC OOOOO SSSSS QQQQ Q 11111 III
18751
18752
18753 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1I ** DIAGNOSTICS PAGE 00661
18754
18755
18756 // VIF THU 20 NOV 2025 22:19:29 ** COSQ1I ** GENERATED CODE PAGE 00662
18757
18758 int_4 _cosq1i (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
18759 { // ** body not listed **
18787 }
18788
18789 // VIF THU 20 NOV 2025 22:19:29 ** COSQB1 ** COSQB1 PAGE 00663
18790
18791 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18792 // S S U U B B R R O O U U T I NN N E
18793 // S U U B B R R O O U U T I N N N E
18794 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18795 // S U U B B R R O O U U T I N N N E
18796 // S S U U B B R R O O U U T I N NN E
18797 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18798
18799 // CCCCC OOOOO SSSSS QQQQQ BBBBBB 1
18800 // C C O O S S Q Q B B 11
18801 // C O O S Q Q B B 1 1
18802 // C O O SSSSS Q Q BBBBBB 1
18803 // C O O S Q Q Q B B 1
18804 // C C O O S S Q Q B B 1
18805 // CCCCC OOOOO SSSSS QQQQ Q BBBBBB 11111
18806
18807
18808 // VIF THU 20 NOV 2025 22:19:29 ** COSQB1 ** DIAGNOSTICS PAGE 00664
18809
18810
18811 // VIF THU 20 NOV 2025 22:19:29 ** COSQB1 ** GENERATED CODE PAGE 00665
18812
18813 int_4 _cosqb1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
18814 { // ** body not listed **
18867 }
18868
18869 // VIF THU 20 NOV 2025 22:19:29 ** COSQF1 ** COSQF1 PAGE 00667
18870
18871 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18872 // S S U U B B R R O O U U T I NN N E
18873 // S U U B B R R O O U U T I N N N E
18874 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18875 // S U U B B R R O O U U T I N N N E
18876 // S S U U B B R R O O U U T I N NN E
18877 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18878
18879 // CCCCC OOOOO SSSSS QQQQQ FFFFFFF 1
18880 // C C O O S S Q Q F 11
18881 // C O O S Q Q F 1 1
18882 // C O O SSSSS Q Q FFFFF 1
18883 // C O O S Q Q Q F 1
18884 // C C O O S S Q Q F 1
18885 // CCCCC OOOOO SSSSS QQQQ Q F 11111
18886
18887
18888 // VIF THU 20 NOV 2025 22:19:29 ** COSQF1 ** DIAGNOSTICS PAGE 00668
18889
18890
18891 // VIF THU 20 NOV 2025 22:19:29 ** COSQF1 ** GENERATED CODE PAGE 00669
18892
18893 int_4 _cosqf1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
18894 { // ** body not listed **
18940 }
18941
18942 // VIF THU 20 NOV 2025 22:19:29 ** COSQMB ** COSQMB PAGE 00670
18943
18944 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
18945 // S S U U B B R R O O U U T I NN N E
18946 // S U U B B R R O O U U T I N N N E
18947 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
18948 // S U U B B R R O O U U T I N N N E
18949 // S S U U B B R R O O U U T I N NN E
18950 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
18951
18952 // CCCCC OOOOO SSSSS QQQQQ M M BBBBBB
18953 // C C O O S S Q Q MM MM B B
18954 // C O O S Q Q M M M M B B
18955 // C O O SSSSS Q Q M M M BBBBBB
18956 // C O O S Q Q Q M M B B
18957 // C C O O S S Q Q M M B B
18958 // CCCCC OOOOO SSSSS QQQQ Q M M BBBBBB
18959
18960
18961 // VIF THU 20 NOV 2025 22:19:29 ** COSQMB ** DIAGNOSTICS PAGE 00671
18962
18963
18964 // VIF THU 20 NOV 2025 22:19:29 ** COSQMB ** GENERATED CODE PAGE 00672
18965
18966 int_4 _cosqmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
18967 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
18968 { // ** body not listed **
19028 }
19029
19030 // VIF THU 20 NOV 2025 22:19:29 ** COSQMF ** COSQMF PAGE 00674
19031
19032 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19033 // S S U U B B R R O O U U T I NN N E
19034 // S U U B B R R O O U U T I N N N E
19035 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19036 // S U U B B R R O O U U T I N N N E
19037 // S S U U B B R R O O U U T I N NN E
19038 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19039
19040 // CCCCC OOOOO SSSSS QQQQQ M M FFFFFFF
19041 // C C O O S S Q Q MM MM F
19042 // C O O S Q Q M M M M F
19043 // C O O SSSSS Q Q M M M FFFFF
19044 // C O O S Q Q Q M M F
19045 // C C O O S S Q Q M M F
19046 // CCCCC OOOOO SSSSS QQQQ Q M M F
19047
19048
19049 // VIF THU 20 NOV 2025 22:19:29 ** COSQMF ** DIAGNOSTICS PAGE 00675
19050
19051
19052 // VIF THU 20 NOV 2025 22:19:29 ** COSQMF ** GENERATED CODE PAGE 00676
19053
19054 int_4 _cosqmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
19055 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
19056 { // ** body not listed **
19112 }
19113
19114 // VIF THU 20 NOV 2025 22:19:29 ** COSQMI ** COSQMI PAGE 00678
19115
19116 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19117 // S S U U B B R R O O U U T I NN N E
19118 // S U U B B R R O O U U T I N N N E
19119 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19120 // S U U B B R R O O U U T I N N N E
19121 // S S U U B B R R O O U U T I N NN E
19122 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19123
19124 // CCCCC OOOOO SSSSS QQQQQ M M III
19125 // C C O O S S Q Q MM MM I
19126 // C O O S Q Q M M M M I
19127 // C O O SSSSS Q Q M M M I
19128 // C O O S Q Q Q M M I
19129 // C C O O S S Q Q M M I
19130 // CCCCC OOOOO SSSSS QQQQ Q M M III
19131
19132
19133 // VIF THU 20 NOV 2025 22:19:29 ** COSQMI ** DIAGNOSTICS PAGE 00679
19134
19135
19136 // VIF THU 20 NOV 2025 22:19:29 ** COSQMI ** GENERATED CODE PAGE 00680
19137
19138 int_4 _cosqmi (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
19139 { // ** body not listed **
19167 }
19168
19169 // VIF THU 20 NOV 2025 22:19:29 ** COST1B ** COST1B PAGE 00681
19170
19171 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19172 // S S U U B B R R O O U U T I NN N E
19173 // S U U B B R R O O U U T I N N N E
19174 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19175 // S U U B B R R O O U U T I N N N E
19176 // S S U U B B R R O O U U T I N NN E
19177 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19178
19179 // CCCCC OOOOO SSSSS TTTTTTT 1 BBBBBB
19180 // C C O O S S T 11 B B
19181 // C O O S T 1 1 B B
19182 // C O O SSSSS T 1 BBBBBB
19183 // C O O S T 1 B B
19184 // C C O O S S T 1 B B
19185 // CCCCC OOOOO SSSSS T 11111 BBBBBB
19186
19187
19188 // VIF THU 20 NOV 2025 22:19:29 ** COST1B ** DIAGNOSTICS PAGE 00682
19189
19190
19191 // VIF THU 20 NOV 2025 22:19:29 ** COST1B ** GENERATED CODE PAGE 00683
19192
19193 int_4 _cost1b (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
19194 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
19195 { // ** body not listed **
19227 }
19228
19229 // VIF THU 20 NOV 2025 22:19:29 ** COST1F ** COST1F PAGE 00684
19230
19231 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19232 // S S U U B B R R O O U U T I NN N E
19233 // S U U B B R R O O U U T I N N N E
19234 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19235 // S U U B B R R O O U U T I N N N E
19236 // S S U U B B R R O O U U T I N NN E
19237 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19238
19239 // CCCCC OOOOO SSSSS TTTTTTT 1 FFFFFFF
19240 // C C O O S S T 11 F
19241 // C O O S T 1 1 F
19242 // C O O SSSSS T 1 FFFFF
19243 // C O O S T 1 F
19244 // C C O O S S T 1 F
19245 // CCCCC OOOOO SSSSS T 11111 F
19246
19247
19248 // VIF THU 20 NOV 2025 22:19:29 ** COST1F ** DIAGNOSTICS PAGE 00685
19249
19250
19251 // VIF THU 20 NOV 2025 22:19:29 ** COST1F ** GENERATED CODE PAGE 00686
19252
19253 int_4 _cost1f (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
19254 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
19255 { // ** body not listed **
19287 }
19288
19289 // VIF THU 20 NOV 2025 22:19:29 ** COST1I ** COST1I PAGE 00687
19290
19291 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19292 // S S U U B B R R O O U U T I NN N E
19293 // S U U B B R R O O U U T I N N N E
19294 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19295 // S U U B B R R O O U U T I N N N E
19296 // S S U U B B R R O O U U T I N NN E
19297 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19298
19299 // CCCCC OOOOO SSSSS TTTTTTT 1 III
19300 // C C O O S S T 11 I
19301 // C O O S T 1 1 I
19302 // C O O SSSSS T 1 I
19303 // C O O S T 1 I
19304 // C C O O S S T 1 I
19305 // CCCCC OOOOO SSSSS T 11111 III
19306
19307
19308 // VIF THU 20 NOV 2025 22:19:29 ** COST1I ** DIAGNOSTICS PAGE 00688
19309
19310
19311 // VIF THU 20 NOV 2025 22:19:29 ** COST1I ** GENERATED CODE PAGE 00689
19312
19313 int_4 _cost1i (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
19314 { // ** body not listed **
19351 }
19352
19353 // VIF THU 20 NOV 2025 22:19:29 ** COSTB1 ** COSTB1 PAGE 00690
19354
19355 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19356 // S S U U B B R R O O U U T I NN N E
19357 // S U U B B R R O O U U T I N N N E
19358 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19359 // S U U B B R R O O U U T I N N N E
19360 // S S U U B B R R O O U U T I N NN E
19361 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19362
19363 // CCCCC OOOOO SSSSS TTTTTTT BBBBBB 1
19364 // C C O O S S T B B 11
19365 // C O O S T B B 1 1
19366 // C O O SSSSS T BBBBBB 1
19367 // C O O S T B B 1
19368 // C C O O S S T B B 1
19369 // CCCCC OOOOO SSSSS T BBBBBB 11111
19370
19371
19372 // VIF THU 20 NOV 2025 22:19:29 ** COSTB1 ** DIAGNOSTICS PAGE 00691
19373
19374
19375 // VIF THU 20 NOV 2025 22:19:29 ** COSTB1 ** GENERATED CODE PAGE 00692
19376
19377 int_4 _costb1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
19378 { // ** body not listed **
19465 }
19466
19467 // VIF THU 20 NOV 2025 22:19:29 ** COSTF1 ** COSTF1 PAGE 00694
19468
19469 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19470 // S S U U B B R R O O U U T I NN N E
19471 // S U U B B R R O O U U T I N N N E
19472 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19473 // S U U B B R R O O U U T I N N N E
19474 // S S U U B B R R O O U U T I N NN E
19475 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19476
19477 // CCCCC OOOOO SSSSS TTTTTTT FFFFFFF 1
19478 // C C O O S S T F 11
19479 // C O O S T F 1 1
19480 // C O O SSSSS T FFFFF 1
19481 // C O O S T F 1
19482 // C C O O S S T F 1
19483 // CCCCC OOOOO SSSSS T F 11111
19484
19485
19486 // VIF THU 20 NOV 2025 22:19:29 ** COSTF1 ** DIAGNOSTICS PAGE 00695
19487
19488
19489 // VIF THU 20 NOV 2025 22:19:29 ** COSTF1 ** GENERATED CODE PAGE 00696
19490
19491 int_4 _costf1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ work_, int_4 _p_ ier_)
19492 { // ** body not listed **
19577 }
19578
19579 // VIF THU 20 NOV 2025 22:19:29 ** COSTMB ** COSTMB PAGE 00698
19580
19581 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19582 // S S U U B B R R O O U U T I NN N E
19583 // S U U B B R R O O U U T I N N N E
19584 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19585 // S U U B B R R O O U U T I N N N E
19586 // S S U U B B R R O O U U T I N NN E
19587 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19588
19589 // CCCCC OOOOO SSSSS TTTTTTT M M BBBBBB
19590 // C C O O S S T MM MM B B
19591 // C O O S T M M M M B B
19592 // C O O SSSSS T M M M BBBBBB
19593 // C O O S T M M B B
19594 // C C O O S S T M M B B
19595 // CCCCC OOOOO SSSSS T M M BBBBBB
19596
19597
19598 // VIF THU 20 NOV 2025 22:19:29 ** COSTMB ** DIAGNOSTICS PAGE 00699
19599
19600
19601 // VIF THU 20 NOV 2025 22:19:29 ** COSTMB ** GENERATED CODE PAGE 00700
19602
19603 int_4 _costmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
19604 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
19605 { // ** body not listed **
19639 }
19640
19641 // VIF THU 20 NOV 2025 22:19:29 ** COSTMF ** COSTMF PAGE 00701
19642
19643 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19644 // S S U U B B R R O O U U T I NN N E
19645 // S U U B B R R O O U U T I N N N E
19646 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19647 // S U U B B R R O O U U T I N N N E
19648 // S S U U B B R R O O U U T I N NN E
19649 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19650
19651 // CCCCC OOOOO SSSSS TTTTTTT M M FFFFFFF
19652 // C C O O S S T MM MM F
19653 // C O O S T M M M M F
19654 // C O O SSSSS T M M M FFFFF
19655 // C O O S T M M F
19656 // C C O O S S T M M F
19657 // CCCCC OOOOO SSSSS T M M F
19658
19659
19660 // VIF THU 20 NOV 2025 22:19:29 ** COSTMF ** DIAGNOSTICS PAGE 00702
19661
19662
19663 // VIF THU 20 NOV 2025 22:19:29 ** COSTMF ** GENERATED CODE PAGE 00703
19664
19665 int_4 _costmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
19666 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
19667 { // ** body not listed **
19701 }
19702
19703 // VIF THU 20 NOV 2025 22:19:29 ** COSTMI ** COSTMI PAGE 00704
19704
19705 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19706 // S S U U B B R R O O U U T I NN N E
19707 // S U U B B R R O O U U T I N N N E
19708 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19709 // S U U B B R R O O U U T I N N N E
19710 // S S U U B B R R O O U U T I N NN E
19711 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19712
19713 // CCCCC OOOOO SSSSS TTTTTTT M M III
19714 // C C O O S S T MM MM I
19715 // C O O S T M M M M I
19716 // C O O SSSSS T M M M I
19717 // C O O S T M M I
19718 // C C O O S S T M M I
19719 // CCCCC OOOOO SSSSS T M M III
19720
19721
19722 // VIF THU 20 NOV 2025 22:19:29 ** COSTMI ** DIAGNOSTICS PAGE 00705
19723
19724
19725 // VIF THU 20 NOV 2025 22:19:29 ** COSTMI ** GENERATED CODE PAGE 00706
19726
19727 int_4 _costmi (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
19728 { // ** body not listed **
19765 }
19766
19767 // VIF THU 20 NOV 2025 22:19:29 ** FACTOR ** FACTOR PAGE 00707
19768
19769 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19770 // S S U U B B R R O O U U T I NN N E
19771 // S U U B B R R O O U U T I N N N E
19772 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19773 // S U U B B R R O O U U T I N N N E
19774 // S S U U B B R R O O U U T I N NN E
19775 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19776
19777 // FFFFFFF A CCCCC TTTTTTT OOOOO RRRRRR
19778 // F A A C C T O O R R
19779 // F A A C T O O R R
19780 // FFFFF A A C T O O RRRRRR
19781 // F AAAAAAA C T O O R R
19782 // F A A C C T O O R R
19783 // F A A CCCCC T OOOOO R R
19784
19785
19786 // VIF THU 20 NOV 2025 22:19:29 ** FACTOR ** DIAGNOSTICS PAGE 00708
19787
19788
19789 // VIF THU 20 NOV 2025 22:19:29 ** FACTOR ** GENERATED CODE PAGE 00709
19790
19791 int_4 _factor (int_4 _p_ n_, int_4 _p_ nf_, real_4 _p_ fac_)
19792 { // ** body not listed **
19865 }
19866
19867 // VIF THU 20 NOV 2025 22:19:29 ** MCFTI1 ** MCFTI1 PAGE 00711
19868
19869 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19870 // S S U U B B R R O O U U T I NN N E
19871 // S U U B B R R O O U U T I N N N E
19872 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19873 // S U U B B R R O O U U T I N N N E
19874 // S S U U B B R R O O U U T I N NN E
19875 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19876
19877 // M M CCCCC FFFFFFF TTTTTTT III 1
19878 // MM MM C C F T I 11
19879 // M M M M C F T I 1 1
19880 // M M M C FFFFF T I 1
19881 // M M C F T I 1
19882 // M M C C F T I 1
19883 // M M CCCCC F T III 11111
19884
19885
19886 // VIF THU 20 NOV 2025 22:19:29 ** MCFTI1 ** DIAGNOSTICS PAGE 00712
19887
19888
19889 // VIF THU 20 NOV 2025 22:19:29 ** MCFTI1 ** GENERATED CODE PAGE 00713
19890
19891 int_4 _mcfti1 (int_4 _p_ n_, real_4 _p_ wa_, real_4 _p_ fnf_, real_4 _p_ fac_)
19892 { // ** body not listed **
19908 }
19909
19910 // VIF THU 20 NOV 2025 22:19:29 ** MCSQB1 ** MCSQB1 PAGE 00714
19911
19912 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
19913 // S S U U B B R R O O U U T I NN N E
19914 // S U U B B R R O O U U T I N N N E
19915 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
19916 // S U U B B R R O O U U T I N N N E
19917 // S S U U B B R R O O U U T I N NN E
19918 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
19919
19920 // M M CCCCC SSSSS QQQQQ BBBBBB 1
19921 // MM MM C C S S Q Q B B 11
19922 // M M M M C S Q Q B B 1 1
19923 // M M M C SSSSS Q Q BBBBBB 1
19924 // M M C S Q Q Q B B 1
19925 // M M C C S S Q Q B B 1
19926 // M M CCCCC SSSSS QQQQ Q BBBBBB 11111
19927
19928
19929 // VIF THU 20 NOV 2025 22:19:29 ** MCSQB1 ** DIAGNOSTICS PAGE 00715
19930
19931
19932 // VIF THU 20 NOV 2025 22:19:29 ** MCSQB1 ** GENERATED CODE PAGE 00716
19933
19934 int_4 _mcsqb1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4
19935 _p_ work_, int_4 _p_ ier_)
19936 { // ** body not listed **
20011 }
20012
20013 // VIF THU 20 NOV 2025 22:19:29 ** MCSQF1 ** MCSQF1 PAGE 00718
20014
20015 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20016 // S S U U B B R R O O U U T I NN N E
20017 // S U U B B R R O O U U T I N N N E
20018 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20019 // S U U B B R R O O U U T I N N N E
20020 // S S U U B B R R O O U U T I N NN E
20021 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20022
20023 // M M CCCCC SSSSS QQQQQ FFFFFFF 1
20024 // MM MM C C S S Q Q F 11
20025 // M M M M C S Q Q F 1 1
20026 // M M M C SSSSS Q Q FFFFF 1
20027 // M M C S Q Q Q F 1
20028 // M M C C S S Q Q F 1
20029 // M M CCCCC SSSSS QQQQ Q F 11111
20030
20031
20032 // VIF THU 20 NOV 2025 22:19:29 ** MCSQF1 ** DIAGNOSTICS PAGE 00719
20033
20034
20035 // VIF THU 20 NOV 2025 22:19:29 ** MCSQF1 ** GENERATED CODE PAGE 00720
20036
20037 int_4 _mcsqf1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4
20038 _p_ work_, int_4 _p_ ier_)
20039 { // ** body not listed **
20110 }
20111
20112 // VIF THU 20 NOV 2025 22:19:29 ** MCSTB1 ** MCSTB1 PAGE 00722
20113
20114 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20115 // S S U U B B R R O O U U T I NN N E
20116 // S U U B B R R O O U U T I N N N E
20117 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20118 // S U U B B R R O O U U T I N N N E
20119 // S S U U B B R R O O U U T I N NN E
20120 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20121
20122 // M M CCCCC SSSSS TTTTTTT BBBBBB 1
20123 // MM MM C C S S T B B 11
20124 // M M M M C S T B B 1 1
20125 // M M M C SSSSS T BBBBBB 1
20126 // M M C S T B B 1
20127 // M M C C S S T B B 1
20128 // M M CCCCC SSSSS T BBBBBB 11111
20129
20130
20131 // VIF THU 20 NOV 2025 22:19:29 ** MCSTB1 ** DIAGNOSTICS PAGE 00723
20132
20133
20134 // VIF THU 20 NOV 2025 22:19:29 ** MCSTB1 ** GENERATED CODE PAGE 00724
20135
20136 int_4 _mcstb1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_8
20137 _p_ dsum_, real_4 _p_ work_, int_4 _p_ ier_)
20138 { // ** body not listed **
20259 }
20260
20261 // VIF THU 20 NOV 2025 22:19:29 ** MCSTF1 ** MCSTF1 PAGE 00727
20262
20263 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20264 // S S U U B B R R O O U U T I NN N E
20265 // S U U B B R R O O U U T I N N N E
20266 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20267 // S U U B B R R O O U U T I N N N E
20268 // S S U U B B R R O O U U T I N NN E
20269 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20270
20271 // M M CCCCC SSSSS TTTTTTT FFFFFFF 1
20272 // MM MM C C S S T F 11
20273 // M M M M C S T F 1 1
20274 // M M M C SSSSS T FFFFF 1
20275 // M M C S T F 1
20276 // M M C C S S T F 1
20277 // M M CCCCC SSSSS T F 11111
20278
20279
20280 // VIF THU 20 NOV 2025 22:19:29 ** MCSTF1 ** DIAGNOSTICS PAGE 00728
20281
20282
20283 // VIF THU 20 NOV 2025 22:19:29 ** MCSTF1 ** GENERATED CODE PAGE 00729
20284
20285 int_4 _mcstf1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_8
20286 _p_ dsum_, real_4 _p_ work_, int_4 _p_ ier_)
20287 { // ** body not listed **
20403 }
20404
20405 // VIF THU 20 NOV 2025 22:19:29 ** MRADB2 ** MRADB2 PAGE 00732
20406
20407 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20408 // S S U U B B R R O O U U T I NN N E
20409 // S U U B B R R O O U U T I N N N E
20410 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20411 // S U U B B R R O O U U T I N N N E
20412 // S S U U B B R R O O U U T I N NN E
20413 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20414
20415 // M M RRRRRR A DDDDDD BBBBBB 22222
20416 // MM MM R R A A D D B B 2 2
20417 // M M M M R R A A D D B B 2
20418 // M M M RRRRRR A A D D BBBBBB 22222
20419 // M M R R AAAAAAA D D B B 2
20420 // M M R R A A D D B B 2
20421 // M M R R A A DDDDDD BBBBBB 2222222
20422
20423
20424 // VIF THU 20 NOV 2025 22:19:29 ** MRADB2 ** DIAGNOSTICS PAGE 00733
20425
20426
20427 // VIF THU 20 NOV 2025 22:19:29 ** MRADB2 ** GENERATED CODE PAGE 00734
20428
20429 int_4 _mradb2 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
20430 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_)
20431 { // ** body not listed **
20503 }
20504
20505 // VIF THU 20 NOV 2025 22:19:29 ** MRADB3 ** MRADB3 PAGE 00736
20506
20507 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20508 // S S U U B B R R O O U U T I NN N E
20509 // S U U B B R R O O U U T I N N N E
20510 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20511 // S U U B B R R O O U U T I N N N E
20512 // S S U U B B R R O O U U T I N NN E
20513 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20514
20515 // M M RRRRRR A DDDDDD BBBBBB 33333
20516 // MM MM R R A A D D B B 3 3
20517 // M M M M R R A A D D B B 3
20518 // M M M RRRRRR A A D D BBBBBB 33333
20519 // M M R R AAAAAAA D D B B 3
20520 // M M R R A A D D B B 3 3
20521 // M M R R A A DDDDDD BBBBBB 33333
20522
20523
20524 // VIF THU 20 NOV 2025 22:19:29 ** MRADB3 ** DIAGNOSTICS PAGE 00737
20525
20526
20527 // VIF THU 20 NOV 2025 22:19:29 ** MRADB3 ** GENERATED CODE PAGE 00738
20528
20529 int_4 _mradb3 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
20530 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_, real_4 _p_ wa2_)
20531 { // ** body not listed **
20614 }
20615
20616 // VIF THU 20 NOV 2025 22:19:29 ** MRADB4 ** MRADB4 PAGE 00740
20617
20618 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20619 // S S U U B B R R O O U U T I NN N E
20620 // S U U B B R R O O U U T I N N N E
20621 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20622 // S U U B B R R O O U U T I N N N E
20623 // S S U U B B R R O O U U T I N NN E
20624 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20625
20626 // M M RRRRRR A DDDDDD BBBBBB 4
20627 // MM MM R R A A D D B B 4 4
20628 // M M M M R R A A D D B B 4 4
20629 // M M M RRRRRR A A D D BBBBBB 4444444
20630 // M M R R AAAAAAA D D B B 4
20631 // M M R R A A D D B B 4
20632 // M M R R A A DDDDDD BBBBBB 4
20633
20634
20635 // VIF THU 20 NOV 2025 22:19:29 ** MRADB4 ** DIAGNOSTICS PAGE 00741
20636
20637
20638 // VIF THU 20 NOV 2025 22:19:29 ** MRADB4 ** GENERATED CODE PAGE 00742
20639
20640 int_4 _mradb4 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
20641 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_)
20642 { // ** body not listed **
20774 }
20775
20776 // VIF THU 20 NOV 2025 22:19:29 ** MRADB5 ** MRADB5 PAGE 00745
20777
20778 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20779 // S S U U B B R R O O U U T I NN N E
20780 // S U U B B R R O O U U T I N N N E
20781 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
20782 // S U U B B R R O O U U T I N N N E
20783 // S S U U B B R R O O U U T I N NN E
20784 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
20785
20786 // M M RRRRRR A DDDDDD BBBBBB 5555555
20787 // MM MM R R A A D D B B 5
20788 // M M M M R R A A D D B B 5
20789 // M M M RRRRRR A A D D BBBBBB 55555
20790 // M M R R AAAAAAA D D B B 5
20791 // M M R R A A D D B B 5 5
20792 // M M R R A A DDDDDD BBBBBB 55555
20793
20794
20795 // VIF THU 20 NOV 2025 22:19:29 ** MRADB5 ** DIAGNOSTICS PAGE 00746
20796
20797
20798 // VIF THU 20 NOV 2025 22:19:29 ** MRADB5 ** GENERATED CODE PAGE 00747
20799
20800 int_4 _mradb5 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
20801 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
20802 { // ** body not listed **
20993 }
20994
20995 // VIF THU 20 NOV 2025 22:19:29 ** MRADBG ** MRADBG PAGE 00751
20996
20997 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
20998 // S S U U B B R R O O U U T I NN N E
20999 // S U U B B R R O O U U T I N N N E
21000 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
21001 // S U U B B R R O O U U T I N N N E
21002 // S S U U B B R R O O U U T I N NN E
21003 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
21004
21005 // M M RRRRRR A DDDDDD BBBBBB GGGGG
21006 // MM MM R R A A D D B B G G
21007 // M M M M R R A A D D B B G
21008 // M M M RRRRRR A A D D BBBBBB G GGGG
21009 // M M R R AAAAAAA D D B B G G
21010 // M M R R A A D D B B G G
21011 // M M R R A A DDDDDD BBBBBB GGGGG
21012
21013
21014 // VIF THU 20 NOV 2025 22:19:29 ** MRADBG ** DIAGNOSTICS PAGE 00752
21015
21016
21017 // VIF THU 20 NOV 2025 22:19:29 ** MRADBG ** GENERATED CODE PAGE 00753
21018
21019 int_4 _mradbg (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_4 _p_ cc_, real_4 _p_
21020 c1_, real_4 _p_ c2_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch2_, int_4 _p_ im2_, int_4 _p_ in2_,
21021 real_4 _p_ wa_)
21022 { // ** body not listed **
21334 }
21335
21336 // VIF THU 20 NOV 2025 22:19:29 ** MRADF2 ** MRADF2 PAGE 00760
21337
21338 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
21339 // S S U U B B R R O O U U T I NN N E
21340 // S U U B B R R O O U U T I N N N E
21341 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
21342 // S U U B B R R O O U U T I N N N E
21343 // S S U U B B R R O O U U T I N NN E
21344 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
21345
21346 // M M RRRRRR A DDDDDD FFFFFFF 22222
21347 // MM MM R R A A D D F 2 2
21348 // M M M M R R A A D D F 2
21349 // M M M RRRRRR A A D D FFFFF 22222
21350 // M M R R AAAAAAA D D F 2
21351 // M M R R A A D D F 2
21352 // M M R R A A DDDDDD F 2222222
21353
21354
21355 // VIF THU 20 NOV 2025 22:19:29 ** MRADF2 ** DIAGNOSTICS PAGE 00761
21356
21357
21358 // VIF THU 20 NOV 2025 22:19:29 ** MRADF2 ** GENERATED CODE PAGE 00762
21359
21360 int_4 _mradf2 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
21361 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_)
21362 { // ** body not listed **
21433 }
21434
21435 // VIF THU 20 NOV 2025 22:19:29 ** MRADF3 ** MRADF3 PAGE 00764
21436
21437 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
21438 // S S U U B B R R O O U U T I NN N E
21439 // S U U B B R R O O U U T I N N N E
21440 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
21441 // S U U B B R R O O U U T I N N N E
21442 // S S U U B B R R O O U U T I N NN E
21443 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
21444
21445 // M M RRRRRR A DDDDDD FFFFFFF 33333
21446 // MM MM R R A A D D F 3 3
21447 // M M M M R R A A D D F 3
21448 // M M M RRRRRR A A D D FFFFF 33333
21449 // M M R R AAAAAAA D D F 3
21450 // M M R R A A D D F 3 3
21451 // M M R R A A DDDDDD F 33333
21452
21453
21454 // VIF THU 20 NOV 2025 22:19:29 ** MRADF3 ** DIAGNOSTICS PAGE 00765
21455
21456
21457 // VIF THU 20 NOV 2025 22:19:29 ** MRADF3 ** GENERATED CODE PAGE 00766
21458
21459 int_4 _mradf3 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
21460 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_, real_4 _p_ wa2_)
21461 { // ** body not listed **
21549 }
21550
21551 // VIF THU 20 NOV 2025 22:19:29 ** MRADF4 ** MRADF4 PAGE 00768
21552
21553 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
21554 // S S U U B B R R O O U U T I NN N E
21555 // S U U B B R R O O U U T I N N N E
21556 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
21557 // S U U B B R R O O U U T I N N N E
21558 // S S U U B B R R O O U U T I N NN E
21559 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
21560
21561 // M M RRRRRR A DDDDDD FFFFFFF 4
21562 // MM MM R R A A D D F 4 4
21563 // M M M M R R A A D D F 4 4
21564 // M M M RRRRRR A A D D FFFFF 4444444
21565 // M M R R AAAAAAA D D F 4
21566 // M M R R A A D D F 4
21567 // M M R R A A DDDDDD F 4
21568
21569
21570 // VIF THU 20 NOV 2025 22:19:29 ** MRADF4 ** DIAGNOSTICS PAGE 00769
21571
21572
21573 // VIF THU 20 NOV 2025 22:19:29 ** MRADF4 ** GENERATED CODE PAGE 00770
21574
21575 int_4 _mradf4 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
21576 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_)
21577 { // ** body not listed **
21712 }
21713
21714 // VIF THU 20 NOV 2025 22:19:29 ** MRADF5 ** MRADF5 PAGE 00773
21715
21716 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
21717 // S S U U B B R R O O U U T I NN N E
21718 // S U U B B R R O O U U T I N N N E
21719 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
21720 // S U U B B R R O O U U T I N N N E
21721 // S S U U B B R R O O U U T I N NN E
21722 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
21723
21724 // M M RRRRRR A DDDDDD FFFFFFF 5555555
21725 // MM MM R R A A D D F 5
21726 // M M M M R R A A D D F 5
21727 // M M M RRRRRR A A D D FFFFF 55555
21728 // M M R R AAAAAAA D D F 5
21729 // M M R R A A D D F 5 5
21730 // M M R R A A DDDDDD F 55555
21731
21732
21733 // VIF THU 20 NOV 2025 22:19:29 ** MRADF5 ** DIAGNOSTICS PAGE 00774
21734
21735
21736 // VIF THU 20 NOV 2025 22:19:29 ** MRADF5 ** GENERATED CODE PAGE 00775
21737
21738 int_4 _mradf5 (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_
21739 ch_, int_4 _p_ im2_, int_4 _p_ in2_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
21740 { // ** body not listed **
21957 }
21958
21959 // VIF THU 20 NOV 2025 22:19:29 ** MRADFG ** MRADFG PAGE 00780
21960
21961 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
21962 // S S U U B B R R O O U U T I NN N E
21963 // S U U B B R R O O U U T I N N N E
21964 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
21965 // S U U B B R R O O U U T I N N N E
21966 // S S U U B B R R O O U U T I N NN E
21967 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
21968
21969 // M M RRRRRR A DDDDDD FFFFFFF GGGGG
21970 // MM MM R R A A D D F G G
21971 // M M M M R R A A D D F G
21972 // M M M RRRRRR A A D D FFFFF G GGGG
21973 // M M R R AAAAAAA D D F G G
21974 // M M R R A A D D F G G
21975 // M M R R A A DDDDDD F GGGGG
21976
21977
21978 // VIF THU 20 NOV 2025 22:19:29 ** MRADFG ** DIAGNOSTICS PAGE 00781
21979
21980
21981 // VIF THU 20 NOV 2025 22:19:29 ** MRADFG ** GENERATED CODE PAGE 00782
21982
21983 int_4 _mradfg (int_4 _p_ m_, int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_4 _p_ cc_, real_4 _p_
21984 c1_, real_4 _p_ c2_, int_4 _p_ im1_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch2_, int_4 _p_ im2_, int_4 _p_ in2_,
21985 real_4 _p_ wa_)
21986 { // ** body not listed **
22304 }
22305
22306 // VIF THU 20 NOV 2025 22:19:29 ** MRFTB1 ** MRFTB1 PAGE 00789
22307
22308 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
22309 // S S U U B B R R O O U U T I NN N E
22310 // S U U B B R R O O U U T I N N N E
22311 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
22312 // S U U B B R R O O U U T I N N N E
22313 // S S U U B B R R O O U U T I N NN E
22314 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
22315
22316 // M M RRRRRR FFFFFFF TTTTTTT BBBBBB 1
22317 // MM MM R R F T B B 11
22318 // M M M M R R F T B B 1 1
22319 // M M M RRRRRR FFFFF T BBBBBB 1
22320 // M M R R F T B B 1
22321 // M M R R F T B B 1
22322 // M M R R F T BBBBBB 11111
22323
22324
22325 // VIF THU 20 NOV 2025 22:19:29 ** MRFTB1 ** DIAGNOSTICS PAGE 00790
22326
22327
22328 // VIF THU 20 NOV 2025 22:19:29 ** MRFTB1 ** GENERATED CODE PAGE 00791
22329
22330 int_4 _mrftb1 (int_4 _p_ m_, int_4 _p_ im_, int_4 _p_ n_, int_4 _p_ in_, real_4 _p_ c_, real_4 _p_ ch_, real_4 _p_ wa_,
22331 real_4 _p_ fac_)
22332 { // ** body not listed **
22476 }
22477
22478 // VIF THU 20 NOV 2025 22:19:29 ** MRFTF1 ** MRFTF1 PAGE 00794
22479
22480 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
22481 // S S U U B B R R O O U U T I NN N E
22482 // S U U B B R R O O U U T I N N N E
22483 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
22484 // S U U B B R R O O U U T I N N N E
22485 // S S U U B B R R O O U U T I N NN E
22486 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
22487
22488 // M M RRRRRR FFFFFFF TTTTTTT FFFFFFF 1
22489 // MM MM R R F T F 11
22490 // M M M M R R F T F 1 1
22491 // M M M RRRRRR FFFFF T FFFFF 1
22492 // M M R R F T F 1
22493 // M M R R F T F 1
22494 // M M R R F T F 11111
22495
22496
22497 // VIF THU 20 NOV 2025 22:19:29 ** MRFTF1 ** DIAGNOSTICS PAGE 00795
22498
22499
22500 // VIF THU 20 NOV 2025 22:19:29 ** MRFTF1 ** GENERATED CODE PAGE 00796
22501
22502 int_4 _mrftf1 (int_4 _p_ m_, int_4 _p_ im_, int_4 _p_ n_, int_4 _p_ in_, real_4 _p_ c_, real_4 _p_ ch_, real_4 _p_ wa_,
22503 real_4 _p_ fac_)
22504 { // ** body not listed **
22652 }
22653
22654 // VIF THU 20 NOV 2025 22:19:29 ** MRFTI1 ** MRFTI1 PAGE 00799
22655
22656 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
22657 // S S U U B B R R O O U U T I NN N E
22658 // S U U B B R R O O U U T I N N N E
22659 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
22660 // S U U B B R R O O U U T I N N N E
22661 // S S U U B B R R O O U U T I N NN E
22662 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
22663
22664 // M M RRRRRR FFFFFFF TTTTTTT III 1
22665 // MM MM R R F T I 11
22666 // M M M M R R F T I 1 1
22667 // M M M RRRRRR FFFFF T I 1
22668 // M M R R F T I 1
22669 // M M R R F T I 1
22670 // M M R R F T III 11111
22671
22672
22673 // VIF THU 20 NOV 2025 22:19:29 ** MRFTI1 ** DIAGNOSTICS PAGE 00800
22674
22675
22676 // VIF THU 20 NOV 2025 22:19:29 ** MRFTI1 ** GENERATED CODE PAGE 00801
22677
22678 int_4 _mrfti1 (int_4 _p_ n_, real_4 _p_ wa_, real_4 _p_ fac_)
22679 { // ** body not listed **
22801 }
22802
22803 // VIF THU 20 NOV 2025 22:19:29 ** MSNTB1 ** MSNTB1 PAGE 00804
22804
22805 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
22806 // S S U U B B R R O O U U T I NN N E
22807 // S U U B B R R O O U U T I N N N E
22808 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
22809 // S U U B B R R O O U U T I N N N E
22810 // S S U U B B R R O O U U T I N NN E
22811 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
22812
22813 // M M SSSSS N N TTTTTTT BBBBBB 1
22814 // MM MM S S NN N T B B 11
22815 // M M M M S N N N T B B 1 1
22816 // M M M SSSSS N N N T BBBBBB 1
22817 // M M S N N N T B B 1
22818 // M M S S N NN T B B 1
22819 // M M SSSSS N N T BBBBBB 11111
22820
22821
22822 // VIF THU 20 NOV 2025 22:19:29 ** MSNTB1 ** DIAGNOSTICS PAGE 00805
22823
22824
22825 // VIF THU 20 NOV 2025 22:19:29 ** MSNTB1 ** GENERATED CODE PAGE 00806
22826
22827 int_4 _msntb1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_8
22828 _p_ dsum_, real_4 _p_ xh_, real_4 _p_ work_, int_4 _p_ ier_)
22829 { // ** body not listed **
22925 }
22926
22927 // VIF THU 20 NOV 2025 22:19:29 ** MSNTF1 ** MSNTF1 PAGE 00808
22928
22929 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
22930 // S S U U B B R R O O U U T I NN N E
22931 // S U U B B R R O O U U T I N N N E
22932 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
22933 // S U U B B R R O O U U T I N N N E
22934 // S S U U B B R R O O U U T I N NN E
22935 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
22936
22937 // M M SSSSS N N TTTTTTT FFFFFFF 1
22938 // MM MM S S NN N T F 11
22939 // M M M M S N N N T F 1 1
22940 // M M M SSSSS N N N T FFFFF 1
22941 // M M S N N N T F 1
22942 // M M S S N NN T F 1
22943 // M M SSSSS N N T F 11111
22944
22945
22946 // VIF THU 20 NOV 2025 22:19:29 ** MSNTF1 ** DIAGNOSTICS PAGE 00809
22947
22948
22949 // VIF THU 20 NOV 2025 22:19:29 ** MSNTF1 ** GENERATED CODE PAGE 00810
22950
22951 int_4 _msntf1 (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_8
22952 _p_ dsum_, real_4 _p_ xh_, real_4 _p_ work_, int_4 _p_ ier_)
22953 { // ** body not listed **
23050 }
23051
23052 // VIF THU 20 NOV 2025 22:19:29 ** R1F2KB ** R1F2KB PAGE 00812
23053
23054 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23055 // S S U U B B R R O O U U T I NN N E
23056 // S U U B B R R O O U U T I N N N E
23057 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23058 // S U U B B R R O O U U T I N N N E
23059 // S S U U B B R R O O U U T I N NN E
23060 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23061
23062 // RRRRRR 1 FFFFFFF 22222 K K BBBBBB
23063 // R R 11 F 2 2 K K B B
23064 // R R 1 1 F 2 K K B B
23065 // RRRRRR 1 FFFFF 22222 KKK BBBBBB
23066 // R R 1 F 2 K K B B
23067 // R R 1 F 2 K K B B
23068 // R R 11111 F 2222222 K K BBBBBB
23069
23070
23071 // VIF THU 20 NOV 2025 22:19:29 ** R1F2KB ** DIAGNOSTICS PAGE 00813
23072
23073
23074 // VIF THU 20 NOV 2025 22:19:29 ** R1F2KB ** GENERATED CODE PAGE 00814
23075
23076 int_4 _r1f2kb (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23077 _p_ wa1_)
23078 { // ** body not listed **
23130 }
23131
23132 // VIF THU 20 NOV 2025 22:19:29 ** R1F2KF ** R1F2KF PAGE 00816
23133
23134 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23135 // S S U U B B R R O O U U T I NN N E
23136 // S U U B B R R O O U U T I N N N E
23137 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23138 // S U U B B R R O O U U T I N N N E
23139 // S S U U B B R R O O U U T I N NN E
23140 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23141
23142 // RRRRRR 1 FFFFFFF 22222 K K FFFFFFF
23143 // R R 11 F 2 2 K K F
23144 // R R 1 1 F 2 K K F
23145 // RRRRRR 1 FFFFF 22222 KKK FFFFF
23146 // R R 1 F 2 K K F
23147 // R R 1 F 2 K K F
23148 // R R 11111 F 2222222 K K F
23149
23150
23151 // VIF THU 20 NOV 2025 22:19:29 ** R1F2KF ** DIAGNOSTICS PAGE 00817
23152
23153
23154 // VIF THU 20 NOV 2025 22:19:29 ** R1F2KF ** GENERATED CODE PAGE 00818
23155
23156 int_4 _r1f2kf (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23157 _p_ wa1_)
23158 { // ** body not listed **
23212 }
23213
23214 // VIF THU 20 NOV 2025 22:19:29 ** R1F3KB ** R1F3KB PAGE 00820
23215
23216 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23217 // S S U U B B R R O O U U T I NN N E
23218 // S U U B B R R O O U U T I N N N E
23219 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23220 // S U U B B R R O O U U T I N N N E
23221 // S S U U B B R R O O U U T I N NN E
23222 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23223
23224 // RRRRRR 1 FFFFFFF 33333 K K BBBBBB
23225 // R R 11 F 3 3 K K B B
23226 // R R 1 1 F 3 K K B B
23227 // RRRRRR 1 FFFFF 33333 KKK BBBBBB
23228 // R R 1 F 3 K K B B
23229 // R R 1 F 3 3 K K B B
23230 // R R 11111 F 33333 K K BBBBBB
23231
23232
23233 // VIF THU 20 NOV 2025 22:19:29 ** R1F3KB ** DIAGNOSTICS PAGE 00821
23234
23235
23236 // VIF THU 20 NOV 2025 22:19:29 ** R1F3KB ** GENERATED CODE PAGE 00822
23237
23238 int_4 _r1f3kb (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23239 _p_ wa1_, real_4 _p_ wa2_)
23240 { // ** body not listed **
23308 }
23309
23310 // VIF THU 20 NOV 2025 22:19:29 ** R1F3KF ** R1F3KF PAGE 00824
23311
23312 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23313 // S S U U B B R R O O U U T I NN N E
23314 // S U U B B R R O O U U T I N N N E
23315 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23316 // S U U B B R R O O U U T I N N N E
23317 // S S U U B B R R O O U U T I N NN E
23318 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23319
23320 // RRRRRR 1 FFFFFFF 33333 K K FFFFFFF
23321 // R R 11 F 3 3 K K F
23322 // R R 1 1 F 3 K K F
23323 // RRRRRR 1 FFFFF 33333 KKK FFFFF
23324 // R R 1 F 3 K K F
23325 // R R 1 F 3 3 K K F
23326 // R R 11111 F 33333 K K F
23327
23328
23329 // VIF THU 20 NOV 2025 22:19:29 ** R1F3KF ** DIAGNOSTICS PAGE 00825
23330
23331
23332 // VIF THU 20 NOV 2025 22:19:29 ** R1F3KF ** GENERATED CODE PAGE 00826
23333
23334 int_4 _r1f3kf (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23335 _p_ wa1_, real_4 _p_ wa2_)
23336 { // ** body not listed **
23412 }
23413
23414 // VIF THU 20 NOV 2025 22:19:29 ** R1F4KB ** R1F4KB PAGE 00828
23415
23416 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23417 // S S U U B B R R O O U U T I NN N E
23418 // S U U B B R R O O U U T I N N N E
23419 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23420 // S U U B B R R O O U U T I N N N E
23421 // S S U U B B R R O O U U T I N NN E
23422 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23423
23424 // RRRRRR 1 FFFFFFF 4 K K BBBBBB
23425 // R R 11 F 4 4 K K B B
23426 // R R 1 1 F 4 4 K K B B
23427 // RRRRRR 1 FFFFF 4444444 KKK BBBBBB
23428 // R R 1 F 4 K K B B
23429 // R R 1 F 4 K K B B
23430 // R R 11111 F 4 K K BBBBBB
23431
23432
23433 // VIF THU 20 NOV 2025 22:19:29 ** R1F4KB ** DIAGNOSTICS PAGE 00829
23434
23435
23436 // VIF THU 20 NOV 2025 22:19:29 ** R1F4KB ** GENERATED CODE PAGE 00830
23437
23438 int_4 _r1f4kb (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23439 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_)
23440 { // ** body not listed **
23556 }
23557
23558 // VIF THU 20 NOV 2025 22:19:29 ** R1F4KF ** R1F4KF PAGE 00833
23559
23560 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23561 // S S U U B B R R O O U U T I NN N E
23562 // S U U B B R R O O U U T I N N N E
23563 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23564 // S U U B B R R O O U U T I N N N E
23565 // S S U U B B R R O O U U T I N NN E
23566 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23567
23568 // RRRRRR 1 FFFFFFF 4 K K FFFFFFF
23569 // R R 11 F 4 4 K K F
23570 // R R 1 1 F 4 4 K K F
23571 // RRRRRR 1 FFFFF 4444444 KKK FFFFF
23572 // R R 1 F 4 K K F
23573 // R R 1 F 4 K K F
23574 // R R 11111 F 4 K K F
23575
23576
23577 // VIF THU 20 NOV 2025 22:19:29 ** R1F4KF ** DIAGNOSTICS PAGE 00834
23578
23579
23580 // VIF THU 20 NOV 2025 22:19:29 ** R1F4KF ** GENERATED CODE PAGE 00835
23581
23582 int_4 _r1f4kf (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23583 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_)
23584 { // ** body not listed **
23700 }
23701
23702 // VIF THU 20 NOV 2025 22:19:29 ** R1F5KB ** R1F5KB PAGE 00838
23703
23704 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23705 // S S U U B B R R O O U U T I NN N E
23706 // S U U B B R R O O U U T I N N N E
23707 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23708 // S U U B B R R O O U U T I N N N E
23709 // S S U U B B R R O O U U T I N NN E
23710 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23711
23712 // RRRRRR 1 FFFFFFF 5555555 K K BBBBBB
23713 // R R 11 F 5 K K B B
23714 // R R 1 1 F 5 K K B B
23715 // RRRRRR 1 FFFFF 55555 KKK BBBBBB
23716 // R R 1 F 5 K K B B
23717 // R R 1 F 5 5 K K B B
23718 // R R 11111 F 55555 K K BBBBBB
23719
23720
23721 // VIF THU 20 NOV 2025 22:19:29 ** R1F5KB ** DIAGNOSTICS PAGE 00839
23722
23723
23724 // VIF THU 20 NOV 2025 22:19:29 ** R1F5KB ** GENERATED CODE PAGE 00840
23725
23726 int_4 _r1f5kb (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23727 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
23728 { // ** body not listed **
23899 }
23900
23901 // VIF THU 20 NOV 2025 22:19:29 ** R1F5KF ** R1F5KF PAGE 00844
23902
23903 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
23904 // S S U U B B R R O O U U T I NN N E
23905 // S U U B B R R O O U U T I N N N E
23906 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
23907 // S U U B B R R O O U U T I N N N E
23908 // S S U U B B R R O O U U T I N NN E
23909 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
23910
23911 // RRRRRR 1 FFFFFFF 5555555 K K FFFFFFF
23912 // R R 11 F 5 K K F
23913 // R R 1 1 F 5 K K F
23914 // RRRRRR 1 FFFFF 55555 KKK FFFFF
23915 // R R 1 F 5 K K F
23916 // R R 1 F 5 5 K K F
23917 // R R 11111 F 55555 K K F
23918
23919
23920 // VIF THU 20 NOV 2025 22:19:29 ** R1F5KF ** DIAGNOSTICS PAGE 00845
23921
23922
23923 // VIF THU 20 NOV 2025 22:19:29 ** R1F5KF ** GENERATED CODE PAGE 00846
23924
23925 int_4 _r1f5kf (int_4 _p_ ido_, int_4 _p_ l1_, real_4 _p_ cc_, int_4 _p_ in1_, real_4 _p_ ch_, int_4 _p_ in2_, real_4
23926 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
23927 { // ** body not listed **
24121 }
24122
24123 // VIF THU 20 NOV 2025 22:19:29 ** R1FGKB ** R1FGKB PAGE 00850
24124
24125 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24126 // S S U U B B R R O O U U T I NN N E
24127 // S U U B B R R O O U U T I N N N E
24128 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24129 // S U U B B R R O O U U T I N N N E
24130 // S S U U B B R R O O U U T I N NN E
24131 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24132
24133 // RRRRRR 1 FFFFFFF GGGGG K K BBBBBB
24134 // R R 11 F G G K K B B
24135 // R R 1 1 F G K K B B
24136 // RRRRRR 1 FFFFF G GGGG KKK BBBBBB
24137 // R R 1 F G G K K B B
24138 // R R 1 F G G K K B B
24139 // R R 11111 F GGGGG K K BBBBBB
24140
24141
24142 // VIF THU 20 NOV 2025 22:19:29 ** R1FGKB ** DIAGNOSTICS PAGE 00851
24143
24144
24145 // VIF THU 20 NOV 2025 22:19:29 ** R1FGKB ** GENERATED CODE PAGE 00852
24146
24147 int_4 _r1fgkb (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_4 _p_ cc_, real_4 _p_ c1_, real_4
24148 _p_ c2_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch2_, int_4 _p_ in2_, real_4 _p_ wa_)
24149 { // ** body not listed **
24392 }
24393
24394 // VIF THU 20 NOV 2025 22:19:29 ** R1FGKF ** R1FGKF PAGE 00857
24395
24396 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24397 // S S U U B B R R O O U U T I NN N E
24398 // S U U B B R R O O U U T I N N N E
24399 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24400 // S U U B B R R O O U U T I N N N E
24401 // S S U U B B R R O O U U T I N NN E
24402 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24403
24404 // RRRRRR 1 FFFFFFF GGGGG K K FFFFFFF
24405 // R R 11 F G G K K F
24406 // R R 1 1 F G K K F
24407 // RRRRRR 1 FFFFF G GGGG KKK FFFFF
24408 // R R 1 F G G K K F
24409 // R R 1 F G G K K F
24410 // R R 11111 F GGGGG K K F
24411
24412
24413 // VIF THU 20 NOV 2025 22:19:29 ** R1FGKF ** DIAGNOSTICS PAGE 00858
24414
24415
24416 // VIF THU 20 NOV 2025 22:19:29 ** R1FGKF ** GENERATED CODE PAGE 00859
24417
24418 int_4 _r1fgkf (int_4 _p_ ido_, int_4 _p_ ip_, int_4 _p_ l1_, int_4 _p_ idl1_, real_4 _p_ cc_, real_4 _p_ c1_, real_4
24419 _p_ c2_, int_4 _p_ in1_, real_4 _p_ ch_, real_4 _p_ ch2_, int_4 _p_ in2_, real_4 _p_ wa_)
24420 { // ** body not listed **
24664 }
24665
24666 // VIF THU 20 NOV 2025 22:19:29 ** R2W ** R2W PAGE 00864
24667
24668 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24669 // S S U U B B R R O O U U T I NN N E
24670 // S U U B B R R O O U U T I N N N E
24671 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24672 // S U U B B R R O O U U T I N N N E
24673 // S S U U B B R R O O U U T I N NN E
24674 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24675
24676 // RRRRRR 22222 W W
24677 // R R 2 2 W W
24678 // R R 2 W W
24679 // RRRRRR 22222 W W W
24680 // R R 2 W W W
24681 // R R 2 W W W
24682 // R R 2222222 WW WW
24683
24684
24685 // VIF THU 20 NOV 2025 22:19:29 ** R2W ** DIAGNOSTICS PAGE 00865
24686
24687
24688 // VIF THU 20 NOV 2025 22:19:29 ** R2W ** GENERATED CODE PAGE 00866
24689
24690 int_4 _r2w (int_4 _p_ ldr_, int_4 _p_ ldw_, int_4 _p_ l_, int_4 _p_ m_, real_4 _p_ r_, real_4 _p_ w_)
24691 { // ** body not listed **
24700 }
24701
24702 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1B ** RFFT1B PAGE 00867
24703
24704 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24705 // S S U U B B R R O O U U T I NN N E
24706 // S U U B B R R O O U U T I N N N E
24707 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24708 // S U U B B R R O O U U T I N N N E
24709 // S S U U B B R R O O U U T I N NN E
24710 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24711
24712 // RRRRRR FFFFFFF FFFFFFF TTTTTTT 1 BBBBBB
24713 // R R F F T 11 B B
24714 // R R F F T 1 1 B B
24715 // RRRRRR FFFFF FFFFF T 1 BBBBBB
24716 // R R F F T 1 B B
24717 // R R F F T 1 B B
24718 // R R F F T 11111 BBBBBB
24719
24720
24721 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1B ** DIAGNOSTICS PAGE 00868
24722
24723
24724 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1B ** GENERATED CODE PAGE 00869
24725
24726 int_4 _rfft1b (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ r_, int_4 _p_ lenr_, real_4 _p_ wsave_, int_4 _p_ lensav_,
24727 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
24728 { // ** body not listed **
24751 }
24752
24753 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1F ** RFFT1F PAGE 00870
24754
24755 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24756 // S S U U B B R R O O U U T I NN N E
24757 // S U U B B R R O O U U T I N N N E
24758 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24759 // S U U B B R R O O U U T I N N N E
24760 // S S U U B B R R O O U U T I N NN E
24761 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24762
24763 // RRRRRR FFFFFFF FFFFFFF TTTTTTT 1 FFFFFFF
24764 // R R F F T 11 F
24765 // R R F F T 1 1 F
24766 // RRRRRR FFFFF FFFFF T 1 FFFFF
24767 // R R F F T 1 F
24768 // R R F F T 1 F
24769 // R R F F T 11111 F
24770
24771
24772 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1F ** DIAGNOSTICS PAGE 00871
24773
24774
24775 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1F ** GENERATED CODE PAGE 00872
24776
24777 int_4 _rfft1f (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ r_, int_4 _p_ lenr_, real_4 _p_ wsave_, int_4 _p_ lensav_,
24778 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
24779 { // ** body not listed **
24802 }
24803
24804 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1I ** RFFT1I PAGE 00873
24805
24806 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24807 // S S U U B B R R O O U U T I NN N E
24808 // S U U B B R R O O U U T I N N N E
24809 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24810 // S U U B B R R O O U U T I N N N E
24811 // S S U U B B R R O O U U T I N NN E
24812 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24813
24814 // RRRRRR FFFFFFF FFFFFFF TTTTTTT 1 III
24815 // R R F F T 11 I
24816 // R R F F T 1 1 I
24817 // RRRRRR FFFFF FFFFF T 1 I
24818 // R R F F T 1 I
24819 // R R F F T 1 I
24820 // R R F F T 11111 III
24821
24822
24823 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1I ** DIAGNOSTICS PAGE 00874
24824
24825
24826 // VIF THU 20 NOV 2025 22:19:29 ** RFFT1I ** GENERATED CODE PAGE 00875
24827
24828 int_4 _rfft1i (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
24829 { // ** body not listed **
24844 }
24845
24846 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2B ** RFFT2B PAGE 00876
24847
24848 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24849 // S S U U B B R R O O U U T I NN N E
24850 // S U U B B R R O O U U T I N N N E
24851 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24852 // S U U B B R R O O U U T I N N N E
24853 // S S U U B B R R O O U U T I N NN E
24854 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24855
24856 // RRRRRR FFFFFFF FFFFFFF TTTTTTT 22222 BBBBBB
24857 // R R F F T 2 2 B B
24858 // R R F F T 2 B B
24859 // RRRRRR FFFFF FFFFF T 22222 BBBBBB
24860 // R R F F T 2 B B
24861 // R R F F T 2 B B
24862 // R R F F T 2222222 BBBBBB
24863
24864
24865 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2B ** DIAGNOSTICS PAGE 00877
24866
24867
24868 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2B ** GENERATED CODE PAGE 00878
24869
24870 int_4 _rfft2b (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, real_4 _p_ r_, real_4 _p_ wsave_, int_4 _p_ lensav_, real_4
24871 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
24872 { // ** body not listed **
24960 }
24961
24962 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2F ** RFFT2F PAGE 00880
24963
24964 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
24965 // S S U U B B R R O O U U T I NN N E
24966 // S U U B B R R O O U U T I N N N E
24967 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
24968 // S U U B B R R O O U U T I N N N E
24969 // S S U U B B R R O O U U T I N NN E
24970 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
24971
24972 // RRRRRR FFFFFFF FFFFFFF TTTTTTT 22222 FFFFFFF
24973 // R R F F T 2 2 F
24974 // R R F F T 2 F
24975 // RRRRRR FFFFF FFFFF T 22222 FFFFF
24976 // R R F F T 2 F
24977 // R R F F T 2 F
24978 // R R F F T 2222222 F
24979
24980
24981 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2F ** DIAGNOSTICS PAGE 00881
24982
24983
24984 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2F ** GENERATED CODE PAGE 00882
24985
24986 int_4 _rfft2f (int_4 _p_ ldim_, int_4 _p_ l_, int_4 _p_ m_, real_4 _p_ r_, real_4 _p_ wsave_, int_4 _p_ lensav_, real_4
24987 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
24988 { // ** body not listed **
25075 }
25076
25077 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2I ** RFFT2I PAGE 00884
25078
25079 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25080 // S S U U B B R R O O U U T I NN N E
25081 // S U U B B R R O O U U T I N N N E
25082 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25083 // S U U B B R R O O U U T I N N N E
25084 // S S U U B B R R O O U U T I N NN E
25085 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25086
25087 // RRRRRR FFFFFFF FFFFFFF TTTTTTT 22222 III
25088 // R R F F T 2 2 I
25089 // R R F F T 2 I
25090 // RRRRRR FFFFF FFFFF T 22222 I
25091 // R R F F T 2 I
25092 // R R F F T 2 I
25093 // R R F F T 2222222 III
25094
25095
25096 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2I ** DIAGNOSTICS PAGE 00885
25097
25098
25099 // VIF THU 20 NOV 2025 22:19:29 ** RFFT2I ** GENERATED CODE PAGE 00886
25100
25101 int_4 _rfft2i (int_4 _p_ l_, int_4 _p_ m_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
25102 { // ** body not listed **
25138 }
25139
25140 // VIF THU 20 NOV 2025 22:19:29 ** RFFTB1 ** RFFTB1 PAGE 00887
25141
25142 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25143 // S S U U B B R R O O U U T I NN N E
25144 // S U U B B R R O O U U T I N N N E
25145 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25146 // S U U B B R R O O U U T I N N N E
25147 // S S U U B B R R O O U U T I N NN E
25148 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25149
25150 // RRRRRR FFFFFFF FFFFFFF TTTTTTT BBBBBB 1
25151 // R R F F T B B 11
25152 // R R F F T B B 1 1
25153 // RRRRRR FFFFF FFFFF T BBBBBB 1
25154 // R R F F T B B 1
25155 // R R F F T B B 1
25156 // R R F F T BBBBBB 11111
25157
25158
25159 // VIF THU 20 NOV 2025 22:19:29 ** RFFTB1 ** DIAGNOSTICS PAGE 00888
25160
25161
25162 // VIF THU 20 NOV 2025 22:19:29 ** RFFTB1 ** GENERATED CODE PAGE 00889
25163
25164 int_4 _rfftb1 (int_4 _p_ n_, int_4 _p_ in_, real_4 _p_ c_, real_4 _p_ ch_, real_4 _p_ wa_, real_4 _p_ fac_)
25165 { // ** body not listed **
25295 }
25296
25297 // VIF THU 20 NOV 2025 22:19:29 ** RFFTF1 ** RFFTF1 PAGE 00892
25298
25299 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25300 // S S U U B B R R O O U U T I NN N E
25301 // S U U B B R R O O U U T I N N N E
25302 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25303 // S U U B B R R O O U U T I N N N E
25304 // S S U U B B R R O O U U T I N NN E
25305 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25306
25307 // RRRRRR FFFFFFF FFFFFFF TTTTTTT FFFFFFF 1
25308 // R R F F T F 11
25309 // R R F F T F 1 1
25310 // RRRRRR FFFFF FFFFF T FFFFF 1
25311 // R R F F T F 1
25312 // R R F F T F 1
25313 // R R F F T F 11111
25314
25315
25316 // VIF THU 20 NOV 2025 22:19:29 ** RFFTF1 ** DIAGNOSTICS PAGE 00893
25317
25318
25319 // VIF THU 20 NOV 2025 22:19:29 ** RFFTF1 ** GENERATED CODE PAGE 00894
25320
25321 int_4 _rfftf1 (int_4 _p_ n_, int_4 _p_ in_, real_4 _p_ c_, real_4 _p_ ch_, real_4 _p_ wa_, real_4 _p_ fac_)
25322 { // ** body not listed **
25444 }
25445
25446 // VIF THU 20 NOV 2025 22:19:29 ** RFFTI1 ** RFFTI1 PAGE 00897
25447
25448 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25449 // S S U U B B R R O O U U T I NN N E
25450 // S U U B B R R O O U U T I N N N E
25451 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25452 // S U U B B R R O O U U T I N N N E
25453 // S S U U B B R R O O U U T I N NN E
25454 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25455
25456 // RRRRRR FFFFFFF FFFFFFF TTTTTTT III 1
25457 // R R F F T I 11
25458 // R R F F T I 1 1
25459 // RRRRRR FFFFF FFFFF T I 1
25460 // R R F F T I 1
25461 // R R F F T I 1
25462 // R R F F T III 11111
25463
25464
25465 // VIF THU 20 NOV 2025 22:19:29 ** RFFTI1 ** DIAGNOSTICS PAGE 00898
25466
25467
25468 // VIF THU 20 NOV 2025 22:19:29 ** RFFTI1 ** GENERATED CODE PAGE 00899
25469
25470 int_4 _rffti1 (int_4 _p_ n_, real_4 _p_ wa_, real_4 _p_ fac_)
25471 { // ** body not listed **
25593 }
25594
25595 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMB ** RFFTMB PAGE 00902
25596
25597 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25598 // S S U U B B R R O O U U T I NN N E
25599 // S U U B B R R O O U U T I N N N E
25600 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25601 // S U U B B R R O O U U T I N N N E
25602 // S S U U B B R R O O U U T I N NN E
25603 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25604
25605 // RRRRRR FFFFFFF FFFFFFF TTTTTTT M M BBBBBB
25606 // R R F F T MM MM B B
25607 // R R F F T M M M M B B
25608 // RRRRRR FFFFF FFFFF T M M M BBBBBB
25609 // R R F F T M M B B
25610 // R R F F T M M B B
25611 // R R F F T M M BBBBBB
25612
25613
25614 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMB ** DIAGNOSTICS PAGE 00903
25615
25616
25617 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMB ** GENERATED CODE PAGE 00904
25618
25619 int_4 _rfftmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ r_, int_4 _p_ lenr_, real_4
25620 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
25621 { // ** body not listed **
25648 }
25649
25650 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMF ** RFFTMF PAGE 00905
25651
25652 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25653 // S S U U B B R R O O U U T I NN N E
25654 // S U U B B R R O O U U T I N N N E
25655 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25656 // S U U B B R R O O U U T I N N N E
25657 // S S U U B B R R O O U U T I N NN E
25658 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25659
25660 // RRRRRR FFFFFFF FFFFFFF TTTTTTT M M FFFFFFF
25661 // R R F F T MM MM F
25662 // R R F F T M M M M F
25663 // RRRRRR FFFFF FFFFF T M M M FFFFF
25664 // R R F F T M M F
25665 // R R F F T M M F
25666 // R R F F T M M F
25667
25668
25669 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMF ** DIAGNOSTICS PAGE 00906
25670
25671
25672 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMF ** GENERATED CODE PAGE 00907
25673
25674 int_4 _rfftmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ r_, int_4 _p_ lenr_, real_4
25675 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
25676 { // ** body not listed **
25703 }
25704
25705 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMI ** RFFTMI PAGE 00908
25706
25707 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25708 // S S U U B B R R O O U U T I NN N E
25709 // S U U B B R R O O U U T I N N N E
25710 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25711 // S U U B B R R O O U U T I N N N E
25712 // S S U U B B R R O O U U T I N NN E
25713 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25714
25715 // RRRRRR FFFFFFF FFFFFFF TTTTTTT M M III
25716 // R R F F T MM MM I
25717 // R R F F T M M M M I
25718 // RRRRRR FFFFF FFFFF T M M M I
25719 // R R F F T M M I
25720 // R R F F T M M I
25721 // R R F F T M M III
25722
25723
25724 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMI ** DIAGNOSTICS PAGE 00909
25725
25726
25727 // VIF THU 20 NOV 2025 22:19:29 ** RFFTMI ** GENERATED CODE PAGE 00910
25728
25729 int_4 _rfftmi (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
25730 { // ** body not listed **
25745 }
25746
25747 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1B ** SINQ1B PAGE 00911
25748
25749 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25750 // S S U U B B R R O O U U T I NN N E
25751 // S U U B B R R O O U U T I N N N E
25752 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25753 // S U U B B R R O O U U T I N N N E
25754 // S S U U B B R R O O U U T I N NN E
25755 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25756
25757 // SSSSS III N N QQQQQ 1 BBBBBB
25758 // S S I NN N Q Q 11 B B
25759 // S I N N N Q Q 1 1 B B
25760 // SSSSS I N N N Q Q 1 BBBBBB
25761 // S I N N N Q Q Q 1 B B
25762 // S S I N NN Q Q 1 B B
25763 // SSSSS III N N QQQQ Q 11111 BBBBBB
25764
25765
25766 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1B ** DIAGNOSTICS PAGE 00912
25767
25768
25769 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1B ** GENERATED CODE PAGE 00913
25770
25771 int_4 _sinq1b (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
25772 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
25773 { // ** body not listed **
25816 }
25817
25818 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1F ** SINQ1F PAGE 00914
25819
25820 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25821 // S S U U B B R R O O U U T I NN N E
25822 // S U U B B R R O O U U T I N N N E
25823 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25824 // S U U B B R R O O U U T I N N N E
25825 // S S U U B B R R O O U U T I N NN E
25826 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25827
25828 // SSSSS III N N QQQQQ 1 FFFFFFF
25829 // S S I NN N Q Q 11 F
25830 // S I N N N Q Q 1 1 F
25831 // SSSSS I N N N Q Q 1 FFFFF
25832 // S I N N N Q Q Q 1 F
25833 // S S I N NN Q Q 1 F
25834 // SSSSS III N N QQQQ Q 11111 F
25835
25836
25837 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1F ** DIAGNOSTICS PAGE 00915
25838
25839
25840 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1F ** GENERATED CODE PAGE 00916
25841
25842 int_4 _sinq1f (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
25843 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
25844 { // ** body not listed **
25888 }
25889
25890 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1I ** SINQ1I PAGE 00917
25891
25892 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25893 // S S U U B B R R O O U U T I NN N E
25894 // S U U B B R R O O U U T I N N N E
25895 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25896 // S U U B B R R O O U U T I N N N E
25897 // S S U U B B R R O O U U T I N NN E
25898 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25899
25900 // SSSSS III N N QQQQQ 1 III
25901 // S S I NN N Q Q 11 I
25902 // S I N N N Q Q 1 1 I
25903 // SSSSS I N N N Q Q 1 I
25904 // S I N N N Q Q Q 1 I
25905 // S S I N NN Q Q 1 I
25906 // SSSSS III N N QQQQ Q 11111 III
25907
25908
25909 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1I ** DIAGNOSTICS PAGE 00918
25910
25911
25912 // VIF THU 20 NOV 2025 22:19:29 ** SINQ1I ** GENERATED CODE PAGE 00919
25913
25914 int_4 _sinq1i (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
25915 { // ** body not listed **
25933 }
25934
25935 // VIF THU 20 NOV 2025 22:19:29 ** SINQMB ** SINQMB PAGE 00920
25936
25937 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
25938 // S S U U B B R R O O U U T I NN N E
25939 // S U U B B R R O O U U T I N N N E
25940 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
25941 // S U U B B R R O O U U T I N N N E
25942 // S S U U B B R R O O U U T I N NN E
25943 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
25944
25945 // SSSSS III N N QQQQQ M M BBBBBB
25946 // S S I NN N Q Q MM MM B B
25947 // S I N N N Q Q M M M M B B
25948 // SSSSS I N N N Q Q M M M BBBBBB
25949 // S I N N N Q Q Q M M B B
25950 // S S I N NN Q Q M M B B
25951 // SSSSS III N N QQQQ Q M M BBBBBB
25952
25953
25954 // VIF THU 20 NOV 2025 22:19:29 ** SINQMB ** DIAGNOSTICS PAGE 00921
25955
25956
25957 // VIF THU 20 NOV 2025 22:19:29 ** SINQMB ** GENERATED CODE PAGE 00922
25958
25959 int_4 _sinqmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
25960 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
25961 { // ** body not listed **
26018 }
26019
26020 // VIF THU 20 NOV 2025 22:19:29 ** SINQMF ** SINQMF PAGE 00924
26021
26022 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26023 // S S U U B B R R O O U U T I NN N E
26024 // S U U B B R R O O U U T I N N N E
26025 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26026 // S U U B B R R O O U U T I N N N E
26027 // S S U U B B R R O O U U T I N NN E
26028 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26029
26030 // SSSSS III N N QQQQQ M M FFFFFFF
26031 // S S I NN N Q Q MM MM F
26032 // S I N N N Q Q M M M M F
26033 // SSSSS I N N N Q Q M M M FFFFF
26034 // S I N N N Q Q Q M M F
26035 // S S I N NN Q Q M M F
26036 // SSSSS III N N QQQQ Q M M F
26037
26038
26039 // VIF THU 20 NOV 2025 22:19:29 ** SINQMF ** DIAGNOSTICS PAGE 00925
26040
26041
26042 // VIF THU 20 NOV 2025 22:19:29 ** SINQMF ** GENERATED CODE PAGE 00926
26043
26044 int_4 _sinqmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
26045 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
26046 { // ** body not listed **
26102 }
26103
26104 // VIF THU 20 NOV 2025 22:19:29 ** SINQMI ** SINQMI PAGE 00928
26105
26106 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26107 // S S U U B B R R O O U U T I NN N E
26108 // S U U B B R R O O U U T I N N N E
26109 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26110 // S U U B B R R O O U U T I N N N E
26111 // S S U U B B R R O O U U T I N NN E
26112 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26113
26114 // SSSSS III N N QQQQQ M M III
26115 // S S I NN N Q Q MM MM I
26116 // S I N N N Q Q M M M M I
26117 // SSSSS I N N N Q Q M M M I
26118 // S I N N N Q Q Q M M I
26119 // S S I N NN Q Q M M I
26120 // SSSSS III N N QQQQ Q M M III
26121
26122
26123 // VIF THU 20 NOV 2025 22:19:29 ** SINQMI ** DIAGNOSTICS PAGE 00929
26124
26125
26126 // VIF THU 20 NOV 2025 22:19:29 ** SINQMI ** GENERATED CODE PAGE 00930
26127
26128 int_4 _sinqmi (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
26129 { // ** body not listed **
26147 }
26148
26149 // VIF THU 20 NOV 2025 22:19:29 ** SINT1B ** SINT1B PAGE 00931
26150
26151 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26152 // S S U U B B R R O O U U T I NN N E
26153 // S U U B B R R O O U U T I N N N E
26154 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26155 // S U U B B R R O O U U T I N N N E
26156 // S S U U B B R R O O U U T I N NN E
26157 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26158
26159 // SSSSS III N N TTTTTTT 1 BBBBBB
26160 // S S I NN N T 11 B B
26161 // S I N N N T 1 1 B B
26162 // SSSSS I N N N T 1 BBBBBB
26163 // S I N N N T 1 B B
26164 // S S I N NN T 1 B B
26165 // SSSSS III N N T 11111 BBBBBB
26166
26167
26168 // VIF THU 20 NOV 2025 22:19:29 ** SINT1B ** DIAGNOSTICS PAGE 00932
26169
26170
26171 // VIF THU 20 NOV 2025 22:19:29 ** SINT1B ** GENERATED CODE PAGE 00933
26172
26173 int_4 _sint1b (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
26174 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
26175 { // ** body not listed **
26203 }
26204
26205 // VIF THU 20 NOV 2025 22:19:29 ** SINT1F ** SINT1F PAGE 00934
26206
26207 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26208 // S S U U B B R R O O U U T I NN N E
26209 // S U U B B R R O O U U T I N N N E
26210 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26211 // S U U B B R R O O U U T I N N N E
26212 // S S U U B B R R O O U U T I N NN E
26213 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26214
26215 // SSSSS III N N TTTTTTT 1 FFFFFFF
26216 // S S I NN N T 11 F
26217 // S I N N N T 1 1 F
26218 // SSSSS I N N N T 1 FFFFF
26219 // S I N N N T 1 F
26220 // S S I N NN T 1 F
26221 // SSSSS III N N T 11111 F
26222
26223
26224 // VIF THU 20 NOV 2025 22:19:29 ** SINT1F ** DIAGNOSTICS PAGE 00935
26225
26226
26227 // VIF THU 20 NOV 2025 22:19:29 ** SINT1F ** GENERATED CODE PAGE 00936
26228
26229 int_4 _sint1f (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4 _p_ wsave_, int_4 _p_ lensav_,
26230 real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
26231 { // ** body not listed **
26259 }
26260
26261 // VIF THU 20 NOV 2025 22:19:29 ** SINT1I ** SINT1I PAGE 00937
26262
26263 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26264 // S S U U B B R R O O U U T I NN N E
26265 // S U U B B R R O O U U T I N N N E
26266 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26267 // S U U B B R R O O U U T I N N N E
26268 // S S U U B B R R O O U U T I N NN E
26269 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26270
26271 // SSSSS III N N TTTTTTT 1 III
26272 // S S I NN N T 11 I
26273 // S I N N N T 1 1 I
26274 // SSSSS I N N N T 1 I
26275 // S I N N N T 1 I
26276 // S S I N NN T 1 I
26277 // SSSSS III N N T 11111 III
26278
26279
26280 // VIF THU 20 NOV 2025 22:19:29 ** SINT1I ** DIAGNOSTICS PAGE 00938
26281
26282
26283 // VIF THU 20 NOV 2025 22:19:29 ** SINT1I ** GENERATED CODE PAGE 00939
26284
26285 int_4 _sint1i (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
26286 { // ** body not listed **
26318 }
26319
26320 // VIF THU 20 NOV 2025 22:19:29 ** SINTB1 ** SINTB1 PAGE 00940
26321
26322 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26323 // S S U U B B R R O O U U T I NN N E
26324 // S U U B B R R O O U U T I N N N E
26325 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26326 // S U U B B R R O O U U T I N N N E
26327 // S S U U B B R R O O U U T I N NN E
26328 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26329
26330 // SSSSS III N N TTTTTTT BBBBBB 1
26331 // S S I NN N T B B 11
26332 // S I N N N T B B 1 1
26333 // SSSSS I N N N T BBBBBB 1
26334 // S I N N N T B B 1
26335 // S S I N NN T B B 1
26336 // SSSSS III N N T BBBBBB 11111
26337
26338
26339 // VIF THU 20 NOV 2025 22:19:29 ** SINTB1 ** DIAGNOSTICS PAGE 00941
26340
26341
26342 // VIF THU 20 NOV 2025 22:19:29 ** SINTB1 ** GENERATED CODE PAGE 00942
26343
26344 int_4 _sintb1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ xh_, real_4 _p_ work_, int_4
26345 _p_ ier_)
26346 { // ** body not listed **
26415 }
26416
26417 // VIF THU 20 NOV 2025 22:19:29 ** SINTF1 ** SINTF1 PAGE 00944
26418
26419 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26420 // S S U U B B R R O O U U T I NN N E
26421 // S U U B B R R O O U U T I N N N E
26422 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26423 // S U U B B R R O O U U T I N N N E
26424 // S S U U B B R R O O U U T I N NN E
26425 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26426
26427 // SSSSS III N N TTTTTTT FFFFFFF 1
26428 // S S I NN N T F 11
26429 // S I N N N T F 1 1
26430 // SSSSS I N N N T FFFFF 1
26431 // S I N N N T F 1
26432 // S S I N NN T F 1
26433 // SSSSS III N N T F 11111
26434
26435
26436 // VIF THU 20 NOV 2025 22:19:29 ** SINTF1 ** DIAGNOSTICS PAGE 00945
26437
26438
26439 // VIF THU 20 NOV 2025 22:19:29 ** SINTF1 ** GENERATED CODE PAGE 00946
26440
26441 int_4 _sintf1 (int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, real_4 _p_ wsave_, real_4 _p_ xh_, real_4 _p_ work_, int_4
26442 _p_ ier_)
26443 { // ** body not listed **
26512 }
26513
26514 // VIF THU 20 NOV 2025 22:19:29 ** SINTMB ** SINTMB PAGE 00948
26515
26516 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26517 // S S U U B B R R O O U U T I NN N E
26518 // S U U B B R R O O U U T I N N N E
26519 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26520 // S U U B B R R O O U U T I N N N E
26521 // S S U U B B R R O O U U T I N NN E
26522 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26523
26524 // SSSSS III N N TTTTTTT M M BBBBBB
26525 // S S I NN N T MM MM B B
26526 // S I N N N T M M M M B B
26527 // SSSSS I N N N T M M M BBBBBB
26528 // S I N N N T M M B B
26529 // S S I N NN T M M B B
26530 // SSSSS III N N T M M BBBBBB
26531
26532
26533 // VIF THU 20 NOV 2025 22:19:29 ** SINTMB ** DIAGNOSTICS PAGE 00949
26534
26535
26536 // VIF THU 20 NOV 2025 22:19:29 ** SINTMB ** GENERATED CODE PAGE 00950
26537
26538 int_4 _sintmb (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
26539 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
26540 { // ** body not listed **
26575 }
26576
26577 // VIF THU 20 NOV 2025 22:19:29 ** SINTMF ** SINTMF PAGE 00951
26578
26579 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26580 // S S U U B B R R O O U U T I NN N E
26581 // S U U B B R R O O U U T I N N N E
26582 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26583 // S U U B B R R O O U U T I N N N E
26584 // S S U U B B R R O O U U T I N NN E
26585 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26586
26587 // SSSSS III N N TTTTTTT M M FFFFFFF
26588 // S S I NN N T MM MM F
26589 // S I N N N T M M M M F
26590 // SSSSS I N N N T M M M FFFFF
26591 // S I N N N T M M F
26592 // S S I N NN T M M F
26593 // SSSSS III N N T M M F
26594
26595
26596 // VIF THU 20 NOV 2025 22:19:29 ** SINTMF ** DIAGNOSTICS PAGE 00952
26597
26598
26599 // VIF THU 20 NOV 2025 22:19:29 ** SINTMF ** GENERATED CODE PAGE 00953
26600
26601 int_4 _sintmf (int_4 _p_ lot_, int_4 _p_ jump_, int_4 _p_ n_, int_4 _p_ inc_, real_4 _p_ x_, int_4 _p_ lenx_, real_4
26602 _p_ wsave_, int_4 _p_ lensav_, real_4 _p_ work_, int_4 _p_ lenwrk_, int_4 _p_ ier_)
26603 { // ** body not listed **
26638 }
26639
26640 // VIF THU 20 NOV 2025 22:19:29 ** SINTMI ** SINTMI PAGE 00954
26641
26642 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26643 // S S U U B B R R O O U U T I NN N E
26644 // S U U B B R R O O U U T I N N N E
26645 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26646 // S U U B B R R O O U U T I N N N E
26647 // S S U U B B R R O O U U T I N NN E
26648 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26649
26650 // SSSSS III N N TTTTTTT M M III
26651 // S S I NN N T MM MM I
26652 // S I N N N T M M M M I
26653 // SSSSS I N N N T M M M I
26654 // S I N N N T M M I
26655 // S S I N NN T M M I
26656 // SSSSS III N N T M M III
26657
26658
26659 // VIF THU 20 NOV 2025 22:19:29 ** SINTMI ** DIAGNOSTICS PAGE 00955
26660
26661
26662 // VIF THU 20 NOV 2025 22:19:29 ** SINTMI ** GENERATED CODE PAGE 00956
26663
26664 int_4 _sintmi (int_4 _p_ n_, real_4 _p_ wsave_, int_4 _p_ lensav_, int_4 _p_ ier_)
26665 { // ** body not listed **
26697 }
26698
26699 // VIF THU 20 NOV 2025 22:19:29 ** TABLES ** TABLES PAGE 00957
26700
26701 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26702 // S S U U B B R R O O U U T I NN N E
26703 // S U U B B R R O O U U T I N N N E
26704 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26705 // S U U B B R R O O U U T I N N N E
26706 // S S U U B B R R O O U U T I N NN E
26707 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26708
26709 // TTTTTTT A BBBBBB L EEEEEEE SSSSS
26710 // T A A B B L E S S
26711 // T A A B B L E S
26712 // T A A BBBBBB L EEEEE SSSSS
26713 // T AAAAAAA B B L E S
26714 // T A A B B L E S S
26715 // T A A BBBBBB LLLLLLL EEEEEEE SSSSS
26716
26717
26718 // VIF THU 20 NOV 2025 22:19:29 ** TABLES ** DIAGNOSTICS PAGE 00958
26719
26720
26721 // VIF THU 20 NOV 2025 22:19:29 ** TABLES ** GENERATED CODE PAGE 00959
26722
26723 int_4 _tables (int_4 _p_ ido_, int_4 _p_ ip_, real_4 _p_ wa_)
26724 { // ** body not listed **
26747 }
26748
26749 // VIF THU 20 NOV 2025 22:19:29 ** W2R ** W2R PAGE 00960
26750
26751 // SSSSS U U BBBBBB RRRRRR OOOOO U U TTTTTTT III N N EEEEEEE
26752 // S S U U B B R R O O U U T I NN N E
26753 // S U U B B R R O O U U T I N N N E
26754 // SSSSS U U BBBBBB RRRRRR O O U U T I N N N EEEEE
26755 // S U U B B R R O O U U T I N N N E
26756 // S S U U B B R R O O U U T I N NN E
26757 // SSSSS UUUUU BBBBBB R R OOOOO UUUUU T III N N EEEEEEE
26758
26759 // W W 22222 RRRRRR
26760 // W W 2 2 R R
26761 // W W 2 R R
26762 // W W W 22222 RRRRRR
26763 // W W W 2 R R
26764 // W W W 2 R R
26765 // WW WW 2222222 R R
26766
26767
26768 // VIF THU 20 NOV 2025 22:19:29 ** W2R ** DIAGNOSTICS PAGE 00961
26769
26770
26771 // VIF THU 20 NOV 2025 22:19:29 ** W2R ** GENERATED CODE PAGE 00962
26772
26773 int_4 _w2r (int_4 _p_ ldr_, int_4 _p_ ldw_, int_4 _p_ l_, int_4 _p_ m_, real_4 _p_ r_, real_4 _p_ w_)
26774 { // ** body not listed **
26783 }
|
© 2002-2025 J.M. van der Veer (jmvdveer@xs4all.nl)
|