END_TEST
START_TEST (test_SBMLConvert_convertToL2v4_DuplicateAnnotations_model)
{
SBMLDocument_t *d = SBMLDocument_createWithLevelAndVersion(2, 1);
Model_t * m = SBMLDocument_createModel(d);
char * annotation = "<rdf/>\n<rdf/>";
int i = SBase_setAnnotationString((SBase_t *) (m), annotation);
fail_unless( SBMLDocument_getLevel (d) == 2, NULL );
fail_unless( SBMLDocument_getVersion(d) == 1, NULL );
fail_unless( XMLNode_getNumChildren(SBase_getAnnotation((SBase_t *) (m))) == 2);
fail_unless( SBMLDocument_setLevelAndVersion(d, 2, 4) == 1, NULL );
fail_unless( SBMLDocument_getLevel (d) == 2, NULL );
fail_unless( SBMLDocument_getVersion(d) == 4, NULL );
m = SBMLDocument_getModel(d);
fail_unless( XMLNode_getNumChildren(SBase_getAnnotation((SBase_t *) (m))) == 1);
SBMLDocument_free(d);
}
END_TEST
START_TEST (test_Priority_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);
Priority_t *object =
Priority_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_PRIORITY );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( Priority_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Priority_getNamespaces(object)) == 2 );
Priority_free(object);
}
END_TEST
START_TEST (test_AlgebraicRule_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,3);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
AlgebraicRule_t *r =
AlgebraicRule_createWithNS(sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) r) == SBML_ALGEBRAIC_RULE );
fail_unless( SBase_getMetaId ((SBase_t *) r) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) r) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) r) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) r) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) r) == 3 );
fail_unless( Rule_getNamespaces ((Rule_t*)(r)) != NULL );
fail_unless( XMLNamespaces_getLength(Rule_getNamespaces((Rule_t*)(r))) == 2 );
Rule_free((Rule_t*)(r));
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_UnitDefinition_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
UnitDefinition_t *object =
UnitDefinition_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_UNIT_DEFINITION );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( UnitDefinition_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(
UnitDefinition_getNamespaces(object)) == 2 );
UnitDefinition_free(object);
}
END_TEST
START_TEST (test_ModifierSpeciesReference_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
SBase_t *object = (SBase_t *) SpeciesReference_createModifierWithNS(sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_MODIFIER_SPECIES_REFERENCE );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( SpeciesReference_getNamespaces ((SpeciesReference_t *) object) != NULL );
const XMLNamespaces_t *n = SpeciesReference_getNamespaces((SpeciesReference_t *) object);
fail_unless( XMLNamespaces_getLength( n ) == 2 );
SpeciesReference_free((SpeciesReference_t *) object);
}
END_TEST
START_TEST (test_Species_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Species_t *object =
Species_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_SPECIES );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( Species_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Species_getNamespaces(object)) == 2 );
Species_free(object);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_EventAssignment_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
EventAssignment_t *object =
EventAssignment_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_EVENT_ASSIGNMENT );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( EventAssignment_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(
EventAssignment_getNamespaces(object)) == 2 );
EventAssignment_free(object);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_Constraint_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,2);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Constraint_t *object =
Constraint_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_CONSTRAINT );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 2 );
fail_unless( Constraint_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Constraint_getNamespaces(object)) == 2 );
Constraint_free(object);
}
END_TEST
START_TEST (test_Compartment_createWith)
{
Compartment_t *c = Compartment_create(2, 4);
Compartment_setId(c, "A");
fail_unless( SBase_getTypeCode ((SBase_t *) c) == SBML_COMPARTMENT );
fail_unless( SBase_getMetaId ((SBase_t *) c) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) c) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) c) == NULL );
fail_unless( Compartment_getName(c) == NULL );
fail_unless( Compartment_getSpatialDimensions(c) == 3 );
fail_unless( !strcmp( Compartment_getId (c), "A" ) );
fail_unless( Compartment_getConstant(c) == 1 );
fail_unless( Compartment_isSetId (c) );
fail_unless( !Compartment_isSetName (c) );
Compartment_free(c);
}
END_TEST
START_TEST (test_Compartment_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Compartment_t *c =
Compartment_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) c) == SBML_COMPARTMENT );
fail_unless( SBase_getMetaId ((SBase_t *) c) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) c) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) c) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) c) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) c) == 1 );
fail_unless( Compartment_getNamespaces (c) != NULL );
fail_unless( XMLNamespaces_getLength(Compartment_getNamespaces(c)) == 2 );
fail_unless( Compartment_getName(c) == NULL );
fail_unless( Compartment_getSpatialDimensions(c) == 3 );
fail_unless( Compartment_getConstant(c) == 1 );
Compartment_free(c);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_L3_Species_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);
Species_t *s =
Species_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) s) == SBML_SPECIES );
fail_unless( SBase_getMetaId ((SBase_t *) s) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) s) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) s) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) s) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) s) == 1 );
fail_unless( Species_getNamespaces (s) != NULL );
fail_unless( XMLNamespaces_getLength(Species_getNamespaces(s)) == 2 );
fail_unless( Species_getId (s) == NULL );
fail_unless( Species_getName (s) == NULL );
fail_unless( Species_getCompartment (s) == NULL );
fail_unless( util_isNaN(Species_getInitialAmount (s)) );
fail_unless( util_isNaN(Species_getInitialConcentration (s)) );
fail_unless( Species_getSubstanceUnits (s) == NULL );
fail_unless( Species_getHasOnlySubstanceUnits(s) == 0 );
fail_unless( Species_getBoundaryCondition(s) == 0 );
fail_unless( Species_getConstant(s) == 0 );
fail_unless( Species_getConversionFactor (s) == NULL );
fail_unless( !Species_isSetId (s) );
fail_unless( !Species_isSetName (s) );
fail_unless( !Species_isSetCompartment (s) );
fail_unless( !Species_isSetInitialAmount (s) );
fail_unless( !Species_isSetInitialConcentration (s) );
fail_unless( !Species_isSetSubstanceUnits (s) );
fail_unless( !Species_isSetHasOnlySubstanceUnits(s) );
fail_unless( !Species_isSetBoundaryCondition(s) );
fail_unless( !Species_isSetConstant(s) );
fail_unless( !Species_isSetConversionFactor (s) );
Species_free(s);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_L3_Model_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);
Model_t *m =
Model_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) m) == SBML_MODEL );
fail_unless( SBase_getMetaId ((SBase_t *) m) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) m) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) m) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) m) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) m) == 1 );
fail_unless( Model_getNamespaces (m) != NULL );
fail_unless( XMLNamespaces_getLength(Model_getNamespaces(m)) == 2 );
fail_unless( Model_getId (m) == NULL );
fail_unless( Model_getName (m) == NULL );
fail_unless( Model_getSubstanceUnits(m) == NULL );
fail_unless( Model_getTimeUnits(m) == NULL );
fail_unless( Model_getVolumeUnits(m) == NULL );
fail_unless( Model_getAreaUnits(m) == NULL );
fail_unless( Model_getLengthUnits(m) == NULL );
fail_unless( Model_getConversionFactor(m) == NULL );
fail_unless( !Model_isSetId (m) );
fail_unless( !Model_isSetName (m) );
fail_unless( !Model_isSetSubstanceUnits(m) );
fail_unless( !Model_isSetTimeUnits(m) );
fail_unless( !Model_isSetVolumeUnits(m) );
fail_unless( !Model_isSetAreaUnits(m) );
fail_unless( !Model_isSetLengthUnits(m) );
fail_unless( !Model_isSetConversionFactor(m) );
Model_free(m);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
BEGIN_C_DECLS
START_TEST (test_ListOf_create)
{
ListOf_t *lo = (ListOf_t*) ListOf_create(2,4);
fail_unless( SBase_getTypeCode ((SBase_t *) lo) == SBML_LIST_OF );
fail_unless( SBase_getNotes ((SBase_t *) lo) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) lo) == NULL );
fail_unless( SBase_getMetaId ((SBase_t *) lo) == NULL );
fail_unless( ListOf_size(lo) == 0 );
ListOf_free(lo);
}
END_TEST
//START_TEST (test_UnitDefinition_createWith)
//{
// UnitDefinition_t *ud = UnitDefinition_createWith("mmls", "");
//
//
// fail_unless( SBase_getTypeCode ((SBase_t *) ud) == SBML_UNIT_DEFINITION );
// fail_unless( SBase_getMetaId ((SBase_t *) ud) == NULL );
// fail_unless( SBase_getNotes ((SBase_t *) ud) == NULL );
// fail_unless( SBase_getAnnotation((SBase_t *) ud) == NULL );
//
// fail_unless( UnitDefinition_getName(ud) == NULL );
//
// fail_unless( !strcmp(UnitDefinition_getId(ud), "mmls") );
// fail_unless(UnitDefinition_isSetId(ud));
//
// fail_unless(UnitDefinition_getNumUnits(ud) == 0);
//
// UnitDefinition_free(ud);
//}
//END_TEST
START_TEST (test_UnitDefinition_createWithName)
{
UnitDefinition_t *ud = UnitDefinition_create(2, 4);
UnitDefinition_setName(ud, "mmol_per_liter_per_sec");
fail_unless( SBase_getTypeCode ((SBase_t *) ud) == SBML_UNIT_DEFINITION );
fail_unless( SBase_getMetaId ((SBase_t *) ud) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) ud) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) ud) == NULL );
fail_unless( UnitDefinition_getId(ud) == NULL );
fail_unless( !strcmp(UnitDefinition_getName(ud), "mmol_per_liter_per_sec"),
NULL );
fail_unless(UnitDefinition_isSetName(ud));
fail_unless(UnitDefinition_getNumUnits(ud) == 0);
UnitDefinition_free(ud);
}
END_TEST
START_TEST (test_SBMLDocument_createWith)
{
SBMLDocument_t *d = SBMLDocument_createWithLevelAndVersion(1, 2);
fail_unless( SBase_getTypeCode ((SBase_t *) d) == SBML_DOCUMENT );
fail_unless( SBase_getNotes ((SBase_t *) d) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) d) == NULL );
fail_unless( SBMLDocument_getLevel (d) == 1);
fail_unless( SBMLDocument_getVersion(d) == 2);
fail_unless( SBMLDocument_getNumErrors (d) == 0 );
SBMLDocument_free(d);
}
END_TEST
START_TEST (test_L3_SpeciesReference_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);
SpeciesReference_t *sr =
SpeciesReference_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) sr) == SBML_SPECIES_REFERENCE );
fail_unless( SBase_getMetaId ((SBase_t *) sr) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) sr) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) sr) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) sr) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) sr) == 1 );
fail_unless( SpeciesReference_getNamespaces (sr) != NULL );
fail_unless( XMLNamespaces_getLength(SpeciesReference_getNamespaces(sr)) == 2 );
fail_unless( SpeciesReference_getId (sr) == NULL );
fail_unless( SpeciesReference_getName (sr) == NULL );
fail_unless( SpeciesReference_getSpecies (sr) == NULL );
fail_unless( util_isNaN(SpeciesReference_getStoichiometry (sr)) );
fail_unless( SpeciesReference_getConstant(sr) == 0 );
fail_unless( !SpeciesReference_isSetId (sr) );
fail_unless( !SpeciesReference_isSetName (sr) );
fail_unless( !SpeciesReference_isSetSpecies (sr) );
fail_unless( !SpeciesReference_isSetStoichiometry (sr) );
fail_unless( !SpeciesReference_isSetConstant(sr) );
SpeciesReference_free(sr);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
LIBSBML_CPP_NAMESPACE_USE
BEGIN_C_DECLS
START_TEST (test_SBMLDocument_create)
{
SBMLDocument_t *d = SBMLDocument_create();
fail_unless( SBase_getTypeCode ((SBase_t *) d) == SBML_DOCUMENT );
fail_unless( SBase_getNotes ((SBase_t *) d) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) d) == NULL );
fail_unless( SBMLDocument_getLevel (d) == 3);
fail_unless( SBMLDocument_getVersion(d) == 1);
fail_unless( SBMLDocument_getNumErrors (d) == 0 );
SBMLDocument_free(d);
}
END_TEST
START_TEST (test_L3_Parameter_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);
Parameter_t *p =
Parameter_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) p) == SBML_PARAMETER );
fail_unless( SBase_getMetaId ((SBase_t *) p) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) p) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) p) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) p) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) p) == 1 );
fail_unless( Parameter_getNamespaces (p) != NULL );
fail_unless( XMLNamespaces_getLength(Parameter_getNamespaces(p)) == 2 );
fail_unless( Parameter_getId (p) == NULL );
fail_unless( Parameter_getName (p) == NULL );
fail_unless( Parameter_getUnits (p) == NULL );
fail_unless( isnan(Parameter_getValue(p)));
fail_unless( Parameter_getConstant(p) == 1 );
fail_unless( !Parameter_isSetId (p) );
fail_unless( !Parameter_isSetName (p) );
fail_unless( !Parameter_isSetValue (p) );
fail_unless( !Parameter_isSetUnits (p) );
fail_unless( !Parameter_isSetConstant(p) );
Parameter_free(p);
}
END_TEST
//START_TEST (test_SpeciesReference_createWith)
//{
// SpeciesReference_t *sr = SpeciesReference_createWithSpeciesAndStoichiometry("s3", 4, 2);
//
//
// fail_unless( SBase_getTypeCode ((SBase_t *) sr) == SBML_SPECIES_REFERENCE );
// fail_unless( SBase_getMetaId ((SBase_t *) sr) == NULL );
// fail_unless( SBase_getNotes ((SBase_t *) sr) == NULL );
// fail_unless( SBase_getAnnotation((SBase_t *) sr) == NULL );
//
// fail_unless( !strcmp(SpeciesReference_getSpecies(sr), "s3") );
//
// fail_unless( SpeciesReference_getStoichiometry(sr) == 4 );
// fail_unless( SpeciesReference_getDenominator (sr) == 2 );
//
// fail_unless( SpeciesReference_isSetSpecies(sr) );
//
// SpeciesReference_free(sr);
//}
//END_TEST
START_TEST (test_SpeciesReference_createModifier)
{
SpeciesReference_t *sr =
SpeciesReference_createModifier(2, 4);
fail_unless( SBase_getTypeCode ((SBase_t *) sr) == SBML_MODIFIER_SPECIES_REFERENCE );
fail_unless( SBase_getMetaId ((SBase_t *) sr) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) sr) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) sr) == NULL );
fail_unless( SpeciesReference_isModifier(sr));
SpeciesReference_free(sr);
}
END_TEST
START_TEST (test_L3_Event_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);
Event_t *e =
Event_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) e) == SBML_EVENT );
fail_unless( SBase_getMetaId ((SBase_t *) e) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) e) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) e) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) e) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) e) == 1 );
fail_unless( Event_getNamespaces (e) != NULL );
fail_unless( XMLNamespaces_getLength(Event_getNamespaces(e)) == 2 );
fail_unless( Event_getId (e) == NULL );
fail_unless( Event_getName (e) == NULL );
fail_unless( Event_getUseValuesFromTriggerTime(e) == 1 );
fail_unless( !Event_isSetId (e) );
fail_unless( !Event_isSetName (e) );
fail_unless( !Event_isSetUseValuesFromTriggerTime(e) );
Event_free(e);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
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);
}
END_TEST
START_TEST (test_FunctionDefinition_createWith)
{
ASTNode_t *math = SBML_parseFormula("lambda(x, x^3)");
FunctionDefinition_t *fd =
FunctionDefinition_create(2, 4);
FunctionDefinition_setId(fd, "pow3");
FunctionDefinition_setMath(fd, math);
const ASTNode_t * math1;
char * formula;
fail_unless( SBase_getTypeCode((SBase_t *) fd) == SBML_FUNCTION_DEFINITION );
fail_unless( SBase_getMetaId ((SBase_t *) fd) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) fd) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) fd) == NULL );
fail_unless( FunctionDefinition_getName(fd) == NULL );
math1 = FunctionDefinition_getMath(fd);
fail_unless( math1 != NULL );
formula = SBML_formulaToString(math1);
fail_unless( formula != NULL );
fail_unless( !strcmp(formula, "lambda(x, x^3)") );
fail_unless( FunctionDefinition_getMath(fd) != math );
fail_unless( FunctionDefinition_isSetMath(fd) );
fail_unless( !strcmp(FunctionDefinition_getId(fd), "pow3") );
fail_unless( FunctionDefinition_isSetId(fd) );
ASTNode_free(math);
safe_free(formula);
FunctionDefinition_free(fd);
}
END_TEST
//START_TEST (test_RateRule_createWithFormula)
//{
// const ASTNode_t *math;
// char *formula;
//
// Rule_t *ar = Rule_createRateWithVariableAndFormula("s", "1 + 1");
//
//
// fail_unless( SBase_getTypeCode ((SBase_t *) ar) == SBML_RATE_RULE );
// fail_unless( SBase_getMetaId ((SBase_t *) ar) == NULL );
// fail_unless( !strcmp(Rule_getVariable(ar), "s") );
//
// math = Rule_getMath((Rule_t *) ar);
// fail_unless(math != NULL);
//
// formula = SBML_formulaToString(math);
// fail_unless( formula != NULL );
// fail_unless( !strcmp(formula, "1 + 1") );
//
// fail_unless( !strcmp(Rule_getFormula((Rule_t *) ar), formula) );
//
// Rule_free(ar);
// safe_free(formula);
//}
//END_TEST
//START_TEST (test_RateRule_createWithMath)
//{
// ASTNode_t *math = SBML_parseFormula("1 + 1");
//
// Rule_t *ar = Rule_createRateWithVariableAndMath("s", math);
//
//
// fail_unless( SBase_getTypeCode ((SBase_t *) ar) == SBML_RATE_RULE );
// fail_unless( SBase_getMetaId ((SBase_t *) ar) == NULL );
// fail_unless( !strcmp(Rule_getVariable(ar), "s") );
// fail_unless( !strcmp(Rule_getFormula((Rule_t *) ar), "1 + 1") );
// fail_unless( Rule_getMath((Rule_t *) ar) != math );
//
// Rule_free(ar);
//}
//END_TEST
START_TEST (test_RateRule_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Rule_t *object =
Rule_createRateWithNS(sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_RATE_RULE );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( Rule_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Rule_getNamespaces(object)) == 2 );
Rule_free(object);
}
