s=0seen（v）=位测试（s，v）参见（v）=s=位或（s，2^v）基数=10{n=0；对于（w=1，oo，my（m=基数^w）；对于复合（c=1，oo，my（l=最大值（1，#位数（c，基数））；对于步骤（s=l-w，0，-1，我的（d=（c \（基数^s））%m）；如果（！可见（d），参见（d）；打印（n++“”d）；如果（n==10 000，断裂（3）；);););如果（n＝＝m，断裂；);););}退出