devoted into AI(Lisp & Prolog)  :-D