Base58Check encoding: Difference between revisions

Content added Content deleted
(→‎{{header|Haskell}}: Tidied the composition of the character set)
Line 363: Line 363:
baseEncode $
baseEncode $
listArray (0, 57) $
listArray (0, 57) $
[('1', '9'), ('A', 'H'), ('J', 'N'), ('P', 'Z'), ('a', 'k'), ('m', 'z')] >>=
concat
uncurry enumFromTo
[ ['1' .. '9']
, ['A' .. 'H']
, ['J' .. 'N']
, ['P' .. 'Z']
, ['a' .. 'k']
, ['m' .. 'z']
]


baseEncode
baseEncode