Deepak Chopra nonsense phrase generator implementation in SWI-Prolog