github/elm
1
0
Fork 0
mirror of https://github.com/correl/elm.git synced 2024-11-21 19:18:42 +00:00
Code Issues Projects Releases Packages Wiki Activity

Merge pull request #165 from anuragsoni/isograms

Browse source 
use isAlpha definition from the upcoming elm-lang core
This commit is contained in:
Erik Simmler 2017-10-14 19:43:38 -04:00 committed by GitHub
commit 3f35e2ac0b
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
exercises/isogram/Isogram.example.elm
View file

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