Unique characters in each string: Difference between revisions
Content added Content deleted
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
|||
Line 938: | Line 938: | ||
{{out}} |
{{out}} |
||
<pre>1 2 3 a b c</pre> |
<pre>1 2 3 a b c</pre> |
||
=={{header|Transd}}== |
|||
<syntaxhighlight lang="Scheme">#lang transd |
|||
MainModule: { |
|||
_start: (lambda locals: pos Position<String>() b Bool() |
|||
(for c in (sort "1a3c52debeffd") do (= b true) |
|||
(for str in ["1a3c52debeffd", "2b6178c97a938stf", "3ycxdb1fgxa2yz"] do |
|||
(= pos (find str c)) |
|||
(if (or (is-end pos) (find Range(in: str (+ (get-idx pos) 1) -0) c)) |
|||
(= b false))) |
|||
(if b (textout c " ")) |
|||
) ) |
|||
}</syntaxhighlight> |
|||
{{out}} |
|||
<pre> |
|||
1 2 3 a b c |
|||
</pre> |
|||
=={{header|Wren}}== |
=={{header|Wren}}== |