Apply nan/inf handling patch from Sisyphus
[Math-GSL.git] / Sys.i
blob152093950196aeb48de9736b94f52c4ab9277d9b
1 %module "Math::GSL::Sys"
3 %include "typemaps.i"
4 %apply int *OUTPUT { int * e };
6 %{
7 #include "gsl/gsl_sys.h"
8 %}
9 %include "gsl/gsl_sys.h"
10 %perlcode %{
11 our @EXPORT = qw();
12 our @EXPORT_OK = qw/
13 gsl_log1p
14 gsl_expm1
15 gsl_hypot
16 gsl_hypot3
17 gsl_acosh
18 gsl_asinh
19 gsl_atanh
20 gsl_isnan
21 gsl_isinf
22 gsl_finite
23 gsl_posinf
24 gsl_neginf
25 gsl_fdiv
26 gsl_coerce_double
27 gsl_coerce_float
28 gsl_coerce_long_double
29 gsl_ldexp
30 gsl_frexp
31 gsl_fcmp
32 gsl_nan
33 gsl_isnan
34 gsl_inf
37 our %EXPORT_TAGS = ( all => \@EXPORT_OK );
39 __END__
41 =head1 NAME
43 Math::GSL::Sys -
45 =head1 SYNOPSIS
47 use Math::GSL::Sys qw /:all/;
49 =head1 DESCRIPTION
51 Here is a list of all the functions in this module :
53 =over
55 =item * C<gsl_log1p($x)> - This function computes the value of \log(1+$x) in a way that is accurate for small $x. It provides an alternative to the BSD math function log1p(x).
56 =item * C<gsl_expm1($x)> - This function computes the value of \exp($x)-1 in a way that is accurate for small $x. It provides an alternative to the BSD math function expm1(x).
58 =item * C<gsl_hypot($x, $y)> - This function computes the value of \sqrt{$x^2 + $y^2} in a way that avoids overflow. It provides an alternative to the BSD math function hypot($x,$y).
60 =item * C<gsl_hypot3($x, $y, $z)> - This function computes the value of \sqrt{$x^2 + $y^2 + $z^2} in a way that avoids overflow.
62 =item * C<gsl_acosh($x)> - This function computes the value of \arccosh($x). It provides an alternative to the standard math function acosh($x).
64 =item * C<gsl_asinh($x)> - This function computes the value of \arcsinh($x). It provides an alternative to the standard math function asinh($x).
66 =item * C<gsl_atanh($x)> - This function computes the value of \arctanh($x). It provides an alternative to the standard math function atanh($x).
68 =item * C<gsl_isnan($x)> - This function returns 1 if $x is not-a-number.
70 =item * C<gsl_isinf($x)> - This function returns +1 if $x is positive infinity, -1 if $x is negative infinity and 0 otherwise.
72 =item * C<gsl_finite($x)> - This function returns 1 if $x is a real number, and 0 if it is infinite or not-a-number.
74 =item * C<gsl_posinf >
76 =item * C<gsl_neginf >
78 =item * C<gsl_fdiv >
80 =item * C<gsl_coerce_double >
82 =item * C<gsl_coerce_float >
84 =item * C<gsl_coerce_long_double >
86 =item * C<gsl_ldexp($x, $e)> - This function computes the value of $x * 2**$e. It provides an alternative to the standard math function ldexp($x,$e).
88 =item * C<gsl_frexp($x)> - This function splits the number $x into its normalized fraction f and exponent e, such that $x = f * 2^e and 0.5 <= f < 1. The function returns f and then the exponent in e. If $x is zero, both f and e are set to zero. This function provides an alternative to the standard math function frexp(x, e).
90 =item * C<gsl_fcmp($x, $y, $epsilon)> - This function determines whether $x and $y are approximately equal to a relative accuracy $epsilon. The relative accuracy is measured using an interval of size 2 \delta, where \delta = 2^k \epsilon and k is the maximum base-2 exponent of $x and $y as computed by the function frexp. If $x and $y lie within this interval, they are considered approximately equal and the function returns 0. Otherwise if $x < $y, the function returns -1, or if $x > $y, the function returns +1. Note that $x and $y are compared to relative accuracy, so this function is not suitable for testing whether a value is approximately zero. The implementation is based on the package fcmp by T.C. Belding.
92 =back
94 For more informations on the functions, we refer you to the GSL offcial
95 documentation: L<http://www.gnu.org/software/gsl/manual/html_node/>
97 Tip : search on google: site:http://www.gnu.org/software/gsl/manual/html_node/ name_of_the_function_you_want
100 =head1 AUTHORS
102 Jonathan Leto <jonathan@leto.net> and Thierry Moisan <thierry.moisan@gmail.com>
104 =head1 COPYRIGHT AND LICENSE
106 Copyright (C) 2008 Jonathan Leto and Thierry Moisan
108 This program is free software; you can redistribute it and/or modify it
109 under the same terms as Perl itself.
111 =cut