let top_phrase = Gram.Entry.mk "top_phrase"