use isAlpha definition from the upcoming elm-lang core

This commit is contained in:
Anurag Soni 2017-10-11 20:22:46 -04:00
parent ab69147dd9
commit d82d346afe
No known key found for this signature in database
GPG key ID: 316C46486FAD010B

View file

@ -5,16 +5,16 @@ import List
import Char
isLetter : Char -> Bool
isLetter c =
Char.isHexDigit c && (not <| Char.isDigit c)
isAlpha : Char -> Bool
isAlpha char =
Char.isUpper char || Char.isLower char
isIsogram : String -> Bool
isIsogram sentence =
let
sanitized =
String.filter isLetter sentence
String.filter isAlpha sentence
|> String.toLower
|> String.toList
|> List.sort