sforman
/
Thun
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
Thun/thun/gnu-prolog/junk/meta.pl

11 lines
118 B
Prolog
Raw Blame History

do(DCG) :-
fd_domain(X, 0, 9),
fd_labeling(X),
number_codes(X, [C]),
DCG = `-->`(digit(C), [C]).
Reference in New Issue View Git Blame Copy Permalink