McNuggets problem: Difference between revisions
Add Factor example
(→{{header|JavaScript}}: (bindList -> .flatMap)) |
(Add Factor example) |
||
Line 396:
printfn "%d" (Set.maxElement(Set.difference (set[1..100]) (fN 20 0|>Seq.collect(fun n->fN 9 n)|>Seq.collect(fun n->fN 6 n)|>Set.ofSeq)))
</lang>
{{out}}
<pre>
43
</pre>
=={{header|Factor}}==
<lang factor>USING: backtrack kernel math.ranges prettyprint sequences sets ;
101 <iota> [ 0 6 9 20 [ 100 swap <range> amb-lazy ] tri@ ] bag-of diff last .</lang>
{{out}}
<pre>
| |||