sentence-->noun_phrase,verb_phrase.

noun_phrase-->determiner,noun.

verb_phrase-->verb,noun_phrase.
verb_phrase-->verb.

determiner-->[the].
determiner-->[an].
determiner-->[a].

noun-->[apple].
noun-->[pear].
noun-->[man].
noun-->[men].

verb-->[eats].
verb-->[likes].

/*
sentence([a,man,eats,an,apple],[])
phrase(sentence,[a,man,eats,an,apple])

phrase(P,L):-Goal=..[P,L,[]],call(Goal).
*/