Anagram generator: Difference between revisions
m
→{{header|J}}: bugfix (would have not rejected a non-anagram which only differed by case)
m (→{{header|J}}: clean out debugging and irrelevant code) |
m (→{{header|J}}: bugfix (would have not rejected a non-anagram which only differed by case)) |
||
Line 47:
done=. (+/"2 maybe{c)*/ .=ref
if. 1 e. done do.
r=.
if. #r=. r #~ -. r -:"1&tolower y do. r return. end.
end.
maybe=. ; c {{
| |||