DEV Community

DEV Community is a community of 576,605 amazing developers

We're a place where coders share, stay up-to-date and grow their careers.

Some unfancy Common Lisp:

(defun remove-vowels (text)
  (flet ((vowel-p (char) (find char "aeiouAEIOU" :test #'char=)))
    (remove-if #'vowel-p text)))