a68g-prelude-gsl.h
1 //! @file a68g-prelude-gsl.h
2 //! @author J. Marcel van der Veer
3
4 //! @section Copyright
5 //!
6 //! This file is part of Algol68G - an Algol 68 compiler-interpreter.
7 //! Copyright 2001-2024 J. Marcel van der Veer [algol68g@xs4all.nl].
8
9 //! @section License
10 //!
11 //! This program is free software; you can redistribute it and/or modify it
12 //! under the terms of the GNU General Public License as published by the
13 //! Free Software Foundation; either version 3 of the License, or
14 //! (at your option) any later version.
15 //!
16 //! This program is distributed in the hope that it will be useful, but
17 //! WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
18 //! or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
19 //! more details. You should have received a copy of the GNU General Public
20 //! License along with this program. If not, see [http://www.gnu.org/licenses/].
21
22 //! @section Synopsis
23 //!
24 //! GSL definitions.
25
26 #if !defined (__A68G_PRELUDE_GSL_H__)
27 #define __A68G_PRELUDE_GSL_H__
28
29 #if defined (HAVE_GSL)
30
31 void stand_gsl (void);
32
33 GPROC genie_airy_ai_deriv_real;
34 GPROC genie_airy_ai_deriv_scaled_real;
35 GPROC genie_airy_ai_real;
36 GPROC genie_airy_ai_scaled_real;
37 GPROC genie_airy_bi_deriv_real;
38 GPROC genie_airy_bi_deriv_scaled_real;
39 GPROC genie_airy_bi_real;
40 GPROC genie_airy_bi_scaled_real;
41 GPROC genie_airy_zero_ai_deriv_real;
42 GPROC genie_airy_zero_ai_real;
43 GPROC genie_airy_zero_bi_deriv_real;
44 GPROC genie_airy_zero_bi_real;
45 GPROC genie_angle_restrict_pos_real;
46 GPROC genie_angle_restrict_symm_real;
47 GPROC genie_atanint_real;
48 GPROC genie_bessel_il0_scaled_real;
49 GPROC genie_bessel_il1_scaled_real;
50 GPROC genie_bessel_il2_scaled_real;
51 GPROC genie_bessel_il_scaled_real;
52 GPROC genie_bessel_in0_real;
53 GPROC genie_bessel_in0_scaled_real;
54 GPROC genie_bessel_in1_real;
55 GPROC genie_bessel_in1_scaled_real;
56 GPROC genie_bessel_in_real;
57 GPROC genie_bessel_in_scaled_real;
58 GPROC genie_bessel_inu_real;
59 GPROC genie_bessel_inu_scaled_real;
60 GPROC genie_bessel_jl0_real;
61 GPROC genie_bessel_jl1_real;
62 GPROC genie_bessel_jl2_real;
63 GPROC genie_bessel_jl_real;
64 GPROC genie_bessel_jn0_real;
65 GPROC genie_bessel_jn1_real;
66 GPROC genie_bessel_jn_real;
67 GPROC genie_bessel_jnu_real;
68 GPROC genie_bessel_kl0_scaled_real;
69 GPROC genie_bessel_kl1_scaled_real;
70 GPROC genie_bessel_kl2_scaled_real;
71 GPROC genie_bessel_kl_scaled_real;
72 GPROC genie_bessel_kn0_real;
73 GPROC genie_bessel_kn0_scaled_real;
74 GPROC genie_bessel_kn1_real;
75 GPROC genie_bessel_kn1_scaled_real;
76 GPROC genie_bessel_kn_real;
77 GPROC genie_bessel_kn_scaled_real;
78 GPROC genie_bessel_knu_real;
79 GPROC genie_bessel_knu_scaled_real;
80 GPROC genie_bessel_knu_scaled_real;
81 GPROC genie_bessel_ln_knu_real;
82 GPROC genie_bessel_yl0_real;
83 GPROC genie_bessel_yl1_real;
84 GPROC genie_bessel_yl2_real;
85 GPROC genie_bessel_yl_real;
86 GPROC genie_bessel_yn0_real;
87 GPROC genie_bessel_yn1_real;
88 GPROC genie_bessel_yn_real;
89 GPROC genie_bessel_ynu_real;
90 GPROC genie_bessel_zero_jnu0_real;
91 GPROC genie_bessel_zero_jnu1_real;
92 GPROC genie_bessel_zero_jnu_real;
93 GPROC genie_beta_inc_gsl_real;
94 GPROC genie_beta_inc_real;
95 GPROC genie_chi_real;
96 GPROC genie_ci_real;
97 GPROC genie_clausen_real;
98 GPROC genie_conicalp_0_real;
99 GPROC genie_conicalp_1_real;
100 GPROC genie_conicalp_cyl_reg_real;
101 GPROC genie_conicalp_half_real;
102 GPROC genie_conicalp_mhalf_real;
103 GPROC genie_conicalp_sph_reg_real;
104 GPROC genie_dawson_real;
105 GPROC genie_debye_1_real;
106 GPROC genie_debye_2_real;
107 GPROC genie_debye_3_real;
108 GPROC genie_debye_4_real;
109 GPROC genie_debye_5_real;
110 GPROC genie_debye_6_real;
111 GPROC genie_dilog_real;
112 GPROC genie_doublefact_real;
113 GPROC genie_ellint_d_real;
114 GPROC genie_ellint_d_real;
115 GPROC genie_ellint_e_comp_real;
116 GPROC genie_ellint_e_real;
117 GPROC genie_ellint_f_real;
118 GPROC genie_ellint_k_comp_real;
119 GPROC genie_ellint_p_comp_real;
120 GPROC genie_ellint_p_real;
121 GPROC genie_ellint_rc_real;
122 GPROC genie_ellint_rd_real;
123 GPROC genie_ellint_rf_real;
124 GPROC genie_ellint_rj_real;
125 GPROC genie_etaint_real;
126 GPROC genie_eta_real;
127 GPROC genie_expint_3_real;
128 GPROC genie_expint_e1_real;
129 GPROC genie_expint_e2_real;
130 GPROC genie_expint_ei_real;
131 GPROC genie_expint_en_real;
132 GPROC genie_expm1_real;
133 GPROC genie_exprel_2_real;
134 GPROC genie_exprel_n_real;
135 GPROC genie_exprel_real;
136 GPROC genie_fact_real;
137 GPROC genie_fermi_dirac_0_real;
138 GPROC genie_fermi_dirac_1_real;
139 GPROC genie_fermi_dirac_2_real;
140 GPROC genie_fermi_dirac_3half_real;
141 GPROC genie_fermi_dirac_half_real;
142 GPROC genie_fermi_dirac_inc_0_real;
143 GPROC genie_fermi_dirac_int_real;
144 GPROC genie_fermi_dirac_m1_real;
145 GPROC genie_fermi_dirac_mhalf_real;
146 GPROC genie_gamma_inc_real;
147 GPROC genie_gamma_inc_p_real;
148 GPROC genie_gamma_inc_q_real;
149 GPROC genie_gammainv_real;
150 GPROC genie_gammastar_real;
151 GPROC genie_gegenpoly_1_real;
152 GPROC genie_gegenpoly_2_real;
153 GPROC genie_gegenpoly_3_real;
154 GPROC genie_gegenpoly_n_real;
155 GPROC genie_hermite_func_real;
156 GPROC genie_hypot_real;
157 GPROC genie_hzeta_real;
158 GPROC genie_laguerre_1_real;
159 GPROC genie_laguerre_2_real;
160 GPROC genie_laguerre_3_real;
161 GPROC genie_laguerre_n_real;
162 GPROC genie_lambert_w0_real;
163 GPROC genie_lambert_wm1_real;
164 GPROC genie_legendre_h3d_0_real;
165 GPROC genie_legendre_h3d_1_real;
166 GPROC genie_legendre_H3d_real;
167 GPROC genie_legendre_p1_real;
168 GPROC genie_legendre_p2_real;
169 GPROC genie_legendre_p3_real;
170 GPROC genie_legendre_pl_real;
171 GPROC genie_legendre_q0_real;
172 GPROC genie_legendre_q1_real;
173 GPROC genie_legendre_ql_real;
174 GPROC genie_lncosh_real;
175 GPROC genie_lndoublefact_real;
176 GPROC genie_lnfact_real;
177 GPROC genie_lnpoch_real;
178 GPROC genie_lnsinh_real;
179 GPROC genie_log_1plusx_mx_real;
180 GPROC genie_log_1plusx_real;
181 GPROC genie_log_abs_real;
182 GPROC genie_poch_real;
183 GPROC genie_pochrel_real;
184 GPROC genie_print_matrix;
185 GPROC genie_print_vector;
186 GPROC genie_psi_1_int_real;
187 GPROC genie_psi_1piy_real;
188 GPROC genie_psi_1_real;
189 GPROC genie_psi_int_real;
190 GPROC genie_psi_n_real;
191 GPROC genie_psi_real;
192 GPROC genie_shi_real;
193 GPROC genie_sinc_real;
194 GPROC genie_si_real;
195 GPROC genie_synchrotron_1_real;
196 GPROC genie_synchrotron_2_real;
197 GPROC genie_taylorcoeff_real;
198 GPROC genie_transport_2_real;
199 GPROC genie_transport_3_real;
200 GPROC genie_transport_4_real;
201 GPROC genie_transport_5_real;
202 GPROC genie_zeta_int_real;
203 GPROC genie_zetam1_int_real;
204 GPROC genie_zetam1_real;
205 GPROC genie_zeta_real;
206 GPROC genie_poch_real;
207 GPROC genie_prime_factors;
208 GPROC genie_beta_inc_real;
209 GPROC genie_digamma_real;
210 GPROC genie_gamma_inc_real;
211 GPROC genie_laplace;
212
213 GPROC genie_fft_backward;
214 GPROC genie_fft_complex_backward;
215 GPROC genie_fft_complex_forward;
216 GPROC genie_fft_complex_inverse;
217 GPROC genie_fft_forward;
218 GPROC genie_fft_inverse;
219
220 GPROC genie_complex_scale_matrix_complex;
221 GPROC genie_complex_scale_vector_complex;
222 GPROC genie_left_columns;
223 GPROC genie_matrix_add;
224 GPROC genie_matrix_ch;
225 GPROC genie_matrix_ch_solve;
226 GPROC genie_matrix_column_mean;
227 GPROC genie_matrix_complex_add;
228 GPROC genie_matrix_complex_det;
229 GPROC genie_matrix_complex_div_complex;
230 GPROC genie_matrix_complex_div_complex_ab;
231 GPROC genie_matrix_complex_echo;
232 GPROC genie_matrix_complex_eq;
233 GPROC genie_matrix_complex_inv;
234 GPROC genie_matrix_complex_lu;
235 GPROC genie_matrix_complex_lu_det;
236 GPROC genie_matrix_complex_lu_inv;
237 GPROC genie_matrix_complex_lu_solve;
238 GPROC genie_matrix_complex_minus;
239 GPROC genie_matrix_complex_minusab;
240 GPROC genie_matrix_complex_ne;
241 GPROC genie_matrix_complex_plusab;
242 GPROC genie_matrix_complex_scale_complex;
243 GPROC genie_matrix_complex_scale_complex_ab;
244 GPROC genie_matrix_complex_sub;
245 GPROC genie_matrix_complex_times_matrix;
246 GPROC genie_matrix_complex_times_vector;
247 GPROC genie_matrix_complex_trace;
248 GPROC genie_matrix_complex_transpose;
249 GPROC genie_matrix_det;
250 GPROC genie_matrix_div_real;
251 GPROC genie_matrix_div_real_ab;
252 GPROC genie_matrix_echo;
253 GPROC genie_matrix_eq;
254 GPROC genie_matrix_hcat;
255 GPROC genie_matrix_inv;
256 GPROC genie_matrix_lu;
257 GPROC genie_matrix_lu_det;
258 GPROC genie_matrix_lu_inv;
259 GPROC genie_matrix_lu_solve;
260 GPROC genie_matrix_minus;
261 GPROC genie_matrix_minusab;
262 GPROC genie_matrix_ne;
263 GPROC genie_matrix_norm;
264 GPROC genie_matrix_ols;
265 GPROC genie_matrix_pca_cv;
266 GPROC genie_matrix_pca_svd;
267 GPROC genie_matrix_pca_svd_full;
268 GPROC genie_matrix_pcr;
269 GPROC genie_matrix_pinv;
270 GPROC genie_matrix_pinv_lim;
271 GPROC genie_matrix_pls1;
272 GPROC genie_matrix_pls2;
273 GPROC genie_matrix_plusab;
274 GPROC genie_matrix_qr;
275 GPROC genie_matrix_qr_ls_solve;
276 GPROC genie_matrix_qr_solve;
277 GPROC genie_matrix_scale_real;
278 GPROC genie_matrix_scale_real_ab;
279 GPROC genie_matrix_sub;
280 GPROC genie_matrix_svd;
281 GPROC genie_matrix_svd_solve;
282 GPROC genie_matrix_times_matrix;
283 GPROC genie_matrix_times_vector;
284 GPROC genie_matrix_tls;
285 GPROC genie_matrix_trace;
286 GPROC genie_matrix_transpose;
287 GPROC genie_matrix_vcat;
288 GPROC genie_real_scale_matrix;
289 GPROC genie_real_scale_vector;
290 GPROC genie_vector_add;
291 GPROC genie_vector_col;
292 GPROC genie_vector_complex_add;
293 GPROC genie_vector_complex_div_complex;
294 GPROC genie_vector_complex_div_complex_ab;
295 GPROC genie_vector_complex_dot;
296 GPROC genie_vector_complex_dyad;
297 GPROC genie_vector_complex_echo;
298 GPROC genie_vector_complex_eq;
299 GPROC genie_vector_complex_minus;
300 GPROC genie_vector_complex_minusab;
301 GPROC genie_vector_complex_ne;
302 GPROC genie_vector_complex_norm;
303 GPROC genie_vector_complex_plusab;
304 GPROC genie_vector_complex_scale_complex;
305 GPROC genie_vector_complex_scale_complex_ab;
306 GPROC genie_vector_complex_sub;
307 GPROC genie_vector_complex_times_matrix;
308 GPROC genie_vector_div_real;
309 GPROC genie_vector_div_real_ab;
310 GPROC genie_vector_dot;
311 GPROC genie_vector_dyad;
312 GPROC genie_vector_echo;
313 GPROC genie_vector_eq;
314 GPROC genie_vector_minus;
315 GPROC genie_vector_minusab;
316 GPROC genie_vector_ne;
317 GPROC genie_vector_norm;
318 GPROC genie_vector_plusab;
319 GPROC genie_vector_row;
320 GPROC genie_vector_scale_real;
321 GPROC genie_vector_scale_real_ab;
322 GPROC genie_vector_sub;
323 GPROC genie_vector_times_matrix;
324
325 // Constants ex GSL
326
327 GPROC genie_cgs_acre;
328 GPROC genie_cgs_angstrom;
329 GPROC genie_cgs_astronomical_unit;
330 GPROC genie_cgs_bar;
331 GPROC genie_cgs_barn;
332 GPROC genie_cgs_bohr_magneton;
333 GPROC genie_cgs_bohr_radius;
334 GPROC genie_cgs_boltzmann;
335 GPROC genie_cgs_btu;
336 GPROC genie_cgs_calorie;
337 GPROC genie_cgs_canadian_gallon;
338 GPROC genie_cgs_carat;
339 GPROC genie_cgs_cup;
340 GPROC genie_cgs_curie;
341 GPROC genie_cgs_day;
342 GPROC genie_cgs_dyne;
343 GPROC genie_cgs_electron_charge;
344 GPROC genie_cgs_electron_magnetic_moment;
345 GPROC genie_cgs_electron_volt;
346 GPROC genie_cgs_erg;
347 GPROC genie_cgs_faraday;
348 GPROC genie_cgs_fathom;
349 GPROC genie_cgs_fluid_ounce;
350 GPROC genie_cgs_foot;
351 GPROC genie_cgs_footcandle;
352 GPROC genie_cgs_footlambert;
353 GPROC genie_cgs_gauss;
354 GPROC genie_cgs_gram_force;
355 GPROC genie_cgs_grav_accel;
356 GPROC genie_cgs_gravitational_constant;
357 GPROC genie_cgs_hectare;
358 GPROC genie_cgs_horsepower;
359 GPROC genie_cgs_hour;
360 GPROC genie_cgs_inch;
361 GPROC genie_cgs_inch_of_mercury;
362 GPROC genie_cgs_inch_of_water;
363 GPROC genie_cgs_joule;
364 GPROC genie_cgs_kilometers_per_hour;
365 GPROC genie_cgs_kilopound_force;
366 GPROC genie_cgs_knot;
367 GPROC genie_cgs_lambert;
368 GPROC genie_cgs_light_year;
369 GPROC genie_cgs_liter;
370 GPROC genie_cgs_lumen;
371 GPROC genie_cgs_lux;
372 GPROC genie_cgs_mass_electron;
373 GPROC genie_cgs_mass_muon;
374 GPROC genie_cgs_mass_neutron;
375 GPROC genie_cgs_mass_proton;
376 GPROC genie_cgs_meter_of_mercury;
377 GPROC genie_cgs_metric_ton;
378 GPROC genie_cgs_micron;
379 GPROC genie_cgs_mil;
380 GPROC genie_cgs_mile;
381 GPROC genie_cgs_miles_per_hour;
382 GPROC genie_cgs_minute;
383 GPROC genie_cgs_molar_gas;
384 GPROC genie_cgs_nautical_mile;
385 GPROC genie_cgs_newton;
386 GPROC genie_cgs_nuclear_magneton;
387 GPROC genie_cgs_ounce_mass;
388 GPROC genie_cgs_parsec;
389 GPROC genie_cgs_phot;
390 GPROC genie_cgs_pint;
391 GPROC genie_cgs_planck_constant_h;
392 GPROC genie_cgs_planck_constant_hbar;
393 GPROC genie_cgs_point;
394 GPROC genie_cgs_poise;
395 GPROC genie_cgs_pound_force;
396 GPROC genie_cgs_pound_mass;
397 GPROC genie_cgs_poundal;
398 GPROC genie_cgs_proton_magnetic_moment;
399 GPROC genie_cgs_psi;
400 GPROC genie_cgs_quart;
401 GPROC genie_cgs_rad;
402 GPROC genie_cgs_roentgen;
403 GPROC genie_cgs_rydberg;
404 GPROC genie_cgs_solar_mass;
405 GPROC genie_cgs_speed_of_light;
406 GPROC genie_cgs_standard_gas_volume;
407 GPROC genie_cgs_std_atmosphere;
408 GPROC genie_cgs_stilb;
409 GPROC genie_cgs_stokes;
410 GPROC genie_cgs_tablespoon;
411 GPROC genie_cgs_teaspoon;
412 GPROC genie_cgs_texpoint;
413 GPROC genie_cgs_therm;
414 GPROC genie_cgs_ton;
415 GPROC genie_cgs_torr;
416 GPROC genie_cgs_troy_ounce;
417 GPROC genie_cgs_uk_gallon;
418 GPROC genie_cgs_uk_ton;
419 GPROC genie_cgs_unified_atomic_mass;
420 GPROC genie_cgs_us_gallon;
421 GPROC genie_cgs_week;
422 GPROC genie_cgs_yard;
423 GPROC genie_mks_acre;
424 GPROC genie_mks_angstrom;
425 GPROC genie_mks_astronomical_unit;
426 GPROC genie_mks_bar;
427 GPROC genie_mks_barn;
428 GPROC genie_mks_bohr_magneton;
429 GPROC genie_mks_bohr_radius;
430 GPROC genie_mks_boltzmann;
431 GPROC genie_mks_btu;
432 GPROC genie_mks_calorie;
433 GPROC genie_mks_canadian_gallon;
434 GPROC genie_mks_carat;
435 GPROC genie_mks_cup;
436 GPROC genie_mks_curie;
437 GPROC genie_mks_day;
438 GPROC genie_mks_dyne;
439 GPROC genie_mks_electron_charge;
440 GPROC genie_mks_electron_magnetic_moment;
441 GPROC genie_mks_electron_volt;
442 GPROC genie_mks_erg;
443 GPROC genie_mks_faraday;
444 GPROC genie_mks_fathom;
445 GPROC genie_mks_fluid_ounce;
446 GPROC genie_mks_foot;
447 GPROC genie_mks_footcandle;
448 GPROC genie_mks_footlambert;
449 GPROC genie_mks_gauss;
450 GPROC genie_mks_gram_force;
451 GPROC genie_mks_grav_accel;
452 GPROC genie_mks_gravitational_constant;
453 GPROC genie_mks_hectare;
454 GPROC genie_mks_horsepower;
455 GPROC genie_mks_hour;
456 GPROC genie_mks_inch;
457 GPROC genie_mks_inch_of_mercury;
458 GPROC genie_mks_inch_of_water;
459 GPROC genie_mks_joule;
460 GPROC genie_mks_kilometers_per_hour;
461 GPROC genie_mks_kilopound_force;
462 GPROC genie_mks_knot;
463 GPROC genie_mks_lambert;
464 GPROC genie_mks_light_year;
465 GPROC genie_mks_liter;
466 GPROC genie_mks_lumen;
467 GPROC genie_mks_lux;
468 GPROC genie_mks_mass_electron;
469 GPROC genie_mks_mass_muon;
470 GPROC genie_mks_mass_neutron;
471 GPROC genie_mks_mass_proton;
472 GPROC genie_mks_meter_of_mercury;
473 GPROC genie_mks_metric_ton;
474 GPROC genie_mks_micron;
475 GPROC genie_mks_mil;
476 GPROC genie_mks_mile;
477 GPROC genie_mks_miles_per_hour;
478 GPROC genie_mks_minute;
479 GPROC genie_mks_molar_gas;
480 GPROC genie_mks_nautical_mile;
481 GPROC genie_mks_newton;
482 GPROC genie_mks_nuclear_magneton;
483 GPROC genie_mks_ounce_mass;
484 GPROC genie_mks_parsec;
485 GPROC genie_mks_phot;
486 GPROC genie_mks_pint;
487 GPROC genie_mks_planck_constant_h;
488 GPROC genie_mks_planck_constant_hbar;
489 GPROC genie_mks_point;
490 GPROC genie_mks_poise;
491 GPROC genie_mks_pound_force;
492 GPROC genie_mks_pound_mass;
493 GPROC genie_mks_poundal;
494 GPROC genie_mks_proton_magnetic_moment;
495 GPROC genie_mks_psi;
496 GPROC genie_mks_quart;
497 GPROC genie_mks_rad;
498 GPROC genie_mks_roentgen;
499 GPROC genie_mks_rydberg;
500 GPROC genie_mks_solar_mass;
501 GPROC genie_mks_speed_of_light;
502 GPROC genie_mks_standard_gas_volume;
503 GPROC genie_mks_std_atmosphere;
504 GPROC genie_mks_stilb;
505 GPROC genie_mks_stokes;
506 GPROC genie_mks_tablespoon;
507 GPROC genie_mks_teaspoon;
508 GPROC genie_mks_texpoint;
509 GPROC genie_mks_therm;
510 GPROC genie_mks_ton;
511 GPROC genie_mks_torr;
512 GPROC genie_mks_troy_ounce;
513 GPROC genie_mks_uk_gallon;
514 GPROC genie_mks_uk_ton;
515 GPROC genie_mks_unified_atomic_mass;
516 GPROC genie_mks_us_gallon;
517 GPROC genie_mks_vacuum_permeability;
518 GPROC genie_mks_vacuum_permittivity;
519 GPROC genie_mks_week;
520 GPROC genie_mks_yard;
521 GPROC genie_num_atto;
522 GPROC genie_num_avogadro;
523 GPROC genie_num_exa;
524 GPROC genie_num_femto;
525 GPROC genie_num_fine_structure;
526 GPROC genie_num_giga;
527 GPROC genie_num_kilo;
528 GPROC genie_num_mega;
529 GPROC genie_num_micro;
530 GPROC genie_num_milli;
531 GPROC genie_num_nano;
532 GPROC genie_num_peta;
533 GPROC genie_num_pico;
534 GPROC genie_num_tera;
535 GPROC genie_num_yocto;
536 GPROC genie_num_yotta;
537 GPROC genie_num_zepto;
538 GPROC genie_num_zetta;
539 #endif
540
541 #endif
