Contents

create((X,Y)) :- X >= 0, Y >= 0, 7 >= X, 7 >= Y.

column((_, Y), (_, V)) :- Y =:= V.

row((X, _), (U, _)):- X =:= U.

diagonal((X, Y), (U, V)) :-  (X-Y) =:= (U-V), !; (X+Y) =:= (U+V).

attack((X, Y), (U, V)) :-
  column((X, Y), (U, V)), !;
  row((X, Y), (U, V)), !;
  diagonal((X, Y), (U, V)).

Version data entries

68 entries across 68 versions & 1 rubygems

Version	Path
trackler-2.2.1.180	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.179	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.178	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.177	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.176	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.175	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.174	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.173	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.172	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.171	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.170	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.169	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.167	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.166	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.165	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.164	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.163	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.162	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.161	tracks/prolog/exercises/queen-attack/queen_attack.example
trackler-2.2.1.160	tracks/prolog/exercises/queen-attack/queen_attack.example