Generated Code
The following is c_ida code generated by the CellML API from this CellML file. (Back to language selection)
The raw code is available.
/*
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 13 entries in the constant variable array.
*/
/*
* VOI is time in component environment (hour).
* STATES[0] is Y in component Y (dimensionless).
* CONSTANTS[0] is C1 in component model_parameters (dimensionless).
* CONSTANTS[1] is k1 in component model_parameters (first_order_rate_constant).
* STATES[1] is P in component P (dimensionless).
* CONSTANTS[2] is K in component model_parameters (dimensionless).
* CONSTANTS[3] is C in component model_parameters (dimensionless).
* CONSTANTS[4] is C2 in component model_parameters (dimensionless).
* CONSTANTS[5] is k2 in component model_parameters (first_order_rate_constant).
* CONSTANTS[6] is ky in component model_parameters (first_order_rate_constant).
* STATES[2] is X in component X (dimensionless).
* CONSTANTS[7] is k3 in component model_parameters (first_order_rate_constant).
* CONSTANTS[8] is k4 in component model_parameters (first_order_rate_constant).
* STATES[3] is Z in component Z (dimensionless).
* CONSTANTS[9] is C3 in component model_parameters (dimensionless).
* CONSTANTS[10] is k5 in component model_parameters (first_order_rate_constant).
* CONSTANTS[11] is K2 in component model_parameters (dimensionless).
* STATES[4] is IL6 in component IL6 (dimensionless).
* CONSTANTS[12] is k6 in component model_parameters (first_order_rate_constant).
* RATES[0] is d/dt Y in component Y (dimensionless).
* RATES[2] is d/dt X in component X (dimensionless).
* RATES[1] is d/dt P in component P (dimensionless).
* RATES[3] is d/dt Z in component Z (dimensionless).
* RATES[4] is d/dt IL6 in component IL6 (dimensionless).
* There are a total of 32 condition variables.
*/
void
initConsts(double* CONSTANTS, double* RATES, double *STATES)
{
STATES[0] = 10.0;
CONSTANTS[0] = 1.0;
CONSTANTS[1] = 1.0;
STATES[1] = 10.0;
CONSTANTS[2] = 5.0;
CONSTANTS[3] = 50.0;
CONSTANTS[4] = 1.0;
CONSTANTS[5] = 1.3;
CONSTANTS[6] = 0.01;
STATES[2] = 500.0;
CONSTANTS[7] = 0.05;
CONSTANTS[8] = 0.9;
STATES[3] = 200.0;
CONSTANTS[9] = 1.0;
CONSTANTS[10] = 5.0;
CONSTANTS[11] = 2.0;
STATES[4] = 1.9;
CONSTANTS[12] = 0.02;
RATES[0] = 0.1001;
RATES[2] = 0.1001;
RATES[1] = 0.1001;
RATES[3] = 0.1001;
RATES[4] = 0.1001;
}
void
computeResiduals(double VOI, double* CONSTANTS, double* RATES, double* OLDRATES, double* STATES,
double* OLDSTATES, double* ALGEBRAIC, double* CONDVARS)
{
resid[0] = RATES[0] - CONSTANTS[1]*CONSTANTS[0]*(STATES[1]/(CONSTANTS[2]+STATES[1]))*CONSTANTS[3] - ( CONSTANTS[5]*CONSTANTS[4]*(1.00000 - STATES[1]/(CONSTANTS[2]+STATES[1]))*STATES[0]+ CONSTANTS[6]*STATES[0]);
resid[1] = RATES[2] - CONSTANTS[5]*CONSTANTS[4]*(1.00000 - STATES[1]/(CONSTANTS[2]+STATES[1]))*STATES[0] - CONSTANTS[7]*STATES[2];
resid[2] = RATES[1] - (CONDVAR[0]>=0.00000&&CONDVAR[1]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[2]>=0.00000&&CONDVAR[3]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : CONDVAR[4]>=0.00000&&CONDVAR[5]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[6]>=0.00000&&CONDVAR[7]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : CONDVAR[8]>=0.00000&&CONDVAR[9]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[10]>=0.00000&&CONDVAR[11]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : CONDVAR[12]>=0.00000&&CONDVAR[13]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[14]>=0.00000&&CONDVAR[15]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : CONDVAR[16]>=0.00000&&CONDVAR[17]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[18]>=0.00000&&CONDVAR[19]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : CONDVAR[20]>=0.00000&&CONDVAR[21]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[22]>=0.00000&&CONDVAR[23]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : CONDVAR[24]>=0.00000&&CONDVAR[25]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[26]>=0.00000&&CONDVAR[27]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : CONDVAR[28]>=0.00000&&CONDVAR[29]<0.00000 ? 10.0000 - CONSTANTS[8]*STATES[1] : CONDVAR[30]>=0.00000&&CONDVAR[31]<0.00000 ? - ( CONSTANTS[8]*STATES[1]) : 0.0/0.0);
resid[3] = RATES[3] - CONSTANTS[10]*CONSTANTS[9]*(STATES[4]/(CONSTANTS[11]+STATES[4])) - CONSTANTS[12]*STATES[3];
resid[4] = RATES[4] - 0.100000*STATES[2] - 10.0000*STATES[4];
}
void
computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
}
void
computeEssentialVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
}
void
getStateInformation(double* SI)
{
SI[0] = 1.0;
SI[1] = 1.0;
SI[2] = 1.0;
SI[3] = 1.0;
SI[4] = 1.0;
}
void
computeRoots(double VOI, double* CONSTANTS, double* RATES, double* OLDRATES, double* STATES,
double* OLDSTATES, double* ALGEBRAIC, double* CONDVARS)
{
CONDVAR[0] = VOI - 0.00000;
CONDVAR[1] = VOI - 6.00000;
CONDVAR[2] = VOI - 6.00000;
CONDVAR[3] = VOI - 12.0000;
CONDVAR[4] = VOI - 12.0000;
CONDVAR[5] = VOI - 18.0000;
CONDVAR[6] = VOI - 18.0000;
CONDVAR[7] = VOI - 24.0000;
CONDVAR[8] = VOI - 24.0000;
CONDVAR[9] = VOI - 30.0000;
CONDVAR[10] = VOI - 30.0000;
CONDVAR[11] = VOI - 36.0000;
CONDVAR[12] = VOI - 36.0000;
CONDVAR[13] = VOI - 42.0000;
CONDVAR[14] = VOI - 42.0000;
CONDVAR[15] = VOI - 48.0000;
CONDVAR[16] = VOI - 48.0000;
CONDVAR[17] = VOI - 54.0000;
CONDVAR[18] = VOI - 54.0000;
CONDVAR[19] = VOI - 60.0000;
CONDVAR[20] = VOI - 60.0000;
CONDVAR[21] = VOI - 66.0000;
CONDVAR[22] = VOI - 66.0000;
CONDVAR[23] = VOI - 72.0000;
CONDVAR[24] = VOI - 72.0000;
CONDVAR[25] = VOI - 78.0000;
CONDVAR[26] = VOI - 78.0000;
CONDVAR[27] = VOI - 84.0000;
CONDVAR[28] = VOI - 84.0000;
CONDVAR[29] = VOI - 90.0000;
CONDVAR[30] = VOI - 90.0000;
CONDVAR[31] = VOI - 96.0000;
}
