YAP Prolog随机缺乏随机性

Question

当使用YAP执行以下Prolog程序时，输出总是相同的，即整数233。

:- use_module(library(random)).    
x:- random(1,1000,X), writeln(X).

例如，如果我执行以下bash脚本，输出总是相同的整数(233)。

for k in `seq 0`
do
  yap -l test.pl << %
  x.
%
done

如果我使用swipl重复这个过程，那么每次输出都是不同的，即随机的。

有人能解释一下吗？

Answer 1

通常，随机生成器需要类似于set_seed(SomeReallyRandomValue)的调用，在C中经常使用种子(time(0))。所以，我想

datime(datime(_Year, _Month, _DayOfTheMonth, _Hour, Minute, Second)),
X is Minute * Second,Y=X,Z=X,
setrand(rand(X,Y,Z)),

能起作用

Answer 2

第一件事！

由于许多原因(过去结果的重现性是最重要的)，计算机程序不适用于实际的随机数，而适用于伪随机数。

PRNG是完全确定性的函数，给定相同的内部状态(即.a)。(“种子”)作为初始化，产生完全相同的数字序列(从现在到永恒)。

快速修复:找一个合适的种子(日期，时间，月亮的相位，.)并使用该种子显式初始化PRNG。记录下种子，这样你就可以确定地重新运行过去的实验了。