Вывод в программе на Prolog

Формулировка задачи:

По заданию необходимо было вывести двоюродных сестер (кузин) для заданного человека. Программа исправна и компилируется, но по непонятной причине дублирует строки в выводе. Подскажите пожалуйста в чем проблема и как ее возможно устранить. Всю голову уже сломал Пробовал менять переменные, добавлять новые предикаты, но без толку. При вводе в поле Goal cusins(X,Y) должно выводится: X=Vika, Y=Vanya X=Lera, Y=Vanya Т.е. в данном случае надо вывести двоюродных сестер Вани. Не представляю уже как и что править...

domains 
x=symbol 
predicates 
male(x) 
female(x) 
parents(x,x) 
cusins(x,x) 
brosis(x,x) 
clauses 
male("Vasya"). 
male("Kolya"). 
male("Yura"). 
male("Vanya"). 
female("Natasha"). 
female("Masha"). 
female("Olya"). 
female("Vika"). 
female("Lera"). 
parents("Vasya","Kolya"). 
parents("Natasha","Kolya"). 
parents("Kolya","Vanya"). 
parents("Masha","Vanya"). 
parents("Vasya","Olya"). 
parents("Natasha","Olya"). 
parents("Olya","Vika"). 
parents("Yura","Vika"). 
parents("Olya","Lera"). 
parents("Yura","Lera"). 
brosis(X,Y):- parents(Z,X),parents(Z,Y),X<>Y. 
cusins(X,Y):- female(X),parents(Z,X),parents(A,Y),brosis(Z,A).

Решение задачи: «Вывод в программе на Prolog»

textual
                            Листинг программы 
                        
                            brosis(X,Y):- parents(Z,X), parents(Z,Y), !, X\=Y.