//
// $Id: set_num.prg 1648 1999-10-16 03:28:56Z dholm $
//

// Testing SET

#include "set.ch"

function Main()
local n, cNewLine := HB_OSNewLine()

   for n := 1 to _SET_COUNT
      outstd (cNewLine)
      outstd (set (n))
   next

return nil
