NAME

Math::NumSeq::MathImageInnerSquareRoot -- sqrt of largest square divisor

SYNOPSIS

use Math::NumSeq::MathImageInnerSquareRoot;
my $seq = Math::NumSeq::MathImageInnerSquareRoot->new;
my ($i, $value) = $seq->next;

DESCRIPTION

...

FUNCTIONS

$seq = Math::NumSeq::MathImageInnerSquareRoot->new ()

Create and return a new sequence object.

$value = $seq->ith($i)

Return the largest perfect square dividing $i.

$bool = $seq->pred($value)

Return true if $value occurs in the sequence, which is simply any integer $value >= 1.

SEE ALSO

Math::NumSeq, Math::NumSeq::MobiusFunction