Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re^4: porting C code to Perl (Inline::C)

by danaj (Friar)
on Nov 07, 2017 at 00:48 UTC ( #1202895=note: print w/replies, xml ) Need Help??

in reply to Re^3: porting C code to Perl (Inline::C)
in thread porting C code to Perl

This seems to be much slower than AGM. 10k digits takes 0.13s but 100k digits takes 33.8s. Even the Machin-type formula are faster.

The paper Exploration in π Calculation Using Various Methods Implemented in Python has some insight, and is useful to read in general as well. We certainly shouldn't be doing all those factorials in the loop. Those are pretty easy to pull out. But the killer is the huge-precision divide done for every loop iteration. Binary splitting is what's needed, though it is a non-trivial change. You can see in their Table 2 just how significant the difference is. If I recall correctly, fast implementations use fine control of the precision on every loop iteration, where in contrast AGM has to use full precision for each iteration.

  • Comment on Re^4: porting C code to Perl (Inline::C)

Replies are listed 'Best First'.
Re^5: porting C code to Perl (Inline::C)
by marioroy (Parson) on Nov 07, 2017 at 09:15 UTC

    Thanks for the link. I will try Chudnovsky binary splitting next. My plan is making a demo for running on many hosts and cores.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1202895]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (7)
As of 2022-01-21 09:23 GMT
Find Nodes?
    Voting Booth?
    In 2022, my preferred method to securely store passwords is:

    Results (57 votes). Check out past polls.