// flattenStringArray: by Julian Love, julian.love@sierra.com.
//
// Action: Part of the arrayTools set, this one will return a
// new array composed only of unique items from the supplied array.
//
// Examples:
// $fatArray = {"blue", "blue", "red", "green", "blue", "green"};
// flattenStringArray $fatArray;
// // Result: blue red green //

global proc string[] flattenStringArray (string $array[])
{
  string $x; string $y;
  string $newArray[];
  int $itemFound = 0;

  $newArray[0] = $array[0];
  for ($x in $array)
  {
    $itemFound = 0;
    for ($y in $newArray)
    {
      if ($x == $y) {$itemFound = 1;}
    }
    if ($itemFound == 0) {$newArray[size($newArray)] = $x;}
  }

  return ($newArray);
}