Non-continuous subsequences: Difference between revisions

Content deleted Content added
Hakank (talk | contribs)
Hakank (talk | contribs)
m →‎{{header|Picat}}: code tag for predicates
Line 1,896: Line 1,896:


=={{header|Picat}}==
=={{header|Picat}}==
This approach uses power_set/1 (from the utils module) to get the proper indices.
This approach uses <code>power_set/1</code> (from the <code>util</code> module) to get the proper indices.


<lang Picat>import util.
<lang Picat>import util.
Line 1,949: Line 1,949:
[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19] = 524097
[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19] = 524097
[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20] = 1048365</pre>
[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20] = 1048365</pre>



=={{header|PicoLisp}}==
=={{header|PicoLisp}}==