Set consolidation: Difference between revisions

Set consolidation (view source)

10 bytes removed , 3 years ago

Replaced the "seq[set[char]]" by a "varargs[set[char]]". Removed useless "$" in "echo $consolidate...".

Anonymous user

Revision as of 21:28, 7 March 2021 (view source) Alpha bravo (talk \| contribs) (Added AutoHotkey) ← Older edit		Revision as of 14:22, 6 April 2021 (view source) rosettacode>Lscrd (Replaced the "seq[set[char]]" by a "varargs[set[char]]". Removed useless "$" in "echo $consolidate...".) Newer edit →
Line 1,458: =={{header\|Nim}}== {{trans\|Python}} <lang nim>proc consolidate(sets: ~~seq~~varargs[set[char]]): seq[set[char]] = if len(sets) < 2: return @sets var (r, b) = (@[sets[0]], consolidate(sets[1..^1])) for x in b: Line 1,469: r echo $consolidate(@[{'A', 'B'}, {'C', 'D'}]) echo $consolidate(@[{'A', 'B'}, {'B', 'D'}]) echo $consolidate(@[{'A', 'B'}, {'C', 'D'}, {'D', 'B'}]) echo $consolidate(@[{'H', 'I', 'K'}, {'A', 'B'}, {'C', 'D'}, {'D', 'B'}, {'F', 'G', 'H'}])</lang> {{out}} <pre>