Generated Code

The following is c code generated by the CellML API from this CellML file. (Back to language selection)

The raw code is available.

/*
   There are a total of 13 entries in the algebraic variable array.
   There are a total of 2 entries in each of the rate and state variable arrays.
   There are a total of 30 entries in the constant variable array.
 */
/*
 * VOI is time in component environment (millisecond).
 * ALGEBRAIC[10] is P_CE in component equations (dimensionless).
 * ALGEBRAIC[5] is P_PE in component equations (dimensionless).
 * ALGEBRAIC[6] is P_SE in component equations (dimensionless).
 * ALGEBRAIC[0] is Ca in component equations (dimensionless).
 * ALGEBRAIC[12] is C_2 in component equations (per_millisec).
 * ALGEBRAIC[1] is phi_A_1 in component equations (dimensionless).
 * ALGEBRAIC[11] is pi_n in component equations (dimensionless).
 * ALGEBRAIC[8] is A in component equations (dimensionless).
 * STATES[0] is A_1 in component equations (dimensionless).
 * ALGEBRAIC[3] is S in component equations (um).
 * ALGEBRAIC[9] is n in component equations (dimensionless).
 * ALGEBRAIC[7] is n_1 in component equations (dimensionless).
 * STATES[1] is n_2 in component equations (dimensionless).
 * CONSTANTS[27] is G_V in component equations (dimensionless).
 * CONSTANTS[26] is q_V in component equations (per_millisec).
 * CONSTANTS[25] is V in component equations (um_per_millisec).
 * CONSTANTS[28] is F_V in component equations (dimensionless).
 * CONSTANTS[29] is p_V in component equations (dimensionless).
 * CONSTANTS[0] is alpha_1 in component equations (per_um).
 * CONSTANTS[1] is alpha_2 in component equations (per_um).
 * CONSTANTS[2] is beta_1 in component equations (dimensionless).
 * CONSTANTS[3] is beta_2 in component equations (dimensionless).
 * CONSTANTS[4] is lambda in component equations (per_um).
 * CONSTANTS[5] is V_max in component equations (um_per_millisec).
 * CONSTANTS[6] is Ca_m in component equations (dimensionless).
 * CONSTANTS[7] is t_d in component equations (millisecond).
 * CONSTANTS[8] is a_c in component equations (per_millisec2).
 * CONSTANTS[9] is b_c in component equations (per_millisec2).
 * CONSTANTS[10] is C_1 in component equations (per_millisec).
 * CONSTANTS[11] is C_20 in component equations (per_millisec).
 * CONSTANTS[12] is q_k in component equations (dimensionless).
 * CONSTANTS[24] is V_1 in component equations (um_per_millisec).
 * CONSTANTS[13] is a in component equations (dimensionless).
 * CONSTANTS[14] is m_0 in component equations (dimensionless).
 * CONSTANTS[15] is g_1 in component equations (per_um).
 * CONSTANTS[16] is g_2 in component equations (dimensionless).
 * CONSTANTS[17] is pi_min in component equations (dimensionless).
 * CONSTANTS[18] is S_0 in component equations (um).
 * CONSTANTS[19] is q_1 in component equations (per_millisec).
 * CONSTANTS[20] is q_2 in component equations (per_millisec).
 * CONSTANTS[21] is q_3 in component equations (per_millisec).
 * CONSTANTS[22] is TnC in component equations (dimensionless).
 * ALGEBRAIC[2] is l_1 in component user_defined (um).
 * ALGEBRAIC[4] is l_2 in component user_defined (um).
 * CONSTANTS[23] is dl_1_dt in component user_defined (um_per_millisec).
 * RATES[0] is d/dt A_1 in component equations (dimensionless).
 * RATES[1] is d/dt n_2 in component equations (dimensionless).
 */
