úÎ!³+      !"#$%&'()*NoneOT An upper-case character between A and Z.A lower-case character between a and z. $Parse an upper-case alpha character.+parse parseAlphaUpper "parseAlphaUpper" "A"Right (AlphaUpper 'A')-parse parseAlphaUpper "parseAlphaUpper" "Abc"Right (AlphaUpper 'A'):isn't _Right (parse parseAlphaUpper "parseAlphaUpper" "a")True9isn't _Right (parse parseAlphaUpper "parseAlphaUpper" "")True:isn't _Right (parse parseAlphaUpper "parseAlphaUpper" "0")True&Either a lower-case character between a and z$ or an upper-case character between A and Z.#Parse a lower-case alpha character.+parse parseAlphaLower "parseAlphaLower" "a"Right (AlphaLower 'a')-parse parseAlphaLower "parseAlphaLower" "aBC"Right (AlphaLower 'a'):isn't _Right (parse parseAlphaLower "parseAlphaLower" "B")True9isn't _Right (parse parseAlphaLower "parseAlphaLower" "")True:isn't _Right (parse parseAlphaLower "parseAlphaLower" "0")True%,Parse an upper-case or lower-case character.!parse parseAlpha "parseAlpha" "a"#Right (LowerAlpha (AlphaLower 'a'))#parse parseAlpha "parseAlpha" "aBC"#Right (LowerAlpha (AlphaLower 'a'))!parse parseAlpha "parseAlpha" "A"#Right (UpperAlpha (AlphaUpper 'A'))#parse parseAlpha "parseAlpha" "Abc"#Right (UpperAlpha (AlphaUpper 'A'))0isn't _Right (parse parseAlpha "parseAlpha" "0")True& Isomorphism from upper to lower.'(upperlower #) <$> ('a' ^? _AlphaLower)Just (AlphaUpper 'A')'(upperlower #) <$> ('A' ^? _AlphaLower)Nothing'(upperlower #) <$> ('3' ^? _AlphaLower)Nothing' Isomorphism from lower to upper.'(lowerupper #) <$> ('A' ^? _AlphaUpper)Just (AlphaLower 'a')'(lowerupper #) <$> ('a' ^? _AlphaUpper)Nothing'(lowerupper #) <$> ('3' ^? _AlphaUpper)Nothing$+,  !"#$%&'()*  !#$%&' #$ !%&'+,  !"#$%&'()*-      !"#$%&'()*+,-&alphachar-0.0.1-1ZEDWFoH6WA1jvmr08ydahData.Char.Alpha AlphaUpper$fEqAlphaUpper$fOrdAlphaUpper$fShowAlphaUpper AlphaLower AsAlphaUpper _AlphaUpper HasAlphaUpper alphaUpperparseAlphaUpper$fAsAlphaUpperChar$fAsAlphaUpperAlphaUpper$fHasAlphaUpperAlphaUpper$fEqAlphaLower$fOrdAlphaLower$fShowAlphaLowerAlpha UpperAlpha LowerAlpha AsAlphaLower _AlphaLower HasAlphaLower alphaLowerparseAlphaLower$fAsAlphaLowerChar$fAsAlphaLowerAlphaLower$fHasAlphaLowerAlphaLower $fEqAlpha $fOrdAlpha $fShowAlphaAsAlpha_Alpha _UpperAlpha _LowerAlpha$fAsAlphaAlphaHasAlphaalpha parseAlpha upperlower lowerupper$fAsAlphaUpperAlpha$fAsAlphaLowerAlpha$fHasAlphaAlpha