Prolog: improvement of monkey and banana