FUNCTION Main()
   LOCAL x
   x := MyTest("hello", "hello")
   ? "Result:", x
   RETURN NIL

FUNCTION MyTest(a, b)
   ? "a:", a
   ? "b:", b
   ? "type a:", ValType(a)
   ? "type b:", ValType(b)
   IF a = b
      ? "EQUAL"
      RETURN "PASS"
   ELSE
      ? "NOT EQUAL"
   ENDIF
   RETURN "FAIL"