import Data.List
import Data.Tuple
getCharFromNum :: Int -> Maybe Char
getCharFromNum n = lookup n $ swap <$> zippedChars
getNumFromChar :: Char -> Maybe Int
getNumFromChar c = lookup c zippedChars
See Data.List.lookup, Data.Tuple.swap, and Data.Functor.<$>
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…