Note how the first random number after seeding is rather predictable and unvarying. Is this to be expected?

Code: Select all

```
?- random::set_seed(1),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(2),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(3),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(4),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(5),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(6),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(7),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(8),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(9),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(10),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(1000),random::randset(1,0,10,Index).
Index = [0].
?- random::set_seed(2500),random::randset(1,0,10,Index).
Index = [2].
?- random::set_seed(3900),random::randset(1,0,10,Index).
Index = [3].
?- random::set_seed(4613),random::randset(1,0,10,Index).
Index = [4].
?- random::set_seed(5189),random::randset(1,0,10,Index).
Index = [5].
?- random::set_seed(6898),random::randset(1,0,10,Index).
Index = [6].
?- random::set_seed(6899),random::randset(1,0,10,Index).
Index = [6].
?- random::set_seed(6900),random::randset(1,0,10,Index).
Index = [6].
?- random::set_seed(6901),random::randset(1,0,10,Index).
Index = [6].
?- random::set_seed(6902),random::randset(1,0,10,Index).
Index = [6].
```

Parker

Platform: Logtalk 2.31.6, SWI 5.6.54, ubuntu linux 8.04 on 32-bit i386