s = [1, 2] \\ seed d = vector(10 000) checked = 0 n = 0 emit(v) = { x = digits(v); for (k = 1, #x, print (n++ " " d[n] = x[k]); if (n==#d, quit; ); ); if (!checked && n >= #s, if (d[1..#s] == s, checked = 1, print ("# bug"); quit; ); ); } { for (v = 1, oo, t = if (v <= #s, s, d)[v]; for (i = 1, t, emit(v); ); ); } quit