-- http://www.codewars.com/kata/545cedaa9943f7fe7b000048
module Pangram where

import Data.List
import Data.Char

isPangram :: String -> Bool
isPangram = (==['a'..'z']) . map head . group . sort . map toLower . filter isAlpha