Jump to content

Bitcoin/address validation: Difference between revisions

Bitcoin/address validation (view source)

Revision as of 10:36, 15 July 2017

1 byte added ,  6 years ago
m
→‎{{header|Factor}}
(→‎{{header|Factor}}: use map-reduce instead of map and reduce)
Line 448:
CONSTANT: ALPHABET "123456789ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz"
 
: base58>bigint ( digitsstr -- n )
[ ALPHABET index ]
[ [ 58 * ] [ + ] bi* ] map-reduce ;
 
: base58> ( str -- nbytes ) base58>bigint 25 >be ;
 
: btc-checksum ( bytes -- checksum-bytes )
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/222225"
Cookies help us deliver our services. By using our services, you agree to our use of cookies.
More information