Anonymous user
Remove vowels from a string: Difference between revisions
→{{header|Common Lisp}}
Line 513:
=={{header|Common Lisp}}==
<lang
(defun vowelp (c &key (vowels "aeiou"))
(and (characterp c) (find c vowels :test #'char-equal)))
| |||
Line 513:
=={{header|Common Lisp}}==
<lang
(defun vowelp (c &key (vowels "aeiou"))
(and (characterp c) (find c vowels :test #'char-equal)))
| |||