Print Page - Error in rand

Title: Error in rand
Post by: Fanda on July 09, 2006, 10:41:58 PM

Hello all!

It seems that there is a small error in 'rand':

Code Select Expand
> (set 'N 10)
10
> (rand 3 N)
(2 0 1 1 0 2 2 2 2 0 2)
> (length (rand 3 N))
11

Length of the generated list should be 10 (= N). 'rand' keeps returning one more than is needed.

This way:

Code Select Expand

> (rand 5 0)
(4)

Also:

Code Select Expand
> (rand 5 -1)

never returns result (infinite loop).

- Fanda

PS: I am using newLISP v.8.9.0 on Win32 MinGW

Title:
Post by: Lutz on July 10, 2006, 12:10:25 AM

Thanks Fanda, this will work again in 8.9.1

Lutz

newLISP Fan Club