END_TEST


START_TEST (test_ParametricObject_output)
{
  const char *expected = 
    "<parametricObject id=\"i\" polygonType=\"triangle\" domainType=\"p\">\n"
    "  <polygonObject pointIndexLength=\"3\">1 2 3 </polygonObject>\n"
    "</parametricObject>";

  PolygonObject *obj = new PolygonObject(GNS);
  int points [] = {1,2,3};
  obj->setPointIndex(points, 3);

  G->setId("i");
  G->setPolygonType("triangle");
  G->setDomainType("p");
  G->setPolygonObject(obj);

  S = G->toSBML();

  fail_unless( equals(expected, S) );

  delete obj;
}