RosettaCodeData/Task/Non-continuous-subsequences/J/non-continuous-subsequences-3.j

3 lines
79 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
contmasks=: a: ;@, 1 <:/~@i.&.>@i.@+ #
noncont=: <@#~ (allmasks -. contmasks)