count vowels in common lisp