:- s([ball,dog,the,the,takes,man,the,to],[]).