Digamos que eu queira criar um caso especial para uma função que corresponda a strings que começam com o caractere 'Z'. Eu poderia facilmente fazer isso usando correspondência de padrões fazendo algo como o seguinte:

myfunc ('Z' : restOfString) = -- do something special
myfunc s = -- do the default case here

Mas e se eu quiser combinar strings com um prefixo maior? Digamos que eu queira ter um caso especial para cadeias de caracteres que começam com a palavra "torradeira". Qual é a melhor maneira de escrever um padrão para corresponder a essa string?