Tag: rot13

Rot13 is a simple Caeser-cypher where letters are replaced by shifting them by 13 places. > import Data.Maybe (fromMaybe) > rot13 :: String -> String > rot13 s = map rotchar s > where we’ll first look in the lowercase letters > rotchar c = case (lookup c $ transp lc) of > Just x…