<
abu[7]>
Yeah, I'll do. Thanks beneroth!
rob_w has joined #picolisp
soweli_i_ has joined #picolisp
soweli_iki has quit [Ping timeout: 276 seconds]
soweli_i_ has quit [Ping timeout: 252 seconds]
rob_w has quit [Remote host closed the connection]
aelius has quit [Ping timeout: 248 seconds]
soweli_iki has joined #picolisp
aelius has joined #picolisp
soweli_iki has quit [Ping timeout: 260 seconds]
soweli_iki has joined #picolisp
<
tankf33der>
hi all
<
tankf33der>
i've created such a monster.
<
tankf33der>
now it can pass tests.
<
abu[7]>
In 'times' and 'bits' you call (scl 10 ...), but why?
<
abu[7]>
Is there I/O?
<
tankf33der>
i will remove it.
<
abu[7]>
Perhaps better pre-calculate the constants?
<
abu[7]>
so (** 10 *Scl) is not at runtime
<
abu[7]>
eg (setq 1.0x9 1000000000)
<
tankf33der>
but *Scl depends on input parameters
<
tankf33der>
(scl (- (length N) (length D))
<
abu[7]>
So maybe this is the best way
<
tankf33der>
any other scl and test will fail.
<
tankf33der>
so in big input algo much slower than /
<
abu[7]>
I think this is not a "monster" :)
<
tankf33der>
but its slow.
<
abu[7]>
The (do (times ... loop?
<
tankf33der>
i will profile later, works much faster till 40k digits
<
tankf33der>
i will test all night in the loop
<
tankf33der>
btw, how to profile?
<
abu[7]>
You insert 'rt' at appropriate places in the code
<
abu[7]>
I would do (v newton), i.e. edit in memory, and put (rt 0
<
abu[7]>
in some places
<
abu[7]>
good night :)
alexshendi has joined #picolisp
soweli_iki has quit [Ping timeout: 260 seconds]
<
beneroth>
ooh, there is now (rt)! nice! I missed when this was added, I made something similar myself.
beneroth has quit [Quit: Leaving]