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

Does it make any sense?

Attachment: Scl.l
Description: Binary data

Reply via email to