Re: Floating Point numbers vs Fixpoint numbers

2017-08-11 Thread Alexander Burger 
Hi Danilo,

On Fri, Aug 11, 2017 at 02:35:21PM +0200, Danilo Kordic wrote:
> : [load 'Scl.l]
> : [symbols 'Scl.l 'pico]
> : [scl -20]

I did not check thoroughly yet, but why a negative scale?
♪♫ Alex

-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe

Re: Floating Point numbers vs Fixpoint numbers

2017-08-11 Thread Danilo Kordic 
: [load 'Scl.l]
: [symbols 'Scl.l 'pico]
: [scl -20]
: (* (* (Scl 9.9 *Scl) (Scl 9.789 *Scl)) (Scl 9.56789 *Scl))
-> (Scl 927234744579000 -60)
: (normalize @)
-> (Scl 927234744579 -9)
: [setq N @  A (Scl 927.23474457900010747835 *Scl)]
: (- A N)  # Absolute Error
-> (Scl -10747835 -20)

Does it make any sense?


Scl.l
Description: Binary data

Re: Floating Point numbers vs Fixpoint numbers

2017-08-11 Thread Danilo Kordic 
: [load 'Scl.l]
: [symbols 'Scl.l 'pico]
: [scl -20]
: (* (* (Scl 9.9 *Scl) (Scl 9.789 *Scl)) (Scl 9.56789 *Scl))
-> (Scl 927234744579000 -60)
: (normalize @)
-> (Scl 927234744579 -9)
: [setq N @  A (Scl 927.23474457900010747835 *Scl)]
: (- A N)  # Absolute Error
-> (Scl -10747835 -20)

Does it make any sense?

-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe