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