Anagrams/Deranged anagrams: Difference between revisions
Added 11l
m (→{{header|REXX}}: added/changed comments and whitespace, added optimization.) |
Alextretyak (talk | contribs) (Added 11l) |
||
Line 16:
<hr>
=={{header|11l}}==
{{trans|Kotlin}}
<lang 11l>F is_not_deranged(s1, s2)
L(i) 0 .< s1.len
I s1[i] == s2[i]
R 1B
R 0B
Dict[String, Array[String]] anagram
A count = 0
L(word) File(‘unixdict.txt’).read().split("\n")
A a = sorted(word).join(‘’)
I a !C anagram
anagram[a] = [word]
E
L(ana) anagram[a]
I is_not_deranged(ana, word)
L.break
L.was_no_break
anagram[a].append(word)
count = max(count, word.len)
L(ana) anagram.values()
I ana.len > 1 & ana[0].len == count
print(ana)</lang>
{{out}}
<pre>[excitation, intoxicate]</pre>
=={{header|Ada}}==
| |||