Anonymous user
De Bruijn sequences: Difference between revisions
m
→{{header|J}}
m (→{{header|J}}) |
|||
Line 598:
=={{header|J}}==
definitions
<lang J>NB. implement inverse Burrows—Wheeler transform sequence method
Line 606 ⟶ 607:
pins=: #&10 #: [: i. 10&^ NB. pins y generates all y digit PINs
groups=: [ ]\ ] , ({.~ <:)~ NB. length x infixes of sequence y cyclically extended by x-1
verify_PINs=: (/:~@:groups -: pins@:[) NB. LENGTH verify_PINs SEQUENCE
</lang>Task<
A=: 10 de_bruijn 4
Line 627 ⟶ 628:
4 verify_PINs (a.i.'.')(<: 4444)} A
0
</
=={{header|Java}}==
{{trans|C++}}
| |||