/*
 * $Id$
 */

PROCEDURE Main()

   USE test NEW

   LABEL FORM test

   USE

   RETURN