基本问题，但我似乎无法找到有效的解决方案。
我有以下[Char]：
"cdea...x...pwpee"
我希望将其转换为[[Char]]：
[[cdea], [x], [pwpee]] --create a lists of contiguous a's
我目前的解决方案只设法得到前三个：
myFunction :: [Char] -> [[Char]]
myFunction (x : xs)
| x == 'a' = [x] : myFunction xs
| otherwise = []
输出：
[c,d,e,a]
是否有明显的解决方案来获得我想要的结果？