Reconstruction of the action potential of ventricular myocardial fibres

Generated code

• The required array sizes are:
  • VARIABLES[26]
  • CONSTANTS[10]
  • BOUND[1]
  • RATES[8]
• The following variables are defined:
  • Variable m(RATES[0] and VARIABLES[0])
  • Variable alpha_m(VARIABLES[8]; recomputed after rate changes)
  • Variable beta_m(VARIABLES[9]; recomputed after rate changes)
  • Variable h(RATES[1] and VARIABLES[1])
  • Variable alpha_h(VARIABLES[10]; recomputed after rate changes)
  • Variable beta_h(VARIABLES[11]; recomputed after rate changes)
  • Variable j(RATES[2] and VARIABLES[2])
  • Variable alpha_j(VARIABLES[12]; recomputed after rate changes)
  • Variable beta_j(VARIABLES[13]; recomputed after rate changes)
  • Variable i_s(VARIABLES[14]; recomputed after rate changes)
  • Variable g_s(CONSTANTS[0])
  • Variable E_s(VARIABLES[15]; recomputed after rate changes)
  • Variable Cai(RATES[3] and VARIABLES[3])
  • Variable d(RATES[4] and VARIABLES[4])
  • Variable alpha_d(VARIABLES[16]; recomputed after rate changes)
  • Variable beta_d(VARIABLES[17]; recomputed after rate changes)
  • Variable f(RATES[5] and VARIABLES[5])
  • Variable time(BOUND[0])
  • Variable V(RATES[6] and VARIABLES[6])
  • Variable C(CONSTANTS[1])
  • Variable i_Na(VARIABLES[18]; recomputed after rate changes)
  • Variable g_Na(CONSTANTS[2])
  • Variable E_Na(CONSTANTS[3])
  • Variable g_Nac(CONSTANTS[4])
  • Variable alpha_f(VARIABLES[19]; recomputed after rate changes)
  • Variable beta_f(VARIABLES[20]; recomputed after rate changes)
  • Variable i_x1(VARIABLES[21]; recomputed after rate changes)
  • Variable x1(RATES[7] and VARIABLES[7])
  • Variable alpha_x1(VARIABLES[22]; recomputed after rate changes)
  • Variable beta_x1(VARIABLES[23]; recomputed after rate changes)
  • Variable i_K1(VARIABLES[24]; recomputed after rate changes)
  • Variable Istim(VARIABLES[25]; recomputed after rate changes)
  • Variable IstimStart(CONSTANTS[5])
  • Variable IstimEnd(CONSTANTS[6])
  • Variable IstimAmplitude(CONSTANTS[7])
  • Variable IstimPeriod(CONSTANTS[8])
  • Variable IstimPulseDuration(CONSTANTS[9])
• No equation needed for Newton-Raphson evaluation.

void SetupFixedConstants(double* CONSTANTS)
{
CONSTANTS[0] = 0.0009;
CONSTANTS[1] = 0.01;
CONSTANTS[2] = 0.04;
CONSTANTS[3] = 50;
CONSTANTS[4] = 3e-05;
CONSTANTS[5] = 10;
CONSTANTS[6] = 50000;
CONSTANTS[7] = 0.5;
CONSTANTS[8] = 1000;
CONSTANTS[9] = 1;
}

void SetupComputedConstants(double* CONSTANTS, double* VARIABLES)
{
VARIABLES[0] = 0.011;
VARIABLES[1] = 0.988;
VARIABLES[2] = 0.975;
VARIABLES[3] = 0.0001;
VARIABLES[4] = 0.003;
VARIABLES[5] = 0.994;
VARIABLES[6] = -84.624;
VARIABLES[7] = 0.0001;
}

void ComputeRates(double* BOUND, double* RATES, double* CONSTANTS, double* VARIABLES)
{
RATES[6] = ((VARIABLES[25]-(VARIABLES[18]+VARIABLES[14]+VARIABLES[21]+VARIABLES[24]))/CONSTANTS[1]);
RATES[0] = ((VARIABLES[8]*(1.00000-VARIABLES[0]))-(VARIABLES[9]*VARIABLES[0]));
RATES[1] = ((VARIABLES[10]*(1.00000-VARIABLES[1]))-(VARIABLES[11]*VARIABLES[1]));
RATES[2] = ((VARIABLES[12]*(1.00000-VARIABLES[2]))-(VARIABLES[13]*VARIABLES[2]));
RATES[3] = ((((-0.0100000)*VARIABLES[14])/1.00000)+(0.0700000*(0.000100000-VARIABLES[3])));
RATES[4] = ((VARIABLES[16]*(1.00000-VARIABLES[4]))-(VARIABLES[17]*VARIABLES[4]));
RATES[5] = ((VARIABLES[19]*(1.00000-VARIABLES[5]))-(VARIABLES[20]*VARIABLES[5]));
RATES[7] = ((VARIABLES[22]*(1.00000-VARIABLES[7]))-(VARIABLES[23]*VARIABLES[7]));
}

