END_TEST START_TEST (test_UnitDefinition_setName) { char *name = "mmol_per_liter_per_sec"; UnitDefinition_setName(UD, name); fail_unless( !strcmp(UnitDefinition_getName(UD), name) ); fail_unless( UnitDefinition_isSetName(UD) ); if (UnitDefinition_getName(UD) == name) { fail("UnitDefinition_setName(...) did not make a copy of string."); } /* Reflexive case (pathological) */ UnitDefinition_setName(UD, UnitDefinition_getName(UD)); fail_unless( !strcmp(UnitDefinition_getName(UD), name) ); UnitDefinition_setName(UD, NULL); fail_unless( !UnitDefinition_isSetName(UD) ); if (UnitDefinition_getName(UD) != NULL) { fail("UnitDefinition_setName(R, NULL) did not clear string."); } }
END_TEST START_TEST (test_UnitDefinition_setName1) { int i = UnitDefinition_setName(UD, "mmls"); fail_unless( i == LIBSBML_OPERATION_SUCCESS); fail_unless( !strcmp(UnitDefinition_getName(UD), "mmls") ); fail_unless( UnitDefinition_isSetName(UD) ); i = UnitDefinition_setName(UD, NULL); fail_unless( i == LIBSBML_OPERATION_SUCCESS); fail_unless( !UnitDefinition_isSetName(UD) ); i = UnitDefinition_setName(UD, "123"); fail_unless( i == LIBSBML_OPERATION_SUCCESS); fail_unless( UnitDefinition_isSetName(UD) ); }
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_create_l1v1_units) { Model_t *m; Compartment_t *c; KineticLaw_t *kl; Parameter_t *p; Reaction_t *r; Species_t *s; SpeciesReference_t *sr; Unit_t *u; UnitDefinition_t *ud; /** * <sbml level="1" version="1"> */ m = Model_create(2, 4); /** * <unitDefinition name="substance"> * <listOfUnits> * <unit kind="mole" scale="-3"/> * </listOfUnits> * </unitDefinition> */ ud = Model_createUnitDefinition(m); UnitDefinition_setName(ud, "substance"); u = Model_createUnit(m); Unit_setKind(u,UNIT_KIND_MOLE); Unit_setScale(u, -3); /** * <unitDefinition name="mls"> * <listOfUnits> * <unit kind="mole" scale="-3"/> * <unit kind="liter" exponent="-1"/> * <unit kind="second" exponent="-1"/> * </listOfUnits> * </unitDefinition> */ ud = Model_createUnitDefinition(m); UnitDefinition_setName(ud, "mls"); u = Model_createUnit(m); Unit_setKind(u, UNIT_KIND_MOLE); Unit_setScale(u, -3); u = Model_createUnit(m); Unit_setKind(u, UNIT_KIND_LITER); Unit_setExponent(u, -1); u = Model_createUnit(m); Unit_setKind(u, UNIT_KIND_SECOND); Unit_setExponent(u, -1); /** * <listOfCompartments> * <compartment name="cell"/> * </listOfCompartments> */ c = Model_createCompartment(m); Compartment_setName(c, "cell"); /** * <listOfSpecies> * <specie name="x0" compartment="cell" initialAmount="1"/> * <specie name="x1" compartment="cell" initialAmount="1"/> * <specie name="s1" compartment="cell" initialAmount="1"/> * <specie name="s2" compartment="cell" initialAmount="1"/> * </listOfSpecies> */ s = Model_createSpecies(m); Species_setName(s, "x0"); Species_setCompartment(s, "cell"); Species_setInitialAmount(s, 1); s = Model_createSpecies(m); Species_setName(s, "x1"); Species_setCompartment(s, "cell"); Species_setInitialAmount(s, 1); s = Model_createSpecies(m); Species_setName(s, "s1"); Species_setCompartment(s, "cell"); Species_setInitialAmount(s, 1); s = Model_createSpecies(m); Species_setName(s, "s2"); Species_setCompartment(s, "cell"); Species_setInitialAmount(s, 1); /** * <listOfParameters> * <parameter name="vm" value="2" units="mls"/> * <parameter name="km" value="2"/> * </listOfParameters> */ p = Model_createParameter(m); Parameter_setName (p, "vm"); Parameter_setUnits(p, "mls"); Parameter_setValue(p, 2); p = Model_createParameter(m); Parameter_setName (p, "km"); Parameter_setValue(p, 2); /** * <reaction name="v1"> * <listOfReactants> * <specieReference specie="x0"/> * </listOfReactants> * <listOfProducts> * <specieReference specie="s1"/> * </listOfProducts> * <kineticLaw formula="(vm * s1)/(km + s1)"/> * </reaction> */ r = Model_createReaction(m); Reaction_setName(r, "v1"); sr = Model_createReactant(m); SpeciesReference_setSpecies(sr, "x0"); sr = Model_createProduct(m); SpeciesReference_setSpecies(sr, "s1"); kl = Model_createKineticLaw(m); KineticLaw_setFormula(kl, "(vm * s1)/(km + s1)"); /** * <reaction name="v2"> * <listOfReactants> * <specieReference specie="s1"/> * </listOfReactants> * <listOfProducts> * <specieReference specie="s2"/> * </listOfProducts> * <kineticLaw formula="(vm * s2)/(km + s2)"/> * </reaction> */ r = Model_createReaction(m); Reaction_setName(r, "v2"); sr = Model_createReactant(m); SpeciesReference_setSpecies(sr, "s1"); sr = Model_createProduct(m); SpeciesReference_setSpecies(sr, "s2"); kl = Model_createKineticLaw(m); KineticLaw_setFormula(kl, "(vm * s2)/(km + s2)"); /** * <reaction name="v3"> * <listOfReactants> * <specieReference specie="s2"/> * </listOfReactants> * <listOfProducts> * <specieReference specie="x1"/> * </listOfProducts> * <kineticLaw formula="(vm * s1)/(km + s1)"/> * </reaction> */ r = Model_createReaction(m); Reaction_setName(r, "v3"); sr = Model_createReactant(m); SpeciesReference_setSpecies(sr, "s2"); sr = Model_createProduct(m); SpeciesReference_setSpecies(sr, "x1"); kl = Model_createKineticLaw(m); KineticLaw_setFormula(kl, "(vm * s1)/(km + s1)"); Model_free(m); }