# [Haskell], 48 bytes <!-- language-all: lang-hs --> g.break(`elem`"aeiou") g(s,"")=s g(_,r)="shm"++r [Try it online!][TIO-ld6jyal2] [Haskell]: https://www.haskell.org/ [TIO-ld6jyal2]: https://tio.run/##PY7BDoIwDIbvPkXTeICAPoHjCfTkUY0UHLA4xrKOEF/euaHxP/T/2v5pOhA/pdahE9fQ7xsn6ZnVUsuxRpJqmjHf9BmXiLngSPfS5QJ5GLEoXBhJGRAwkj2Bnf3Zu6OBLWRXhl0FDEUBCKKKJVIHnMNhW8EFl8k9sARsqHklZ9Jyde@U6RN1s2m9msx3Gh8kl5D8y6qWdOJlWYYo8uvir9Rp/00rZzWZ3@lp9ngL77bT1HPYtdZ@AA "Haskell – Try It Online"