Remove duplicate values from an array in powerbuilder

I have the following array:

array = {'1', '2', '1', '3'}

And I need to remove the duplicates, in this case the duplicate is '1', and it should look like this:

array = {'1', '2', '3'}

Script:

int i string array[] array = {'1', '2', '1', '3'} for i = 1 to upperbound(array) // array[i] next