P:\test>p1
perl> use Math::Pari qw[ :int factorint sqrtint divisors PARI ];;
perl> use Dumpvalue;;
perl> $f = factorint 1000000;;
perl> { local $\; $d=Dumpvalue->new; $d->veryCompact(1); $d->dumpValue
+( $f ) };;
0 Math::Pari=ARRAY(0x1a37364)
0 2
1 5
1 Math::Pari=ARRAY(0x1a3728c)
0 6
1 6
Another tweak to allow it to format overlaoded arrays as it would an ordinary array, and it'll be perfect.
Then I'll try changing the circularity test to use a more compact method of storing the reference addresses and I'll have everything was looking for. :)
Examine what is said, not who speaks.
Silence betokens consent.
Love the truth but pardon error.
|