Strawberry prolog - Prolog (226798)

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

Здравствуйте. помогите пожалуйста перенести программу написанную в Prolog в Strawberry prolog. (ввести нужно родителей и детей и узнать кто чей родитель при поиске)

domains
name=srting
predicates
родитель (name,name)
clauses
родитель("Иван", "Алексей").
родитель("Мария", "Анна").
родитель("Иван", "Анна") % goal родитель ("Иван", "Анна").
goal родитель(кто, "Анна")
 
кто=Анна
кто=Иван

Решение задачи: «Strawberry prolog»

textual
                            Листинг программы 
                        
                            ?- rod(Kto, "Anna"), write(Kto), nl, fail.