Simple Context-Free Natural Lanuage Parser in Prolog