1 USING: base24 endian grouping kernel math.parser sequences
6 { 49894920630459842177293598641814316632 } [
7 "2FC28KTA66WRST4XAHRRCF237S8Z" base24> be>
10 { 49894920630459842177293598641814316632 } [
11 "2FC2 8KTA6 6WRST 4XAHR RCF23 7S8Z" base24> be>
14 { 49894920630459842177293598641814316632 } [
15 "2fc2 8kta6 6wrst 4xahr rcf23 7s8z" base24> be>
56 first2 [ hex-string>bytes ] dip :> ( a b )
57 { a } [ b base24> ] unit-test
58 { b } [ a >base24 "" like ] unit-test