END_TEST
START_TEST (test_L3_Unit_scale)
{
int scale = 2;
fail_unless( !Unit_isSetScale(U));
fail_unless( Unit_getScale (U) == SBML_INT_MAX );
Unit_setScale(U, scale);
fail_unless( Unit_getScale(U) == scale );
fail_unless( Unit_isSetScale(U) );
}
END_TEST
START_TEST (test_Unit_set_get_unset)
{
Unit_t *u = Unit_create(2, 4);
// defaults
fail_unless( Unit_getKind (u) == UNIT_KIND_INVALID );
fail_unless( Unit_getExponent (u) == 1 );
fail_unless( Unit_isSetExponent(u) );
fail_unless( Unit_getScale (u) == 0 );
fail_unless( Unit_isSetScale(u) );
fail_unless( Unit_getMultiplier(u) == 1.0 );
fail_unless( Unit_isSetMultiplier(u) );
fail_unless( !Unit_isSetKind(u) );
Unit_setKind(u, UNIT_KIND_WATT);
fail_unless( Unit_getKind (u) == UNIT_KIND_WATT );
Unit_setExponent(u, 3);
fail_unless( Unit_getExponent (u) == 3 );
Unit_setScale(u, 4);
fail_unless( Unit_getScale (u) == 4 );
Unit_setMultiplier(u, 3.2);
fail_unless( Unit_getMultiplier(u) == 3.2 );
fail_unless( Unit_unsetKind(u) == LIBSBML_OPERATION_SUCCESS);
fail_unless( Unit_unsetExponent(u) == LIBSBML_UNEXPECTED_ATTRIBUTE);
fail_unless( Unit_unsetScale(u) == LIBSBML_UNEXPECTED_ATTRIBUTE);
fail_unless( Unit_unsetMultiplier(u) == LIBSBML_UNEXPECTED_ATTRIBUTE);
fail_unless( Unit_getKind (u) == UNIT_KIND_INVALID );
fail_unless( Unit_getExponent (u) == 1 );
fail_unless( Unit_isSetExponent(u) );
fail_unless( Unit_getScale (u) == 0 );
fail_unless( Unit_isSetScale(u) );
fail_unless( Unit_getMultiplier(u) == 1.0 );
fail_unless( Unit_isSetMultiplier(u) );
fail_unless( !Unit_isSetKind(u) );
Unit_free(u);
}
END_TEST
START_TEST (test_Unit_unset)
{
Unit_t *u = Unit_create(2, 4);
Unit_setKind(u, UNIT_KIND_WATT);
Unit_setExponent(u, 3);
Unit_setScale(u, 4);
Unit_setMultiplier(u, 3.2);
fail_unless( Unit_getKind (u) == UNIT_KIND_WATT );
fail_unless( Unit_getExponent (u) == 3 );
fail_unless( Unit_getScale (u) == 4 );
fail_unless( Unit_getMultiplier(u) == 3.2 );
fail_unless (Unit_isSetKind(u) == 1);
fail_unless (Unit_isSetExponent(u) == 1);
fail_unless (Unit_isSetScale(u) == 1);
fail_unless (Unit_isSetMultiplier(u) == 1);
fail_unless (Unit_isSetOffset(u) == 0);
Unit_unsetKind(u);
Unit_unsetExponent(u);
Unit_unsetScale(u);
Unit_unsetMultiplier(u);
fail_unless (Unit_isSetKind(u) == 0);
fail_unless (Unit_isSetExponent(u) == 1);
fail_unless (Unit_isSetScale(u) == 1);
fail_unless (Unit_isSetMultiplier(u) == 1);
fail_unless (Unit_isSetOffset(u) == 0);
fail_unless( Unit_getKind (u) == UNIT_KIND_INVALID );
fail_unless( Unit_getExponent (u) == 1 );
fail_unless( Unit_getScale (u) == 0 );
fail_unless( Unit_getMultiplier(u) == 1.0 );
Unit_free(u);
}
END_TEST
START_TEST (test_L3_Unit_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Unit_t *u =
Unit_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) u) == SBML_UNIT );
fail_unless( SBase_getMetaId ((SBase_t *) u) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) u) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) u) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) u) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) u) == 1 );
fail_unless( Unit_getNamespaces (u) != NULL );
fail_unless( XMLNamespaces_getLength(Unit_getNamespaces(u)) == 2 );
fail_unless( Unit_getKind (u) == UNIT_KIND_INVALID );
fail_unless( isnan(Unit_getExponentAsDouble (u)) );
fail_unless( isnan(Unit_getMultiplier (u)) );
// fail_unless( isnan((double)(Unit_getScale (u))) );
fail_unless( !Unit_isSetKind (u) );
fail_unless( !Unit_isSetExponent (u) );
fail_unless( !Unit_isSetMultiplier (u) );
fail_unless( !Unit_isSetScale (u) );
Unit_free(u);
}
