dev/prolog/queens_fd.fd

7 lines
109 B
Plaintext

diff(fdv X,fdv Y,int I)
{
start X in ~{val(Y),val(Y)+I,val(Y)-I}
start Y in ~{val(X),val(X)+I,val(X)-I}
}