Rendering of the source text
/*
There are a total of 0 entries in the algebraic variable array.
There are a total of 5 entries in each of the rate and state variable arrays.
There are a total of 15 entries in the constant variable array.
*/
/*
* VOI is time in component environment (second).
* STATES[0] is x in component x (dimensionless).
* CONSTANTS[0] is r1 in component x (rate).
* CONSTANTS[1] is r2 in component x (rate).
* CONSTANTS[2] is c1 in component x (rate).
* STATES[1] is z in component z (dimensionless).
* STATES[2] is y in component y (dimensionless).
* CONSTANTS[3] is r3 in component y (rate).
* CONSTANTS[4] is r4 in component y (rate).
* CONSTANTS[5] is c2 in component y (rate).
* CONSTANTS[6] is c3 in component y (rate).
* CONSTANTS[7] is epsilon in component model_constants (dimensionless).
* STATES[3] is u in component u (dimensionless).
* CONSTANTS[8] is r5 in component z (rate).
* CONSTANTS[9] is r6 in component z (rate).
* CONSTANTS[10] is r7 in component z (rate).
* CONSTANTS[11] is z_ in component z (dimensionless).
* CONSTANTS[12] is y_ in component z (dimensionless).
* CONSTANTS[13] is delta in component z (dimensionless).
* CONSTANTS[14] is omega in component u (rate).
* STATES[4] is v in component u (dimensionless).
* RATES[0] is d/dt x in component x (dimensionless).
* RATES[2] is d/dt y in component y (dimensionless).
* RATES[1] is d/dt z in component z (dimensionless).
* RATES[3] is d/dt u in component u (dimensionless).
* RATES[4] is d/dt v in component u (dimensionless).
*/
void
initConsts(double* CONSTANTS, double* RATES, double *STATES)
{
STATES[0] = 5;
CONSTANTS[0] = 0.15;
CONSTANTS[1] = 0.12;
CONSTANTS[2] = 0.1;
STATES[1] = 1;
STATES[2] = 0;
CONSTANTS[3] = 0.05;
CONSTANTS[4] = 0.03;
CONSTANTS[5] = 0.1;
CONSTANTS[6] = 0.005;
CONSTANTS[7] = 0.1;
STATES[3] = 1;
CONSTANTS[8] = 0.09;
CONSTANTS[9] = 0.1;
CONSTANTS[10] = 0.05;
CONSTANTS[11] = 1.01;
CONSTANTS[12] = 1.08;
CONSTANTS[13] = 0.01;
CONSTANTS[14] = 0.05;
STATES[4] = 0;
}
void
computeRates(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
RATES[0] = STATES[1]*( CONSTANTS[0]*STATES[2]+ - CONSTANTS[1]*STATES[0]+CONSTANTS[2]);
RATES[2] = CONSTANTS[7]*(CONSTANTS[3]/STATES[1]+ - CONSTANTS[4]*STATES[0]+CONSTANTS[5]+ CONSTANTS[6]*STATES[3]);
RATES[1] = CONSTANTS[7]*CONSTANTS[13]*( CONSTANTS[8]*(STATES[2] - CONSTANTS[12])*(CONSTANTS[11] - STATES[1])+ CONSTANTS[9]*STATES[1]*(CONSTANTS[11] - STATES[1]) - CONSTANTS[10]*STATES[1]);
RATES[3] = - CONSTANTS[14]*STATES[4];
RATES[4] = CONSTANTS[14]*STATES[3];
}
void
computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
}
- Model Curation
-
-
Curation Status
-
JSim
-
COR
-
OpenCell
-
Curation Status
- Source
- Derived from workspace Lenbury, Ruktamatakul, Amornsamarnkul, 2001 at changeset 6df6db26d30d.
- License
-
This work is licensed under a Creative Commons Attribution 3.0 Unported License.

