TYPE
PREFIX_min (TYPE data[], int len)
{
  int i;
  TYPE smallest = data[0];
  for (i = 1; i < len; i++)
    {
      if (LT(data[i],smallest))
        smallest = data[i];
    }
  return smallest;
}