void
initConsts(double* CONSTANTS, double* RATES, double *STATES)
{
STATES[0] = 0;
STATES[1] = 0;
CONSTANTS[0] = 14.6;
CONSTANTS[1] = 14.6;
CONSTANTS[2] = 1;
CONSTANTS[3] = 0.0012;
CONSTANTS[4] = 30;
CONSTANTS[5] = 0.0043;
CONSTANTS[6] = 45e-3;
CONSTANTS[7] = 170;
CONSTANTS[8] = 2.4e-4;
CONSTANTS[9] = 5e-4;
CONSTANTS[10] = 2.9e-2;
CONSTANTS[11] = 0.2;
CONSTANTS[12] = 4;
CONSTANTS[13] = 0.25;
CONSTANTS[14] = 0.87;
CONSTANTS[15] = 0.4;
CONSTANTS[16] = 0.6;
CONSTANTS[17] = 5e-2;
CONSTANTS[18] = 0.77;
CONSTANTS[19] = 0.017;
CONSTANTS[20] = 0.26;
CONSTANTS[21] = 0.03;
CONSTANTS[22] = 1;
CONSTANTS[23] = 0.00000;
CONSTANTS[24] =  0.100000*CONSTANTS[5];
CONSTANTS[25] = - CONSTANTS[23];
CONSTANTS[26] = (CONSTANTS[25]<=0.00000 ? CONSTANTS[19] - ( CONSTANTS[20]*CONSTANTS[25])/CONSTANTS[5] : CONSTANTS[21]);
CONSTANTS[27] = 1.00000+( 0.600000*CONSTANTS[25])/CONSTANTS[5];
CONSTANTS[28] = ( CONSTANTS[13]*(1.00000+CONSTANTS[25]/CONSTANTS[5]))/(CONSTANTS[13] - CONSTANTS[25]/CONSTANTS[5]);
CONSTANTS[29] = CONSTANTS[28]/CONSTANTS[27];
}
void
computeRates(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
RATES[1] =  CONSTANTS[26]*( CONSTANTS[14]*CONSTANTS[27] - STATES[1]);
ALGEBRAIC[0] = (VOI<=CONSTANTS[7] ?  CONSTANTS[6]*pow(1.00000 - exp( - CONSTANTS[8]*pow(VOI, 2.00000)), 2.00000) :  CONSTANTS[6]*pow( (1.00000 - exp( - CONSTANTS[8]*pow(VOI, 2.00000)))*exp( - CONSTANTS[9]*pow(VOI - CONSTANTS[7], 2.00000)), 2.00000));
ALGEBRAIC[1] = exp( - CONSTANTS[12]*STATES[0]);
ALGEBRAIC[2] = (200.000<=VOI&&VOI<=201.000 ? 0.00000 : 0.00000);
ALGEBRAIC[7] = ( CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16]<0.00000 ? 0.00000 : 0.00000<= CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16]&& CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16]<=1.00000 ?  CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16] : 1.00000);
ALGEBRAIC[9] =  ALGEBRAIC[7]*STATES[1];
ALGEBRAIC[11] = (0.750000<=ALGEBRAIC[9]&&ALGEBRAIC[9]<=1.00000 ? CONSTANTS[17] : 0.250000<=ALGEBRAIC[9]&&ALGEBRAIC[9]<0.750000 ? pow(CONSTANTS[17],  2.00000*ALGEBRAIC[9] - 0.500000) : 1.00000);
RATES[0] =  CONSTANTS[10]*ALGEBRAIC[0]*(CONSTANTS[22] - STATES[0]) -  CONSTANTS[11]*ALGEBRAIC[11]*ALGEBRAIC[1]*STATES[0];
}
void
computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
ALGEBRAIC[0] = (VOI<=CONSTANTS[7] ?  CONSTANTS[6]*pow(1.00000 - exp( - CONSTANTS[8]*pow(VOI, 2.00000)), 2.00000) :  CONSTANTS[6]*pow( (1.00000 - exp( - CONSTANTS[8]*pow(VOI, 2.00000)))*exp( - CONSTANTS[9]*pow(VOI - CONSTANTS[7], 2.00000)), 2.00000));
ALGEBRAIC[1] = exp( - CONSTANTS[12]*STATES[0]);
ALGEBRAIC[2] = (200.000<=VOI&&VOI<=201.000 ? 0.00000 : 0.00000);
ALGEBRAIC[7] = ( CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16]<0.00000 ? 0.00000 : 0.00000<= CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16]&& CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16]<=1.00000 ?  CONSTANTS[15]*ALGEBRAIC[2]+CONSTANTS[16] : 1.00000);
ALGEBRAIC[9] =  ALGEBRAIC[7]*STATES[1];
ALGEBRAIC[11] = (0.750000<=ALGEBRAIC[9]&&ALGEBRAIC[9]<=1.00000 ? CONSTANTS[17] : 0.250000<=ALGEBRAIC[9]&&ALGEBRAIC[9]<0.750000 ? pow(CONSTANTS[17],  2.00000*ALGEBRAIC[9] - 0.500000) : 1.00000);
ALGEBRAIC[3] =  0.500000*ALGEBRAIC[2]+CONSTANTS[18];
ALGEBRAIC[4] = ALGEBRAIC[2]+1.87000;
ALGEBRAIC[5] =  CONSTANTS[3]*(exp( CONSTANTS[1]*ALGEBRAIC[4]) - 1.00000);
ALGEBRAIC[6] =  CONSTANTS[2]*(exp( CONSTANTS[0]*(ALGEBRAIC[4] - ALGEBRAIC[2])) - 1.00000);
ALGEBRAIC[8] = ( STATES[0]*ALGEBRAIC[3])/1.00000;
ALGEBRAIC[10] =  CONSTANTS[4]*ALGEBRAIC[3]*STATES[0]*ALGEBRAIC[9]*CONSTANTS[29];
ALGEBRAIC[12] =  CONSTANTS[11]*ALGEBRAIC[11]*ALGEBRAIC[1];
}