小编Mar*_*ini的帖子

我试图在 haskell 上创建一个函数，我知道该函数的定义如下：

justWithA : [Char] -> Bool
justWithA [] = True
justWithA (x:xs) | (x == "a") = x + justWithA xs                 
                 | else (x == "e") = False
                 | else (x == "i") = False
                 | else (x == "o") = False
                 | else (x == "u") = False

我认为有更好的方法来定义这个函数，只是不知道正确的方法......