path: root/challenge-074/richard-park/apl/FNRCharacter.aplf

 FNRCharacter←{
     FNR←{
         fnr←⊃⌽' '~⍨,(⊣(⌿⍨)(1=(≢⊢)))⌸⍵   ⍝ Last non-repeating element
         ' '≡fnr:'#'                     ⍝ No unique elements
         fnr
     }
     FNR¨(↑∘⍵)¨⍳≢⍵  ⍝ "First" Non-Repeating characters
                    ⍝ In subsets of ⍵ of length 1 to ≢⍵
 }