COPASI API  4.16.103
test000014.cpp
Go to the documentation of this file.
1 // Begin CVS Header
2 // $Source: /Volumes/Home/Users/shoops/cvs/copasi_dev/copasi/sbml/unittests/test000014.cpp,v $
3 // $Revision: 1.6 $
4 // $Name: $
5 // $Author: gauges $
6 // $Date: 2010/03/11 11:52:00 $
7 // End CVS Header
8 
9 // Copyright (C) 2010 by Pedro Mendes, Virginia Tech Intellectual
10 // Properties, Inc., University of Heidelberg, and The University
11 // of Manchester.
12 // All rights reserved.
13 
14 // Copyright (C) 2008 by Pedro Mendes, Virginia Tech Intellectual
15 // Properties, Inc., EML Research, gGmbH, University of Heidelberg,
16 // and The University of Manchester.
17 // All rights reserved.
18 
19 #include "test000014.hpp"
20 
21 #include <sstream>
22 #include "utilities.hpp"
24 
25 #include "sbml/SBMLDocument.h"
26 #include "sbml/Model.h"
27 #include "sbml/Rule.h"
28 #include "sbml/Species.h"
29 #include "sbml/Parameter.h"
30 #include "sbml/math/ASTNode.h"
31 
33 
34 CCopasiDataModel* test000014::pCOPASIDATAMODEL = NULL;
35 
36 void test000014::setUp()
37 {
38  // Create the root container.
39  CCopasiRootContainer::init(0, NULL, false);
40  // Create the global data model.
41  pCOPASIDATAMODEL = CCopasiRootContainer::addDatamodel();
42 }
43 
44 void test000014::tearDown()
45 {
47 }
48 
49 void test000014::test_references_to_species()
50 {
51  // load the CPS file
52  // export to SBML
53  // check the resulting SBML model
54  CCopasiDataModel* pDataModel = pCOPASIDATAMODEL;
55  std::istringstream iss(test000014::MODEL_STRING);
56  CPPUNIT_ASSERT(load_cps_model_from_stream(iss, *pDataModel) == true);
57  CPPUNIT_ASSERT(pDataModel->getModel() != NULL);
58  CPPUNIT_ASSERT(pDataModel->exportSBMLToString(NULL, 2, 3).empty() == false);
59  SBMLDocument* pDocument = pDataModel->getCurrentSBMLDocument();
60  CPPUNIT_ASSERT(pDocument != NULL);
61  Model* pModel = pDocument->getModel();
62  CPPUNIT_ASSERT(pModel != NULL);
63  // assert that there is only one compartment and
64  // assert the compartment is constant
65  CPPUNIT_ASSERT(pModel->getNumCompartments() == 1);
66  Compartment* pCompartment = pModel->getCompartment(0);
67  CPPUNIT_ASSERT(pCompartment->getConstant() == false);
68  CPPUNIT_ASSERT(pModel->getNumSpecies() == 2);
69  Species* pSpecies = pModel->getSpecies(1);
70  CPPUNIT_ASSERT(pSpecies->getHasOnlySubstanceUnits() == true);
71  pSpecies = pModel->getSpecies(0);
72  std::string idSpeciesA = pSpecies->getId();
73  CPPUNIT_ASSERT(pSpecies->getHasOnlySubstanceUnits() == true);
74  CPPUNIT_ASSERT(pModel->getNumRules() == 1);
75  CPPUNIT_ASSERT(pModel->getNumInitialAssignments() == 1);
76  InitialAssignment* pAssignment = pModel->getInitialAssignment(0);
77  CPPUNIT_ASSERT(pAssignment != NULL);
78  CPPUNIT_ASSERT(pModel->getNumParameters() == 1);
79  Parameter* pParameter = pModel->getParameter(0);
80  CPPUNIT_ASSERT(pParameter != NULL);
81  CPPUNIT_ASSERT(pAssignment->getSymbol() == pParameter->getId());
82  const ASTNode* pMath = pAssignment->getMath();
83  CPPUNIT_ASSERT(pMath != NULL);
84  // the expression should be the species divided by the initial volume
85  CPPUNIT_ASSERT(pMath->getType() == AST_DIVIDE);
86  CPPUNIT_ASSERT(pMath->getNumChildren() == 2);
87  CPPUNIT_ASSERT(pMath->getChild(0) != NULL);
88  CPPUNIT_ASSERT(pMath->getChild(0)->getType() == AST_NAME);
89  CPPUNIT_ASSERT(pMath->getChild(0)->getName() == pSpecies->getId());
90  CPPUNIT_ASSERT(pMath->getChild(1) != NULL);
91  CPPUNIT_ASSERT(pMath->getChild(1)->getType() == AST_NAME);
92  CPPUNIT_ASSERT(pMath->getChild(1)->getName() == pCompartment->getId());
93  CPPUNIT_ASSERT(pModel->getNumReactions() == 2);
94  Reaction* pReaction = pModel->getReaction(0);
95  // make sure this is reaction A ->
96  CPPUNIT_ASSERT(pReaction != NULL);
97  CPPUNIT_ASSERT(pReaction->getNumReactants() == 1);
98  CPPUNIT_ASSERT(pReaction->getNumProducts() == 0);
99  // check if all references in the kinetic law are unmodified
100  // math element must be a multiplication of the mass action term by
101  // the compartment volume
102  // the mass action term is a multiplication of the parameter node by
103  // the species node
104  CPPUNIT_ASSERT(pReaction->isSetKineticLaw() == true);
105  KineticLaw* pLaw = pReaction->getKineticLaw();
106  CPPUNIT_ASSERT(pLaw != NULL);
107  CPPUNIT_ASSERT(pLaw->isSetMath() == true);
108  pMath = pLaw->getMath();
109  CPPUNIT_ASSERT(pMath->getType() == AST_TIMES);
110  CPPUNIT_ASSERT(pMath->getNumChildren() == 2);
111  CPPUNIT_ASSERT(pMath->getChild(0) != NULL);
112  CPPUNIT_ASSERT(pMath->getChild(0)->getType() == AST_NAME);
113  CPPUNIT_ASSERT(pMath->getChild(0)->getName() == std::string("k1"));
114  CPPUNIT_ASSERT(pMath->getChild(1) != NULL);
115  CPPUNIT_ASSERT(pMath->getChild(1)->getType() == AST_NAME);
116  CPPUNIT_ASSERT(pMath->getChild(1)->getName() == idSpeciesA);
117 
118  pReaction = pModel->getReaction(1);
119  // make sure this is reaction A -> S
120  CPPUNIT_ASSERT(pReaction != NULL);
121  CPPUNIT_ASSERT(pReaction->getNumReactants() == 1);
122  CPPUNIT_ASSERT(pReaction->getNumProducts() == 1);
123  // check if all references in the kinetic law are unmodified
124  // math element must be a multiplication of the compartments volume with
125  // a function call with three arguments
126  // the first argument is the reference to the species
127  CPPUNIT_ASSERT(pReaction->isSetKineticLaw() == true);
128  pLaw = pReaction->getKineticLaw();
129  CPPUNIT_ASSERT(pLaw != NULL);
130  CPPUNIT_ASSERT(pLaw->isSetMath() == true);
131  pMath = pLaw->getMath();
132  CPPUNIT_ASSERT(pMath->getType() == AST_TIMES);
133  CPPUNIT_ASSERT(pMath->getNumChildren() == 2);
134  CPPUNIT_ASSERT(pMath->getChild(0)->getType() == AST_NAME);
135  CPPUNIT_ASSERT(pMath->getChild(0)->getName() == pCompartment->getId());
136  pMath = pMath->getChild(1);
137  CPPUNIT_ASSERT(pMath != NULL);
138  CPPUNIT_ASSERT(pMath->getType() == AST_FUNCTION);
139  CPPUNIT_ASSERT(pMath->getNumChildren() == 3);
140  pMath = pMath->getChild(0);
141  CPPUNIT_ASSERT(pMath != NULL);
142  CPPUNIT_ASSERT(pMath->getType() == AST_DIVIDE);
143  CPPUNIT_ASSERT(pMath->getNumChildren() == 2);
144  CPPUNIT_ASSERT(pMath->getChild(0) != NULL);
145  CPPUNIT_ASSERT(pMath->getChild(0)->getType() == AST_NAME);
146  CPPUNIT_ASSERT(pMath->getChild(0)->getName() == idSpeciesA);
147  CPPUNIT_ASSERT(pMath->getChild(1) != NULL);
148  CPPUNIT_ASSERT(pMath->getChild(1)->getType() == AST_NAME);
149  CPPUNIT_ASSERT(pMath->getChild(1)->getName() == pCompartment->getId());
150 }
151 
152 const char* test000014::MODEL_STRING =
153  "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
154  "<!-- generated with COPASI 4.3.25 (Debug) (http://www.copasi.org) at 2008-02-15 09:39:08 UTC -->\n"
155  "<COPASI xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\" xsi:noNamespaceSchemaLocation=\"http://www.copasi.org/static/schema.xsd\" versionMajor=\"1\" versionMinor=\"0\" versionDevel=\"25\">\n"
156  " <ListOfFunctions>\n"
157  " <Function key=\"Function_8\" name=\"Henri-Michaelis-Menten (irreversible)\" type=\"PreDefined\" reversible=\"false\">\n"
158  " <Expression>\n"
159  " V*substrate/(Km+substrate)\n"
160  " </Expression>\n"
161  " <ListOfParameterDescriptions>\n"
162  " <ParameterDescription key=\"FunctionParameter_41\" name=\"substrate\" order=\"0\" role=\"substrate\"/>\n"
163  " <ParameterDescription key=\"FunctionParameter_30\" name=\"Km\" order=\"1\" role=\"constant\"/>\n"
164  " <ParameterDescription key=\"FunctionParameter_45\" name=\"V\" order=\"2\" role=\"constant\"/>\n"
165  " </ListOfParameterDescriptions>\n"
166  " </Function>\n"
167  " <Function key=\"Function_13\" name=\"Mass action (irreversible)\" type=\"MassAction\" reversible=\"false\">\n"
168  " <Expression>\n"
169  " k1*PRODUCT&lt;substrate_i&gt;\n"
170  " </Expression>\n"
171  " <ListOfParameterDescriptions>\n"
172  " <ParameterDescription key=\"FunctionParameter_81\" name=\"k1\" order=\"0\" role=\"constant\"/>\n"
173  " <ParameterDescription key=\"FunctionParameter_79\" name=\"substrate\" order=\"1\" role=\"substrate\"/>\n"
174  " </ListOfParameterDescriptions>\n"
175  " </Function>\n"
176  " </ListOfFunctions>\n"
177  " <Model key=\"Model_1\" name=\"New Model\" timeUnit=\"s\" volumeUnit=\"ml\" quantityUnit=\"#\" type=\"deterministic\">\n"
178  " <Comment>\n"
179  " <html xmlns=\"http://www.w3.org/1999/xhtml\"><head><meta name=\"qrichtext\" content=\"1\" /></head><body style=\"font-size:13pt;font-family:Lucida Grande\">\n"
180  "<p>Model with variable volume compartment,# quantity units and a reference to the species initial concentration.</p>\n"
181  "<p>On export this should create an SBML file with the hasOnlySubstanceUnits flag on the species set.</p>\n"
182  "<p>The reference in the initial assignment should be divided by the initial volume of the compartment, the references in the reactions should be divided by the volume.</p>\n"
183  "</body></html>\n"
184  " </Comment>\n"
185  " <ListOfCompartments>\n"
186  " <Compartment key=\"Compartment_0\" name=\"compartment\" simulationType=\"assignment\">\n"
187  " <Expression>\n"
188  " 3+4\n"
189  " </Expression>\n"
190  " </Compartment>\n"
191  " </ListOfCompartments>\n"
192  " <ListOfMetabolites>\n"
193  " <Metabolite key=\"Metabolite_0\" name=\"A\" simulationType=\"reactions\" compartment=\"Compartment_0\">\n"
194  " </Metabolite>\n"
195  " <Metabolite key=\"Metabolite_1\" name=\"S\" simulationType=\"reactions\" compartment=\"Compartment_0\">\n"
196  " </Metabolite>\n"
197  " </ListOfMetabolites>\n"
198  " <ListOfModelValues>\n"
199  " <ModelValue key=\"ModelValue_0\" name=\"K\" simulationType=\"fixed\">\n"
200  " <InitialExpression>\n"
201  " &lt;CN=Root,Model=New Model,Vector=Compartments[compartment],Vector=Metabolites[A],Reference=InitialConcentration&gt;\n"
202  " </InitialExpression>\n"
203  " </ModelValue>\n"
204  " </ListOfModelValues>\n"
205  " <ListOfReactions>\n"
206  " <Reaction key=\"Reaction_0\" name=\"reaction\" reversible=\"false\">\n"
207  " <ListOfSubstrates>\n"
208  " <Substrate metabolite=\"Metabolite_0\" stoichiometry=\"1\"/>\n"
209  " </ListOfSubstrates>\n"
210  " <ListOfConstants>\n"
211  " <Constant key=\"Parameter_93\" name=\"k1\" value=\"0.1\"/>\n"
212  " </ListOfConstants>\n"
213  " <KineticLaw function=\"Function_13\">\n"
214  " <ListOfCallParameters>\n"
215  " <CallParameter functionParameter=\"FunctionParameter_81\">\n"
216  " <SourceParameter reference=\"Parameter_93\"/>\n"
217  " </CallParameter>\n"
218  " <CallParameter functionParameter=\"FunctionParameter_79\">\n"
219  " <SourceParameter reference=\"Metabolite_0\"/>\n"
220  " </CallParameter>\n"
221  " </ListOfCallParameters>\n"
222  " </KineticLaw>\n"
223  " </Reaction>\n"
224  " <Reaction key=\"Reaction_1\" name=\"reaction_1\" reversible=\"false\">\n"
225  " <ListOfSubstrates>\n"
226  " <Substrate metabolite=\"Metabolite_0\" stoichiometry=\"1\"/>\n"
227  " </ListOfSubstrates>\n"
228  " <ListOfProducts>\n"
229  " <Product metabolite=\"Metabolite_1\" stoichiometry=\"1\"/>\n"
230  " </ListOfProducts>\n"
231  " <ListOfConstants>\n"
232  " <Constant key=\"Parameter_92\" name=\"Km\" value=\"0.1\"/>\n"
233  " <Constant key=\"Parameter_91\" name=\"V\" value=\"0.1\"/>\n"
234  " </ListOfConstants>\n"
235  " <KineticLaw function=\"Function_8\">\n"
236  " <ListOfCallParameters>\n"
237  " <CallParameter functionParameter=\"FunctionParameter_41\">\n"
238  " <SourceParameter reference=\"Metabolite_0\"/>\n"
239  " </CallParameter>\n"
240  " <CallParameter functionParameter=\"FunctionParameter_30\">\n"
241  " <SourceParameter reference=\"Parameter_92\"/>\n"
242  " </CallParameter>\n"
243  " <CallParameter functionParameter=\"FunctionParameter_45\">\n"
244  " <SourceParameter reference=\"Parameter_91\"/>\n"
245  " </CallParameter>\n"
246  " </ListOfCallParameters>\n"
247  " </KineticLaw>\n"
248  " </Reaction>\n"
249  " </ListOfReactions>\n"
250  " <StateTemplate>\n"
251  " <StateTemplateVariable objectReference=\"Model_1\"/>\n"
252  " <StateTemplateVariable objectReference=\"Metabolite_0\"/>\n"
253  " <StateTemplateVariable objectReference=\"Metabolite_1\"/>\n"
254  " <StateTemplateVariable objectReference=\"Compartment_0\"/>\n"
255  " <StateTemplateVariable objectReference=\"ModelValue_0\"/>\n"
256  " </StateTemplate>\n"
257  " <InitialState type=\"initialState\">\n"
258  " 0 7 0.7000000000000001 7 1\n"
259  " </InitialState>\n"
260  " </Model>\n"
261  "</COPASI>\n"
262  ;
SBMLDocument * getCurrentSBMLDocument()
std::string exportSBMLToString(CProcessReport *pExportHandler, int sbmlLevel, int sbmlVersion)
bool load_cps_model_from_stream(std::istream &is, CCopasiDataModel &dataModel)
Definition: utilities.cpp:21
static CCopasiDataModel * addDatamodel()
static void init(int argc, char *argv[], const bool &withGui=false)