SkipJack cipher implemented in Haskell