% -*- Prolog -*-
%
% Multiple solutions.
%
% $Id: 003,v 1.3 2000/07/12 14:20:23 peteg Exp $

q(1).
q(2).
r(1).
r(2).

main :-
	q(X), r(X), write(X), nl, fail.
