Remove vowels from a string: Difference between revisions

mNo edit summary
Line 513:
=={{header|Common Lisp}}==
 
<lang lisp>(defun vowelp (c &keyoptional (vowels "aeiou"))
(and (characterp c) (characterp (find c vowels :test #'char-equal))))