OK, my first attempt at solving a problem in APL. The problem I chose is finding the first character that is duplicate in a string. Now that I have the problem solved, I would like feedback (as I am a total beginner) as to whether I am doing something the hard way:
```
CountChars←{u←∪⍵ ⋄ s←⍵ ⋄ 2(≢u)⍴u,{+/s∊⍵}¨u}
FirstDup←{1↑(⍵[2;]>1)/⍵[1;]}
FindFirstDup←FirstDup∘CountChars
```
Then:
```
FindFirstDup 'the amazing thing'
```