Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- next =. (,&0),(-.@|.)
- fillTo =. 4 : 0
- (x&$`(x"_ fillTo next)@.(#<(x"_))) y
- )
- checksum =. checksum`[@.(2:|#)@(_2&(=/\))
- checksum 272 fillTo "."0'11100010111110100'
- NB. ^^^-- input ^^^^^^^^^^^^^^^^^-- input
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement