Math::BigRat - Arbitrary big rational numbers
- use Math::BigRat;
- my $x = Math::BigRat->new('3/7'); $x += '5/9';
- print $x->bstr(),"\n";
- print $x ** 2,"\n";
- my $y = Math::BigRat->new('inf');
- print "$y ", ($y->is_inf ? 'is' : 'is not') , " infinity\n";
- my $z = Math::BigRat->new(144); $z->bsqrt();
Math::BigRat complements Math::BigInt and Math::BigFloat by providing support for arbitrary big rational numbers.
You can change the underlying module that does the low-level math operations by using:
- use Math::BigRat try => 'GMP';
Note: This needs Math::BigInt::GMP installed.
The following would first try to find Math::BigInt::Foo, then Math::BigInt::Bar, and when this also fails, revert to Math::BigInt::Calc:
- use Math::BigRat try => 'Foo,Math::BigInt::Bar';
If you want to get warned when the fallback occurs, replace "try" with "lib":
- use Math::BigRat lib => 'Foo,Math::BigInt::Bar';
If you want the code to die instead, replace "try" with "only":
- use Math::BigRat only => 'Foo,Math::BigInt::Bar';
Any methods not listed here are derived from Math::BigFloat (or Math::BigInt), so make sure you check these two modules for further information.
- $x = Math::BigRat->new('1/3');
Create a new Math::BigRat object. Input can come in various forms:
- $x = Math::BigRat->new(123); # scalars
- $x = Math::BigRat->new('inf'); # infinity
- $x = Math::BigRat->new('123.3'); # float
- $x = Math::BigRat->new('1/3'); # simple string
- $x = Math::BigRat->new('1 / 3'); # spaced
- $x = Math::BigRat->new('1 / 0.1'); # w/ floats
- $x = Math::BigRat->new(Math::BigInt->new(3)); # BigInt
- $x = Math::BigRat->new(Math::BigFloat->new('3.1')); # BigFloat
- $x = Math::BigRat->new(Math::BigInt::Lite->new('2')); # BigLite
- # You can also give D and N as different objects:
- $x = Math::BigRat->new(
- Math::BigInt->new(-123),
- Math::BigInt->new(7),
- ); # => -123/7
- $n = $x->numerator();
Returns a copy of the numerator (the part above the line) as signed BigInt.
- $d = $x->denominator();
Returns a copy of the denominator (the part under the line) as positive BigInt.
- ($n,$d) = $x->parts();
Return a list consisting of (signed) numerator and (unsigned) denominator as BigInts.
- my $y = $x->numify();
Returns the object as a scalar. This will lose some data if the object cannot be represented by a normal Perl scalar (integer or float), so use as_int() or as_float() instead.
This routine is automatically used whenever a scalar is required:
- my $x = Math::BigRat->new('3/1');
- @array = (1,2,3);
- $y = $array[$x]; # set $y to 3
- $x = Math::BigRat->new('13/7');
- print $x->as_int(),"\n"; # '1'
Returns a copy of the object as BigInt, truncated to an integer.
as_number()
is an alias for as_int()
.
Returns a copy of the object as BigFloat, preserving the accuracy as wanted, or the default of 40 digits.
This method was added in v0.22 of Math::BigRat (April 2008).
- $x = Math::BigRat->new('13');
- print $x->as_hex(),"\n"; # '0xd'
Returns the BigRat as hexadecimal string. Works only for integers.
- $x = Math::BigRat->new('13');
- print $x->as_bin(),"\n"; # '0x1101'
Returns the BigRat as binary string. Works only for integers.
- $x = Math::BigRat->new('13');
- print $x->as_oct(),"\n"; # '015'
Returns the BigRat as octal string. Works only for integers.
Create a BigRat from an hexadecimal, binary or octal number in string form.
- $len = $x->length();
Return the length of $x in digitis for integer values.
Return the N'ths digit from X when X is an integer value.
- $x->bnorm();
Reduce the number to the shortest form. This routine is called automatically whenever it is needed.
- $x->bfac();
Calculates the factorial of $x. For instance:
Works currently only for integers.
Are not yet implemented.
Set $x to the remainder of the division of $x by $y.
- $x->bneg();
Used to negate the object in-place.
- print "$x is 1\n" if $x->is_one();
Return true if $x is exactly one, otherwise false.
- print "$x is 0\n" if $x->is_zero();
Return true if $x is exactly zero, otherwise false.
- print "$x is >= 0\n" if $x->is_positive();
Return true if $x is positive (greater than or equal to zero), otherwise false. Please note that '+inf' is also positive, while 'NaN' and '-inf' aren't.
is_positive()
is an alias for is_pos()
.
- print "$x is < 0\n" if $x->is_negative();
Return true if $x is negative (smaller than zero), otherwise false. Please note that '-inf' is also negative, while 'NaN' and '+inf' aren't.
is_negative()
is an alias for is_neg()
.
- print "$x is an integer\n" if $x->is_int();
Return true if $x has a denominator of 1 (e.g. no fraction parts), otherwise false. Please note that '-inf', 'inf' and 'NaN' aren't integer.
- print "$x is odd\n" if $x->is_odd();
Return true if $x is odd, otherwise false.
- print "$x is even\n" if $x->is_even();
Return true if $x is even, otherwise false.
- $x->bceil();
Set $x to the next bigger integer value (e.g. truncate the number to integer and then increment it by one).
- $x->bfloor();
Truncate $x to an integer value.
- $x->bsqrt();
Calculate the square root of $x.
- $x->broot($n);
Calculate the N'th root of $x.
Please see the documentation in Math::BigInt.
- my $z = $x->copy();
Makes a deep copy of the object.
Please see the documentation in Math::BigInt for further details.
Return a string representating this object.
Used to compare numbers.
Please see the documentation in Math::BigInt for further details.
Used to shift numbers left/right.
Please see the documentation in Math::BigInt for further details.
- $x->bpow($y);
Compute $x ** $y.
Please see the documentation in Math::BigInt for further details.
- $x->bexp($accuracy); # calculate e ** X
Calculates two integers A and B so that A/B is equal to e ** $x
, where e
is
Euler's number.
This method was added in v0.20 of Math::BigRat (May 2007).
See also blog().
- $x->bnok($y); # x over y (binomial coefficient n over k)
Calculates the binomial coefficient n over k, also called the "choose" function. The result is equivalent to:
- ( n ) n!
- | - | = -------
- ( k ) k!(n-k)!
This method was added in v0.20 of Math::BigRat (May 2007).
Returns a hash containing the configuration, e.g. the version number, lib loaded etc. The following hash keys are currently filled in with the appropriate information.
- key RO/RW Description
- Example
- ============================================================
- lib RO Name of the Math library
- Math::BigInt::Calc
- lib_version RO Version of 'lib'
- 0.30
- class RO The class of config you just called
- Math::BigRat
- version RO version number of the class you used
- 0.10
- upgrade RW To which class numbers are upgraded
- undef
- downgrade RW To which class numbers are downgraded
- undef
- precision RW Global precision
- undef
- accuracy RW Global accuracy
- undef
- round_mode RW Global round mode
- even
- div_scale RW Fallback accuracy for div
- 40
- trap_nan RW Trap creation of NaN (undef = no)
- undef
- trap_inf RW Trap creation of +inf/-inf (undef = no)
- undef
By passing a reference to a hash you may set the configuration values. This
works only for values that a marked with a RW
above, anything else is
read-only.
This is an internal routine that turns scalars into objects.
Some things are not yet implemented, or only implemented half-way:
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
Math::BigFloat and Math::Big as well as Math::BigInt::BitVect, Math::BigInt::Pari and Math::BigInt::GMP.
See http://search.cpan.org/search?dist=bignum for a way to use Math::BigRat.
The package at http://search.cpan.org/search?dist=Math%3A%3ABigRat may contain more documentation and examples as well as testcases.
(C) by Tels http://bloodgate.com/ 2001 - 2008.