gender(jane,f).
gender(mary,f).
gender(steve,m).
gender(earl,m).
likes(jane,sushi).
likes(jane,salad).
likes(jane,lobster).
likes(mary,haggis).
likes(steve,bbq).
likes(steve,lobster).
likes(steve,sushi).
likes(earl,poisonbacon).

good_date(Guy,Gal):-
	gender(Guy,m),
	gender(Gal,f),
	likes(Guy,Fud),
	likes(Gal,Fud),
	Guy\=Gal.

