>Hi All:
>
>How do I remove duplicate characters in a string:
>
>
>Bigstring = 'cattttccv'
>NonDupeString = NonDupe(BigString)
>
>* Result = 'catv'
>
>
>Thanks,
>
>Yossi
FWLIW, My VFP solution, after reading Dragan's, was the same as Walter's except that I used CHRTRAN rather than STRTRAN.
My last APL coding was back in 1984. I've been trying to work out a solution, but I've forgotten too much.
So far all I can come up with is
teststring <- teststring[< gradeup > teststring]
bitmap <- !=\teststring
result <- bitmap / teststring.
(not sure if I remember exactly how not equal scan works. I "think" (hope) it gives a 1 when the values change.
Of course, if it were real APL it would be in one line
But I think I would be able to understand the real solution when I see it.
(Sorry Craig. I don't have the keyboard to show the proper glyphs for you)