void ComputeVariables(double* BOUND, double* RATES, double* CONSTANTS, double* VARIABLES)
{
VARIABLES[10] = (0.126000*exp(((-0.250000)*(VARIABLES[6]+77.0000))));
VARIABLES[9] = (40.0000*exp(((-0.0560000)*(VARIABLES[6]+72.0000))));
VARIABLES[8] = (((-1.00000)*(VARIABLES[6]+47.0000))/(exp(((-0.100000)*(VARIABLES[6]+47.0000)))-1.00000));
VARIABLES[20] = ((0.00650000*exp(((-(VARIABLES[6]+30.0000))/50.0000)))/(1.00000+exp(((-(VARIABLES[6]+30.0000))/5.00000))));
VARIABLES[21] = ((VARIABLES[7]*0.00800000*(exp((0.0400000*(VARIABLES[6]+77.0000)))-1.00000))/exp((0.0400000*(VARIABLES[6]+35.0000))));
VARIABLES[22] = ((0.000500000*exp(((VARIABLES[6]+50.0000)/12.1000)))/(1.00000+exp(((VARIABLES[6]+50.0000)/17.5000))));
VARIABLES[23] = ((0.00130000*exp(((-(VARIABLES[6]+20.0000))/16.6700)))/(1.00000+exp(((-(VARIABLES[6]+20.0000))/25.0000))));
VARIABLES[24] = (0.00350000*(((4.00000*(exp((0.0400000*(VARIABLES[6]+85.0000)))-1.00000))/(exp((0.0800000*(VARIABLES[6]+53.0000)))+exp((0.0400000*(VARIABLES[6]+53.0000)))))+((0.200000*(VARIABLES[6]+23.0000))/(1.00000-exp(((-0.0400000)*(VARIABLES[6]+23.0000)))))));
VARIABLES[25] = ((((BOUND[0]>=CONSTANTS[5]))&&((BOUND[0]<=CONSTANTS[6]))&&((((BOUND[0]-CONSTANTS[5])-(floor(((BOUND[0]-CONSTANTS[5])/CONSTANTS[8]))*CONSTANTS[8]))<=CONSTANTS[9])))) ? (CONSTANTS[7]) : (0.00000);
VARIABLES[11] = (1.70000/(exp(((-0.0820000)*(VARIABLES[6]+22.5000)))+1.00000));
VARIABLES[12] = ((0.0550000*exp(((-0.250000)*(VARIABLES[6]+78.0000))))/(exp(((-0.200000)*(VARIABLES[6]+78.0000)))+1.00000));
VARIABLES[13] = (0.300000/(exp(((-0.100000)*(VARIABLES[6]+32.0000)))+1.00000));
VARIABLES[15] = ((-82.3000)-(13.0287*log((VARIABLES[3]*0.00100000))));
VARIABLES[14] = (CONSTANTS[0]*VARIABLES[4]*VARIABLES[5]*(VARIABLES[6]-VARIABLES[15]));
VARIABLES[16] = ((0.0950000*exp(((-(VARIABLES[6]-5.00000))/100.000)))/(1.00000+exp(((-(VARIABLES[6]-5.00000))/13.8900))));
VARIABLES[17] = ((0.0700000*exp(((-(VARIABLES[6]+44.0000))/59.0000)))/(1.00000+exp(((VARIABLES[6]+44.0000)/20.0000))));
VARIABLES[18] = (((CONSTANTS[2]*pow(VARIABLES[0],3.00000)*VARIABLES[1]*VARIABLES[2])+CONSTANTS[4])*(VARIABLES[6]-CONSTANTS[3]));
VARIABLES[19] = ((0.0120000*exp(((-(VARIABLES[6]+28.0000))/125.000)))/(1.00000+exp(((VARIABLES[6]+28.0000)/6.67000))));
#ifndef VARIABLES_FOR_RATES_ONLY
#endif
}