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
: [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) #
: [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) #