author(Person) :-
    book(Book),
    wrote(Person, Book).