(de palindrome? (S)
   (= (setq S (chop S)) (reverse S)) )