This report was a long time ago. Entirely possible that it's been resolved.
On Fri, Oct 2, 2020, 2:58 PM William Michels <w...@caa.columbia.edu> wrote:
> On Thu, Mar 21, 2019 at 5:17 PM Aaron Sherman <a...@ajs.com> wrote:
> >
> > Here's four commands using my Math::Sequence module (note that the
> difference between the first and second command is just 1 digit of pi
> precision and the 3rd and 4th are just the 1st and 2nd but with a base
> conversion):
> >
> > $ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(309).perl'
> >
> FatRat.new(3141592653589793238462643383279502884197169399375105820974944592307816406286208998628034825342117067982148086513282306647093844609550582231725359408128481117450284102701938521105559644622948954930381964428810975665933446128475648233786783165271201909145648566923460348610454326648213393607260249141273724587,
> 1000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000)
> >
> > real 0m0.350s
> > user 0m0.359s
> > sys 0m0.156s
> > $ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(310).perl'
> >
> FatRat.new(1570796326794896619231321691639751442098584699687552910487472296153908203143104499314017412671058533991074043256641153323546922304775291115862679704064240558725142051350969260552779822311474477465190982214405487832966723064237824116893391582635600954572824283461730174305227163324106696803630124570636862293503,
> 500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000)
> >
> > real 0m0.354s
> > user 0m0.297s
> > sys 0m0.203s
> > $ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(309).base(2)'
> >
> 11.0010010000111111011010101000100010000101101000110000100011010011000100110001100110001010001011100000001101110000011100110100010010100100000010010011100000100010001010011001111100110001110100000000100000101110111110101001100011101100010011100110110010001001010001010010100000100001111001100011100011010000000100110111011110111110010101000110011011001111001101001110100100001100011011001100000010101100001010011011011111001001011111000101000011011101001111111000010011010101101101011011010101000111000010010001011110010010000101101101010111011001100010010111100111111011000110111101000100110001000010111010011010011000110111111011010110101100001011111111110101110010110110111101000000011010110111111011011110111000111000011010111111101101011010100010011001111110100101101011101001111100100100000100010111110001001011000111111110011001001001001010000110011001010001111011001110010001011011001111011100001000000000011111001011100010100001011000111011111100000101100110001101101001001000001101100001110001010101110100111010
> >
> > real 0m0.537s
> > user 0m0.609s
> > sys 0m0.094s
> > $ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(310).base(2)'
> > ^C
> >
> > real 0m3.992s
> > user 0m3.969s
> > sys 0m0.188s
> >
> > For some reason that last one will run for a VERY long time (I've not
> yet seen it finish, but I admit I've only let it run a minute or so). If
> you want to test this without my module:
> >
> > put
> FatRat.new(1570796326794896619231321691639751442098584699687552910487472296153908203143104499314017412671058533991074043256641153323546922304775291115862679704064240558725142051350969260552779822311474477465190982214405487832966723064237824116893391582635600954572824283461730174305227163324106696803630124570636862293503,
> 500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000).base(2)
> >
> > --
> > Aaron Sherman, M.:
> > P: 617-440-4332 // E: a...@ajs.com
> > Toolsmith, developer, gamer and life-long student.
>
> Hi Aaron, Replicating with Rakudo version 2020.06, I don't see the problem
> with your fourth command. All four of the commands that use your
> Math::Sequences::Integer module take about 1 sec real / 0.08-0.09 sec sys
> to run. These four are consistent (but slower) than your numbers in all
> probability because I'm on an older laptop.
>
> The fifth command you posted (sans module) takes 0.225s real / 0.051s sys,
> just in case you need those times.
>
> HTH, Bill.
>
> #`{Note: did "zef install Math::Sequences::Integer" prior to running the
> timing code, testing OK, two modules installed--versions listed:
> ===> Installing: Lingua::EN::Numbers:ver<2.6.0>
> ===> Installing: Math::Sequences:ver<0.0.6>
> then I ran Aaron's code at the terminal}
>
> user@bmbook:~$ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(309).perl'
> FatRat.new(3141592653589793238462643383279502884197169399375105820974944592307816406286208998628034825342117067982148086513282306647093844609550582231725359408128481117450284102701938521105559644622948954930381964428810975665933446128475648233786783165271201909145648566923460348610454326648213393607260249141273724587,
> 1000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000)
>
> real 0m1.101s
> user 0m1.032s
> sys 0m0.086s
> user@bmbook:~$ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(310).perl'
> FatRat.new(1570796326794896619231321691639751442098584699687552910487472296153908203143104499314017412671058533991074043256641153323546922304775291115862679704064240558725142051350969260552779822311474477465190982214405487832966723064237824116893391582635600954572824283461730174305227163324106696803630124570636862293503,
> 500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000)
>
> real 0m0.979s
> user 0m0.980s
> sys 0m0.080s
> user@bmbook:~$ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(309).base(2)'
>
> 11.001001000011111101101010100010001000010110100011000010001101001100010011000110011000101000101110000000110111000001110011010001001010010000001001001110000010001000101001100111110011000111010000000010000010111011111010100110001110110001001110011011001000100101000101001010000010000111100110001110001101000000010011011101111011111001010100011001101100111100110100111010010000110001101100110000001010110000101001101101111100100101111100010100001101110100111111100001001101010110110101101101010100011100001001000101111001001000010110110101011101100110001001011110011111101100011011110100010011000100001011101001101001100011011111101101011010110000101111111111010111001011011011110100000001101011011111101101111011100011100001101011111110110101101010001001100111111010010110101110100111110010010000010001011111000100101100011111111001100100100100101000011001100101000111101100111001000101101100111101110000100000000001111100101110001010000101100011101111110000010110011000110110100100100000110110000111000101010111010011101
>
> real 0m1.071s
> user 0m1.034s
> sys 0m0.088s
> user@bmbook:~$ time PERL6LIB=lib perl6 -MMath::Sequences::Integer -e 'put
> FatPi(310).base(2)'
>
> 11.00100100001111110110101010001000100001011010001100001000110100110001001100011001100010100010111000000011011100000111001101000100101001000000100100111000001000100010100110011111001100011101000000001000001011101111101010011000111011000100111001101100100010010100010100101000001000011110011000111000110100000001001101110111101111100101010001100110110011110011010011101001000011000110110011000000101011000010100110110111110010010111110001010000110111010011111110000100110101011011010110110101010001110000100100010111100100100001011011010101110110011000100101111001111110110001101111010001001100010000101110100110100110001101111110110101101011000010111111111101011100101101101111010000000110101101111110110111101110001110000110101111111011010110101000100110011111101001011010111010011111001001000001000101111100010010110001111111100110010010010010100001100110010100011110110011100100010110110011110111000010000000000111110010111000101000010110001110111111000001011001100011011010010010000011011000011100010101011101001110011010011
>
> real 0m0.986s
> user 0m0.941s
> sys 0m0.081s
> user@bmbook:~$ time perl6 -e 'put
> FatRat.new(1570796326794896619231321691639751442098584699687552910487472296153908203143104499314017412671058533991074043256641153323546922304775291115862679704064240558725142051350969260552779822311474477465190982214405487832966723064237824116893391582635600954572824283461730174305227163324106696803630124570636862293503,
> 500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000).base(2)'
>
> 11.00100100001111110110101010001000100001011010001100001000110100110001001100011001100010100010111000000011011100000111001101000100101001000000100100111000001000100010100110011111001100011101000000001000001011101111101010011000111011000100111001101100100010010100010100101000001000011110011000111000110100000001001101110111101111100101010001100110110011110011010011101001000011000110110011000000101011000010100110110111110010010111110001010000110111010011111110000100110101011011010110110101010001110000100100010111100100100001011011010101110110011000100101111001111110110001101111010001001100010000101110100110100110001101111110110101101011000010111111111101011100101101101111010000000110101101111110110111101110001110000110101111111011010110101000100110011111101001011010111010011111001001000001000101111100010010110001111111100110010010010010100001100110010100011110110011100100010110110011110111000010000000000111110010111000101000010110001110111111000001011001100011011010010010000011011000011100010101011101001110011010011
>
> real 0m0.225s
> user 0m0.219s
> sys 0m0.051s
> user@bmbook:~$ perl6 --version
> This is Rakudo version 2020.06 built on MoarVM version 2020.06
> implementing Raku 6.d.
> user@bmbook:~$ raku --version
> This is Rakudo version 2020.06 built on MoarVM version 2020.06
> implementing Raku 6.d.
>
