21 lines
261 B
Perl
Executable File
21 lines
261 B
Perl
Executable File
#!/usr/bin/env perl
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use Math::Trig;
|
|
use Data::Dumper;
|
|
|
|
BEGIN {
|
|
push @INC, '..'
|
|
}
|
|
|
|
use Manticore::Num::ContinuedFraction;
|
|
|
|
my $pi = Manticore::Num::ContinuedFraction->new(pi);
|
|
|
|
print $pi->child();
|
|
|
|
print Data::Dumper::Dumper($pi);
|
|
|