nt-dice 生成非传递性骰子集 定义: 如果D1> D2的可能性大于0.5,则骰子D1击败另一个骰子D2。 如果A击败B和B击败C但A没有击败C,则一组骰子A,B,C是不可传递的。 如果A击败B,B击败C和C击败A,则骰子A,B,C的集合是高度不可传递的。 该程序生成一组强非传递性骰子。 安装 需要Common Lisp和以下软件包: alexandria screamer 否则,无需安装。 使用 转到与源代码相同的目录,然后在Lisp中运行以下命令: ( load " dice.lisp " ) (in-package :dice) ; ; Get sets of si