:- s([ball,a,dog,a,hits],[]).