/* There are a total of 101 entries in the algebraic variable array. There are a total of 33 entries in each of the rate and state variable arrays. There are a total of 116 entries in the constant variable array. */ /* * VOI is time in component environment (second). * CONSTANTS[0] is R in component Membrane (joule_per_kilomole_kelvin). * CONSTANTS[1] is T in component Membrane (kelvin). * CONSTANTS[2] is F in component Membrane (coulomb_per_mole). * CONSTANTS[3] is C in component Membrane (microF). * CONSTANTS[91] is RTONF in component Membrane (millivolt). * ALGEBRAIC[59] is i_f in component i_f (nanoA). * ALGEBRAIC[61] is i_NaK in component i_NaK (nanoA). * ALGEBRAIC[75] is i_NaCa in component i_NaCa (nanoA). * ALGEBRAIC[79] is i_Na in component i_Na (nanoA). * ALGEBRAIC[89] is i_Kr in component i_Kr (nanoA). * ALGEBRAIC[95] is i_Ks in component i_Ks (nanoA). * ALGEBRAIC[87] is i_to in component i_to (nanoA). * ALGEBRAIC[83] is i_CaL in component i_CaL (nanoA). * ALGEBRAIC[84] is i_CaT in component i_CaT (nanoA). * ALGEBRAIC[98] is i_KACh in component i_KACh (nanoA). * ALGEBRAIC[85] is i_Kur in component i_Kur (nanoA). * ALGEBRAIC[9] is V in component Membrane (millivolt). * CONSTANTS[4] is clamp_mode in component Membrane (dimensionless). * ALGEBRAIC[5] is V_clamp in component Voltage_clamp (millivolt). * STATES[0] is V_ode in component Membrane (millivolt). * ALGEBRAIC[100] is i_tot in component Membrane (nanoA). * CONSTANTS[5] is t_holding in component Voltage_clamp (second). * CONSTANTS[6] is t_test in component Voltage_clamp (second). * CONSTANTS[7] is V_test in component Voltage_clamp (millivolt). * CONSTANTS[8] is V_holding in component Voltage_clamp (millivolt). * CONSTANTS[9] is ACh in component Rate_modulation_experiments (millimolar). * CONSTANTS[10] is Iso_1_uM in component Rate_modulation_experiments (dimensionless). * ALGEBRAIC[18] is Nai in component Nai_concentration (millimolar). * CONSTANTS[11] is Nao in component Ionic_values (millimolar). * CONSTANTS[12] is Ki in component Ionic_values (millimolar). * CONSTANTS[13] is Ko in component Ionic_values (millimolar). * STATES[1] is Ca_sub in component Ca_dynamics (millimolar). * CONSTANTS[14] is Cao in component Ionic_values (millimolar). * ALGEBRAIC[36] is E_Na in component Ionic_values (millivolt). * CONSTANTS[96] is E_K in component Ionic_values (millivolt). * ALGEBRAIC[0] is E_Ca in component Ionic_values (millivolt). * CONSTANTS[110] is V_sub in component Cell_parameters (millimetre3). * CONSTANTS[112] is V_i in component Cell_parameters (millimetre3). * ALGEBRAIC[49] is i_fNa in component i_f (nanoA). * ALGEBRAIC[82] is i_siNa in component i_CaL (nanoA). * STATES[2] is Nai_ in component Nai_concentration (millimolar). * CONSTANTS[15] is Nai_clamp in component Nai_concentration (dimensionless). * ALGEBRAIC[55] is i_fK in component i_f (nanoA). * CONSTANTS[16] is g_f in component i_f (microS). * CONSTANTS[92] is G_f in component i_f (microS). * CONSTANTS[103] is g_f_Na in component i_f (microS). * CONSTANTS[100] is G_f_Na in component i_f (microS). * CONSTANTS[101] is g_f_K in component i_f (microS). * CONSTANTS[97] is G_f_K in component i_f (microS). * CONSTANTS[17] is Km_f in component i_f (millimolar). * CONSTANTS[18] is alpha in component i_f (dimensionless). * STATES[3] is y in component i_f_y_gate (dimensionless). * CONSTANTS[19] is blockade in component i_f (dimensionless). * ALGEBRAIC[10] is tau_y in component i_f_y_gate (second). * ALGEBRAIC[29] is y_infinity in component i_f_y_gate (dimensionless). * CONSTANTS[95] is ACh_shift in component i_f_y_gate (millivolt). * CONSTANTS[99] is Iso_shift in component i_f_y_gate (millivolt). * CONSTANTS[20] is y_shift in component i_f_y_gate (millivolt). * CONSTANTS[21] is Km_Kp in component i_NaK (millimolar). * CONSTANTS[22] is Km_Nap in component i_NaK (millimolar). * CONSTANTS[23] is i_NaK_max in component i_NaK (nanoA). * CONSTANTS[102] is Iso_increase in component i_NaK (dimensionless). * CONSTANTS[24] is K_NaCa in component i_NaCa (nanoA). * ALGEBRAIC[72] is x1 in component i_NaCa (dimensionless). * ALGEBRAIC[68] is x2 in component i_NaCa (dimensionless). * ALGEBRAIC[73] is x3 in component i_NaCa (dimensionless). * ALGEBRAIC[74] is x4 in component i_NaCa (dimensionless). * ALGEBRAIC[63] is k41 in component i_NaCa (dimensionless). * CONSTANTS[104] is k34 in component i_NaCa (dimensionless). * ALGEBRAIC[71] is k23 in component i_NaCa (dimensionless). * ALGEBRAIC[70] is k21 in component i_NaCa (dimensionless). * ALGEBRAIC[67] is k32 in component i_NaCa (dimensionless). * ALGEBRAIC[62] is k43 in component i_NaCa (dimensionless). * ALGEBRAIC[65] is k12 in component i_NaCa (dimensionless). * ALGEBRAIC[66] is k14 in component i_NaCa (dimensionless). * CONSTANTS[25] is Qci in component i_NaCa (dimensionless). * CONSTANTS[26] is Qn in component i_NaCa (dimensionless). * CONSTANTS[27] is Qco in component i_NaCa (dimensionless). * CONSTANTS[28] is K3ni in component i_NaCa (millimolar). * CONSTANTS[29] is Kci in component i_NaCa (millimolar). * CONSTANTS[30] is K1ni in component i_NaCa (millimolar). * CONSTANTS[31] is K2ni in component i_NaCa (millimolar). * CONSTANTS[32] is Kcni in component i_NaCa (millimolar). * CONSTANTS[33] is K3no in component i_NaCa (millimolar). * CONSTANTS[34] is K1no in component i_NaCa (millimolar). * CONSTANTS[35] is K2no in component i_NaCa (millimolar). * CONSTANTS[36] is Kco in component i_NaCa (millimolar). * ALGEBRAIC[69] is do in component i_NaCa (dimensionless). * ALGEBRAIC[64] is di in component i_NaCa (dimensionless). * CONSTANTS[37] is blockade_NaCa in component i_NaCa (dimensionless). * ALGEBRAIC[77] is i_Na_ in component i_Na (nanoA). * ALGEBRAIC[78] is i_Na_L in component i_Na (nanoA). * CONSTANTS[38] is g_Na in component i_Na (microS). * CONSTANTS[39] is g_Na_L in component i_Na (microS). * ALGEBRAIC[76] is E_mh in component i_Na (millivolt). * STATES[4] is m in component i_Na_m_gate (dimensionless). * STATES[5] is h in component i_Na_h_gate (dimensionless). * ALGEBRAIC[46] is alpha_m in component i_Na_m_gate (per_second). * ALGEBRAIC[52] is beta_m in component i_Na_m_gate (per_second). * ALGEBRAIC[11] is m_infinity in component i_Na_m_gate (dimensionless). * ALGEBRAIC[57] is tau_m in component i_Na_m_gate (second). * CONSTANTS[40] is delta_m in component i_Na_m_gate (millivolt). * ALGEBRAIC[30] is E0_m in component i_Na_m_gate (millivolt). * ALGEBRAIC[31] is alpha_h in component i_Na_h_gate (per_second). * ALGEBRAIC[47] is beta_h in component i_Na_h_gate (per_second). * ALGEBRAIC[12] is h_infinity in component i_Na_h_gate (dimensionless). * ALGEBRAIC[53] is tau_h in component i_Na_h_gate (second). * ALGEBRAIC[80] is i_siCa in component i_CaL (nanoA). * ALGEBRAIC[81] is i_siK in component i_CaL (nanoA). * CONSTANTS[106] is ACh_block in component i_CaL (dimensionless). * CONSTANTS[41] is P_CaL in component i_CaL (nanoA_per_millimolar). * STATES[6] is dL in component i_CaL_dL_gate (dimensionless). * STATES[7] is fL in component i_CaL_fL_gate (dimensionless). * STATES[8] is fCa in component i_CaL_fCa_gate (dimensionless). * CONSTANTS[105] is Iso_increase in component i_CaL (dimensionless). * ALGEBRAIC[13] is dL_infinity in component i_CaL_dL_gate (dimensionless). * ALGEBRAIC[60] is tau_dL in component i_CaL_dL_gate (second). * ALGEBRAIC[48] is alpha_dL in component i_CaL_dL_gate (per_second). * ALGEBRAIC[58] is beta_dL in component i_CaL_dL_gate (per_second). * ALGEBRAIC[32] is adVm in component i_CaL_dL_gate (millivolt). * ALGEBRAIC[54] is bdVm in component i_CaL_dL_gate (millivolt). * CONSTANTS[42] is k_dL in component i_CaL_dL_gate (millivolt). * CONSTANTS[43] is V_dL in component i_CaL_dL_gate (millivolt). * CONSTANTS[107] is Iso_shift_dL in component i_CaL_dL_gate (millivolt). * CONSTANTS[108] is Iso_slope_dL in component i_CaL_dL_gate (dimensionless). * ALGEBRAIC[14] is fL_infinity in component i_CaL_fL_gate (dimensionless). * ALGEBRAIC[33] is tau_fL in component i_CaL_fL_gate (second). * CONSTANTS[44] is shift_fL in component i_CaL_fL_gate (millivolt). * CONSTANTS[45] is k_fL in component i_CaL_fL_gate (millivolt). * CONSTANTS[46] is alpha_fCa in component i_CaL_fCa_gate (per_second). * ALGEBRAIC[1] is fCa_infinity in component i_CaL_fCa_gate (dimensionless). * ALGEBRAIC[7] is tau_fCa in component i_CaL_fCa_gate (second). * CONSTANTS[47] is Km_fCa in component i_CaL_fCa_gate (millimolar). * CONSTANTS[48] is P_CaT in component i_CaT (nanoA_per_millimolar). * STATES[9] is dT in component i_CaT_dT_gate (dimensionless). * STATES[10] is fT in component i_CaT_fT_gate (dimensionless). * ALGEBRAIC[15] is dT_infinity in component i_CaT_dT_gate (dimensionless). * ALGEBRAIC[34] is tau_dT in component i_CaT_dT_gate (second). * ALGEBRAIC[16] is fT_infinity in component i_CaT_fT_gate (dimensionless). * ALGEBRAIC[35] is tau_fT in component i_CaT_fT_gate (second). * CONSTANTS[49] is offset_fT in component i_CaT_fT_gate (second). * ALGEBRAIC[86] is j_SRCarel in component Ca_SR_release (millimolar_per_second). * STATES[11] is R in component Ca_SR_release (dimensionless). * STATES[12] is O in component Ca_SR_release (dimensionless). * STATES[13] is I in component Ca_SR_release (dimensionless). * STATES[14] is RI in component Ca_SR_release (dimensionless). * CONSTANTS[50] is ks in component Ca_SR_release (per_second). * CONSTANTS[51] is MaxSR in component Ca_SR_release (dimensionless). * CONSTANTS[52] is MinSR in component Ca_SR_release (dimensionless). * CONSTANTS[53] is EC50_SR in component Ca_SR_release (millimolar). * CONSTANTS[54] is HSR in component Ca_SR_release (dimensionless). * ALGEBRAIC[8] is koSRCa in component Ca_SR_release (per_millimolar2_second). * ALGEBRAIC[17] is kiSRCa in component Ca_SR_release (per_millimolar_second). * CONSTANTS[55] is koCa in component Ca_SR_release (per_millimolar2_second). * CONSTANTS[56] is kiCa in component Ca_SR_release (per_millimolar_second). * ALGEBRAIC[2] is kCaSR in component Ca_SR_release (dimensionless). * CONSTANTS[57] is kim in component Ca_SR_release (per_second). * CONSTANTS[58] is kom in component Ca_SR_release (per_second). * STATES[15] is Ca_jsr in component Ca_dynamics (millimolar). * ALGEBRAIC[3] is diff in component Ca_SR_release (millimolar). * ALGEBRAIC[4] is P_tot in component Ca_SR_release (dimensionless). * ALGEBRAIC[88] is j_Ca_dif in component Ca_intracellular_fluxes (millimolar_per_second). * ALGEBRAIC[91] is j_up in component Ca_intracellular_fluxes (millimolar_per_second). * ALGEBRAIC[94] is j_tr in component Ca_intracellular_fluxes (millimolar_per_second). * CONSTANTS[59] is tau_dif_Ca in component Ca_intracellular_fluxes (second). * CONSTANTS[60] is tau_tr in component Ca_intracellular_fluxes (second). * CONSTANTS[98] is P_up in component Ca_intracellular_fluxes (millimolar_per_second). * CONSTANTS[61] is P_up_basal in component Ca_intracellular_fluxes (millimolar_per_second). * CONSTANTS[93] is b_up in component Ca_intracellular_fluxes (dimensionless). * CONSTANTS[62] is K_up in component Ca_intracellular_fluxes (millimolar). * STATES[16] is Ca_nsr in component Ca_dynamics (millimolar). * STATES[17] is Cai in component Ca_dynamics (millimolar). * CONSTANTS[63] is slope_up in component Ca_intracellular_fluxes (millimolar). * CONSTANTS[64] is TC_tot in component Ca_buffering (millimolar). * CONSTANTS[65] is TMC_tot in component Ca_buffering (millimolar). * CONSTANTS[66] is CM_tot in component Ca_buffering (millimolar). * CONSTANTS[67] is CQ_tot in component Ca_buffering (millimolar). * ALGEBRAIC[93] is delta_fTC in component Ca_buffering (per_second). * ALGEBRAIC[96] is delta_fTMC in component Ca_buffering (per_second). * ALGEBRAIC[90] is delta_fCMs in component Ca_buffering (per_second). * ALGEBRAIC[99] is delta_fCMi in component Ca_buffering (per_second). * ALGEBRAIC[97] is delta_fCQ in component Ca_buffering (per_second). * ALGEBRAIC[6] is delta_fTMM in component Ca_buffering (per_second). * STATES[18] is fTMM in component Ca_buffering (dimensionless). * STATES[19] is fCMi in component Ca_buffering (dimensionless). * STATES[20] is fCMs in component Ca_buffering (dimensionless). * STATES[21] is fTC in component Ca_buffering (dimensionless). * STATES[22] is fTMC in component Ca_buffering (dimensionless). * STATES[23] is fCQ in component Ca_buffering (dimensionless). * CONSTANTS[68] is kf_TC in component Ca_buffering (per_millimolar_second). * CONSTANTS[69] is kf_TMM in component Ca_buffering (per_millimolar_second). * CONSTANTS[70] is kf_TMC in component Ca_buffering (per_millimolar_second). * CONSTANTS[71] is kf_CM in component Ca_buffering (per_millimolar_second). * CONSTANTS[72] is kf_CQ in component Ca_buffering (per_millimolar_second). * CONSTANTS[73] is kb_TC in component Ca_buffering (per_second). * CONSTANTS[74] is kb_TMC in component Ca_buffering (per_second). * CONSTANTS[75] is kb_TMM in component Ca_buffering (per_second). * CONSTANTS[76] is kb_CM in component Ca_buffering (per_second). * CONSTANTS[77] is kb_CQ in component Ca_buffering (per_second). * CONSTANTS[78] is Mgi in component Ca_buffering (millimolar). * CONSTANTS[111] is V_jsr in component Cell_parameters (millimetre3). * CONSTANTS[113] is V_nsr in component Cell_parameters (millimetre3). * CONSTANTS[109] is V_cell in component Cell_parameters (millimetre3). * CONSTANTS[79] is V_jsr_part in component Cell_parameters (dimensionless). * CONSTANTS[80] is V_i_part in component Cell_parameters (dimensionless). * CONSTANTS[81] is V_nsr_part in component Cell_parameters (dimensionless). * CONSTANTS[82] is R_cell in component Cell_parameters (micrometre). * CONSTANTS[83] is L_cell in component Cell_parameters (micrometre). * CONSTANTS[84] is L_sub in component Cell_parameters (micrometre). * CONSTANTS[85] is g_Kur in component i_Kur (microS). * STATES[24] is r_Kur in component i_Kur_rKur_gate (dimensionless). * STATES[25] is s_Kur in component i_Kur_sKur_gate (dimensionless). * ALGEBRAIC[37] is tau_r_Kur in component i_Kur_rKur_gate (second). * ALGEBRAIC[19] is r_Kur_infinity in component i_Kur_rKur_gate (dimensionless). * ALGEBRAIC[38] is tau_s_Kur in component i_Kur_sKur_gate (second). * ALGEBRAIC[20] is s_Kur_infinity in component i_Kur_sKur_gate (dimensionless). * CONSTANTS[86] is g_to in component i_to (microS). * STATES[26] is q in component i_to_q_gate (dimensionless). * STATES[27] is r in component i_to_r_gate (dimensionless). * ALGEBRAIC[21] is q_infinity in component i_to_q_gate (dimensionless). * ALGEBRAIC[39] is tau_q in component i_to_q_gate (second). * ALGEBRAIC[22] is r_infinity in component i_to_r_gate (dimensionless). * ALGEBRAIC[40] is tau_r in component i_to_r_gate (second). * CONSTANTS[87] is g_Kr in component i_Kr (microS). * STATES[28] is paS in component i_Kr_pa_gate (dimensionless). * STATES[29] is paF in component i_Kr_pa_gate (dimensionless). * STATES[30] is piy in component i_Kr_pi_gate (dimensionless). * ALGEBRAIC[23] is pa_infinity in component i_Kr_pa_gate (dimensionless). * ALGEBRAIC[24] is alfapaF in component i_Kr_pa_gate (per_second). * ALGEBRAIC[25] is betapaF in component i_Kr_pa_gate (per_second). * ALGEBRAIC[41] is tau_paS in component i_Kr_pa_gate (second). * ALGEBRAIC[42] is tau_paF in component i_Kr_pa_gate (second). * ALGEBRAIC[43] is pi_infinity in component i_Kr_pi_gate (dimensionless). * ALGEBRAIC[26] is tau_pi in component i_Kr_pi_gate (second). * CONSTANTS[94] is g_Ks in component i_Ks (microS). * CONSTANTS[88] is g_Ks_ in component i_Ks (microS). * ALGEBRAIC[92] is E_Ks in component i_Ks (millivolt). * STATES[31] is n in component i_Ks_n_gate (dimensionless). * ALGEBRAIC[27] is n_infinity in component i_Ks_n_gate (dimensionless). * ALGEBRAIC[56] is tau_n in component i_Ks_n_gate (second). * CONSTANTS[114] is Iso_shift in component i_Ks_n_gate (millivolt). * ALGEBRAIC[44] is alpha_n in component i_Ks_n_gate (per_second). * ALGEBRAIC[50] is beta_n in component i_Ks_n_gate (per_second). * CONSTANTS[89] is g_KACh in component i_KACh (microS). * STATES[32] is a in component i_KACh_a_gate (dimensionless). * CONSTANTS[90] is ACh_on in component i_KACh (dimensionless). * CONSTANTS[115] is alpha_a in component i_KACh_a_gate (per_second). * ALGEBRAIC[28] is beta_a in component i_KACh_a_gate (per_second). * ALGEBRAIC[45] is a_infinity in component i_KACh_a_gate (dimensionless). * ALGEBRAIC[51] is tau_a in component i_KACh_a_gate (second). * RATES[0] is d/dt V_ode in component Membrane (millivolt). * RATES[2] is d/dt Nai_ in component Nai_concentration (millimolar). * RATES[3] is d/dt y in component i_f_y_gate (dimensionless). * RATES[4] is d/dt m in component i_Na_m_gate (dimensionless). * RATES[5] is d/dt h in component i_Na_h_gate (dimensionless). * RATES[6] is d/dt dL in component i_CaL_dL_gate (dimensionless). * RATES[7] is d/dt fL in component i_CaL_fL_gate (dimensionless). * RATES[8] is d/dt fCa in component i_CaL_fCa_gate (dimensionless). * RATES[9] is d/dt dT in component i_CaT_dT_gate (dimensionless). * RATES[10] is d/dt fT in component i_CaT_fT_gate (dimensionless). * RATES[11] is d/dt R in component Ca_SR_release (dimensionless). * RATES[12] is d/dt O in component Ca_SR_release (dimensionless). * RATES[13] is d/dt I in component Ca_SR_release (dimensionless). * RATES[14] is d/dt RI in component Ca_SR_release (dimensionless). * RATES[21] is d/dt fTC in component Ca_buffering (dimensionless). * RATES[22] is d/dt fTMC in component Ca_buffering (dimensionless). * RATES[18] is d/dt fTMM in component Ca_buffering (dimensionless). * RATES[19] is d/dt fCMi in component Ca_buffering (dimensionless). * RATES[20] is d/dt fCMs in component Ca_buffering (dimensionless). * RATES[23] is d/dt fCQ in component Ca_buffering (dimensionless). * RATES[17] is d/dt Cai in component Ca_dynamics (millimolar). * RATES[1] is d/dt Ca_sub in component Ca_dynamics (millimolar). * RATES[16] is d/dt Ca_nsr in component Ca_dynamics (millimolar). * RATES[15] is d/dt Ca_jsr in component Ca_dynamics (millimolar). * RATES[24] is d/dt r_Kur in component i_Kur_rKur_gate (dimensionless). * RATES[25] is d/dt s_Kur in component i_Kur_sKur_gate (dimensionless). * RATES[26] is d/dt q in component i_to_q_gate (dimensionless). * RATES[27] is d/dt r in component i_to_r_gate (dimensionless). * RATES[28] is d/dt paS in component i_Kr_pa_gate (dimensionless). * RATES[29] is d/dt paF in component i_Kr_pa_gate (dimensionless). * RATES[30] is d/dt piy in component i_Kr_pi_gate (dimensionless). * RATES[31] is d/dt n in component i_Ks_n_gate (dimensionless). * RATES[32] is d/dt a in component i_KACh_a_gate (dimensionless). */ void initConsts(double* CONSTANTS, double* RATES, double *STATES) { CONSTANTS[0] = 8314.472; CONSTANTS[1] = 310; CONSTANTS[2] = 96485.3415; CONSTANTS[3] = 5.7e-5; CONSTANTS[4] = 0; STATES[0] = -47.787168; CONSTANTS[5] = 0.5; CONSTANTS[6] = 0.5; CONSTANTS[7] = -35; CONSTANTS[8] = -45; CONSTANTS[9] = 0; CONSTANTS[10] = 0; CONSTANTS[11] = 140; CONSTANTS[12] = 140; CONSTANTS[13] = 5.4; STATES[1] = 6.226104e-5; CONSTANTS[14] = 1.8; STATES[2] = 5; CONSTANTS[15] = 1; CONSTANTS[16] = 0.00427; CONSTANTS[17] = 45; CONSTANTS[18] = 0.5927; STATES[3] = 0.009508; CONSTANTS[19] = 0; CONSTANTS[20] = 0; CONSTANTS[21] = 1.4; CONSTANTS[22] = 14; CONSTANTS[23] = 0.08105; CONSTANTS[24] = 3.343; CONSTANTS[25] = 0.1369; CONSTANTS[26] = 0.4315; CONSTANTS[27] = 0; CONSTANTS[28] = 26.44; CONSTANTS[29] = 0.0207; CONSTANTS[30] = 395.3; CONSTANTS[31] = 2.289; CONSTANTS[32] = 26.44; CONSTANTS[33] = 4.663; CONSTANTS[34] = 1628; CONSTANTS[35] = 561.4; CONSTANTS[36] = 3.663; CONSTANTS[37] = 0; CONSTANTS[38] = 0.0223; CONSTANTS[39] = 0; STATES[4] = 0.447724; STATES[5] = 0.003058; CONSTANTS[40] = 1e-5; CONSTANTS[41] = 0.4578; STATES[6] = 0.001921; STATES[7] = 0.846702; STATES[8] = 0.844449; CONSTANTS[42] = 4.3371; CONSTANTS[43] = -16.4508; CONSTANTS[44] = 0; CONSTANTS[45] = 0; CONSTANTS[46] = 0.0075; CONSTANTS[47] = 0.000338; CONSTANTS[48] = 0.04132; STATES[9] = 0.268909; STATES[10] = 0.020484; CONSTANTS[49] = 0; STATES[11] = 0.9308; STATES[12] = 6.181512e-9; STATES[13] = 4.595622e-10; STATES[14] = 0.069199; CONSTANTS[50] = 148041085.1; CONSTANTS[51] = 15; CONSTANTS[52] = 1; CONSTANTS[53] = 0.45; CONSTANTS[54] = 2.5; CONSTANTS[55] = 10000; CONSTANTS[56] = 500; CONSTANTS[57] = 5; CONSTANTS[58] = 660; STATES[15] = 0.409551; CONSTANTS[59] = 5.469e-5; CONSTANTS[60] = 0.04; CONSTANTS[61] = 5; CONSTANTS[62] = 0.000286113; STATES[16] = 0.435148; STATES[17] = 9.15641e-6; CONSTANTS[63] = 5e-5; CONSTANTS[64] = 0.031; CONSTANTS[65] = 0.062; CONSTANTS[66] = 0.045; CONSTANTS[67] = 10; STATES[18] = 0.653777; STATES[19] = 0.217311; STATES[20] = 0.158521; STATES[21] = 0.017929; STATES[22] = 0.259947; STATES[23] = 0.138975; CONSTANTS[68] = 88800; CONSTANTS[69] = 2277; CONSTANTS[70] = 227700; CONSTANTS[71] = 1.642e6; CONSTANTS[72] = 175.4; CONSTANTS[73] = 446; CONSTANTS[74] = 7.51; CONSTANTS[75] = 751; CONSTANTS[76] = 542; CONSTANTS[77] = 445; CONSTANTS[78] = 2.5; CONSTANTS[79] = 0.0012; CONSTANTS[80] = 0.46; CONSTANTS[81] = 0.0116; CONSTANTS[82] = 3.9; CONSTANTS[83] = 67; CONSTANTS[84] = 0.02; CONSTANTS[85] = 0.1539e-3; STATES[24] = 0.011845; STATES[25] = 0.845304; CONSTANTS[86] = 3.5e-3; STATES[26] = 0.430836; STATES[27] = 0.014523; CONSTANTS[87] = 0.00424; STATES[28] = 0.283185; STATES[29] = 0.011068; STATES[30] = 0.709051; CONSTANTS[88] = 0.00065; STATES[31] = 0.1162; CONSTANTS[89] = 0.00345; STATES[32] = 0.00277; CONSTANTS[90] = 1; CONSTANTS[91] = ( CONSTANTS[0]*CONSTANTS[1])/CONSTANTS[2]; CONSTANTS[92] = CONSTANTS[16]/(CONSTANTS[13]/(CONSTANTS[13]+CONSTANTS[17])); CONSTANTS[93] = (CONSTANTS[10]>0.00000 ? - 0.250000 : CONSTANTS[9]>0.00000 ? ( 0.700000*CONSTANTS[9])/(9.00000e-05+CONSTANTS[9]) : 0.00000); CONSTANTS[94] = (CONSTANTS[10]>0.00000 ? 1.20000*CONSTANTS[88] : CONSTANTS[88]); CONSTANTS[95] = (CONSTANTS[9]>0.00000 ? - 1.00000 - ( 9.89800*pow( 1.00000*CONSTANTS[9], 0.618000))/(pow( 1.00000*CONSTANTS[9], 0.618000)+0.00122423) : 0.00000); CONSTANTS[96] = CONSTANTS[91]*log(CONSTANTS[13]/CONSTANTS[12]); CONSTANTS[97] = CONSTANTS[92]/(CONSTANTS[18]+1.00000); CONSTANTS[98] = CONSTANTS[61]*(1.00000 - CONSTANTS[93]); CONSTANTS[99] = (CONSTANTS[10]>0.00000 ? 7.50000 : 0.00000); CONSTANTS[100] = CONSTANTS[18]*CONSTANTS[97]; CONSTANTS[101] = ( CONSTANTS[97]*CONSTANTS[13])/(CONSTANTS[13]+CONSTANTS[17]); CONSTANTS[102] = (CONSTANTS[10]>0.00000 ? 1.20000 : 1.00000); CONSTANTS[103] = ( CONSTANTS[100]*CONSTANTS[13])/(CONSTANTS[13]+CONSTANTS[17]); CONSTANTS[104] = CONSTANTS[11]/(CONSTANTS[33]+CONSTANTS[11]); CONSTANTS[105] = (CONSTANTS[10]>0.00000 ? 1.23000 : 1.00000); CONSTANTS[106] = ( 0.310000*CONSTANTS[9])/(CONSTANTS[9]+9.00000e-05); CONSTANTS[107] = (CONSTANTS[10]>0.00000 ? - 8.00000 : 0.00000); CONSTANTS[108] = (CONSTANTS[10]>0.00000 ? - 27.0000 : 0.00000); CONSTANTS[109] = 1.00000e-09* 3.14159265358979*pow(CONSTANTS[82], 2.00000)*CONSTANTS[83]; CONSTANTS[110] = 1.00000e-09*2.00000* 3.14159265358979*CONSTANTS[84]*(CONSTANTS[82] - CONSTANTS[84]/2.00000)*CONSTANTS[83]; CONSTANTS[111] = CONSTANTS[79]*CONSTANTS[109]; CONSTANTS[112] = CONSTANTS[80]*CONSTANTS[109] - CONSTANTS[110]; CONSTANTS[113] = CONSTANTS[81]*CONSTANTS[109]; CONSTANTS[114] = (CONSTANTS[10]>0.00000 ? - 14.0000 : 0.00000); CONSTANTS[115] = (3.59880 - 0.0256410)/(1.00000+1.21550e-06/pow( 1.00000*CONSTANTS[9], 1.69510))+0.0256410; } void computeRates(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { ALGEBRAIC[6] = CONSTANTS[69]*CONSTANTS[78]*(1.00000 - (STATES[22]+STATES[18])) - CONSTANTS[75]*STATES[18]; RATES[18] = ALGEBRAIC[6]; ALGEBRAIC[1] = CONSTANTS[47]/(CONSTANTS[47]+STATES[1]); ALGEBRAIC[7] = ( 0.00100000*ALGEBRAIC[1])/CONSTANTS[46]; RATES[8] = (ALGEBRAIC[1] - STATES[8])/ALGEBRAIC[7]; ALGEBRAIC[2] = CONSTANTS[51] - (CONSTANTS[51] - CONSTANTS[52])/(1.00000+pow(CONSTANTS[53]/STATES[15], CONSTANTS[54])); ALGEBRAIC[8] = CONSTANTS[55]/ALGEBRAIC[2]; ALGEBRAIC[17] = CONSTANTS[56]*ALGEBRAIC[2]; RATES[11] = ( CONSTANTS[57]*STATES[14] - ALGEBRAIC[17]*STATES[1]*STATES[11]) - ( ALGEBRAIC[8]*pow(STATES[1], 2.00000)*STATES[11] - CONSTANTS[58]*STATES[12]); RATES[12] = ( ALGEBRAIC[8]*pow(STATES[1], 2.00000)*STATES[11] - CONSTANTS[58]*STATES[12]) - ( ALGEBRAIC[17]*STATES[1]*STATES[12] - CONSTANTS[57]*STATES[13]); RATES[13] = ( ALGEBRAIC[17]*STATES[1]*STATES[12] - CONSTANTS[57]*STATES[13]) - ( CONSTANTS[58]*STATES[13] - ALGEBRAIC[8]*pow(STATES[1], 2.00000)*STATES[14]); RATES[14] = ( CONSTANTS[58]*STATES[13] - ALGEBRAIC[8]*pow(STATES[1], 2.00000)*STATES[14]) - ( CONSTANTS[57]*STATES[14] - ALGEBRAIC[17]*STATES[1]*STATES[11]); ALGEBRAIC[5] = (VOI>CONSTANTS[5]&&VOI=1.00000 ? ALGEBRAIC[5] : STATES[0]); ALGEBRAIC[10] = 1.00000/(( 0.360000*(((ALGEBRAIC[9]+148.800) - CONSTANTS[95]) - CONSTANTS[99]))/(exp( 0.0660000*(((ALGEBRAIC[9]+148.800) - CONSTANTS[95]) - CONSTANTS[99])) - 1.00000)+( 0.100000*(((ALGEBRAIC[9]+87.3000) - CONSTANTS[95]) - CONSTANTS[99]))/(1.00000 - exp( - 0.200000*(((ALGEBRAIC[9]+87.3000) - CONSTANTS[95]) - CONSTANTS[99])))) - 0.0540000; ALGEBRAIC[29] = (ALGEBRAIC[9]<- (((80.0000 - CONSTANTS[95]) - CONSTANTS[99]) - CONSTANTS[20]) ? 0.0132900+0.999210/(1.00000+exp(((((ALGEBRAIC[9]+97.1340) - CONSTANTS[95]) - CONSTANTS[99]) - CONSTANTS[20])/8.17520)) : 0.000250100*exp(- (((ALGEBRAIC[9] - CONSTANTS[95]) - CONSTANTS[99]) - CONSTANTS[20])/12.8610)); RATES[3] = (ALGEBRAIC[29] - STATES[3])/ALGEBRAIC[10]; ALGEBRAIC[14] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+37.4000+CONSTANTS[44])/(5.30000+CONSTANTS[45]))); ALGEBRAIC[33] = 0.00100000*(44.3000+ 230.000*exp(- pow((ALGEBRAIC[9]+36.0000)/10.0000, 2.00000))); RATES[7] = (ALGEBRAIC[14] - STATES[7])/ALGEBRAIC[33]; ALGEBRAIC[15] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9]+38.3000)/5.50000)); ALGEBRAIC[34] = 0.00100000/( 1.06800*exp((ALGEBRAIC[9]+38.3000)/30.0000)+ 1.06800*exp(- (ALGEBRAIC[9]+38.3000)/30.0000)); RATES[9] = (ALGEBRAIC[15] - STATES[9])/ALGEBRAIC[34]; ALGEBRAIC[16] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+58.7000)/3.80000)); ALGEBRAIC[35] = 1.00000/( 16.6700*exp(- (ALGEBRAIC[9]+75.0000)/83.3000)+ 16.6700*exp((ALGEBRAIC[9]+75.0000)/15.3800))+CONSTANTS[49]; RATES[10] = (ALGEBRAIC[16] - STATES[10])/ALGEBRAIC[35]; ALGEBRAIC[37] = 0.00900000/(1.00000+exp((ALGEBRAIC[9]+5.00000)/12.0000))+0.000500000; ALGEBRAIC[19] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+6.00000)/- 8.60000)); RATES[24] = (ALGEBRAIC[19] - STATES[24])/ALGEBRAIC[37]; ALGEBRAIC[38] = 0.590000/(1.00000+exp((ALGEBRAIC[9]+60.0000)/10.0000))+3.05000; ALGEBRAIC[20] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+7.50000)/10.0000)); RATES[25] = (ALGEBRAIC[20] - STATES[25])/ALGEBRAIC[38]; ALGEBRAIC[21] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+49.0000)/13.0000)); ALGEBRAIC[39] = 0.00100000*0.600000*(65.1700/( 0.570000*exp( - 0.0800000*(ALGEBRAIC[9]+44.0000))+ 0.0650000*exp( 0.100000*(ALGEBRAIC[9]+45.9300)))+10.1000); RATES[26] = (ALGEBRAIC[21] - STATES[26])/ALGEBRAIC[39]; ALGEBRAIC[22] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9] - 19.3000)/15.0000)); ALGEBRAIC[40] = 0.00100000*0.660000*1.40000*(15.5900/( 1.03700*exp( 0.0900000*(ALGEBRAIC[9]+30.6100))+ 0.369000*exp( - 0.120000*(ALGEBRAIC[9]+23.8400)))+2.98000); RATES[27] = (ALGEBRAIC[22] - STATES[27])/ALGEBRAIC[40]; ALGEBRAIC[23] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9]+10.0144)/7.66070)); ALGEBRAIC[41] = 0.846554/( 4.20000*exp(ALGEBRAIC[9]/17.0000)+ 0.150000*exp(- ALGEBRAIC[9]/21.6000)); RATES[28] = (ALGEBRAIC[23] - STATES[28])/ALGEBRAIC[41]; ALGEBRAIC[42] = 1.00000/( 30.0000*exp(ALGEBRAIC[9]/10.0000)+exp(- ALGEBRAIC[9]/12.0000)); RATES[29] = (ALGEBRAIC[23] - STATES[29])/ALGEBRAIC[42]; ALGEBRAIC[43] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+28.6000)/17.1000)); ALGEBRAIC[26] = 1.00000/( 100.000*exp(- ALGEBRAIC[9]/54.6450)+ 656.000*exp(ALGEBRAIC[9]/106.157)); RATES[30] = (ALGEBRAIC[43] - STATES[30])/ALGEBRAIC[26]; ALGEBRAIC[28] = 10.0000*exp( 0.0133000*(ALGEBRAIC[9]+40.0000)); ALGEBRAIC[45] = CONSTANTS[115]/(CONSTANTS[115]+ALGEBRAIC[28]); ALGEBRAIC[51] = 1.00000/(CONSTANTS[115]+ALGEBRAIC[28]); RATES[32] = (ALGEBRAIC[45] - STATES[32])/ALGEBRAIC[51]; ALGEBRAIC[12] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+69.8040)/4.45650)); ALGEBRAIC[31] = 20.0000*exp( - 0.125000*(ALGEBRAIC[9]+75.0000)); ALGEBRAIC[47] = 2000.00/( 320.000*exp( - 0.100000*(ALGEBRAIC[9]+75.0000))+1.00000); ALGEBRAIC[53] = 1.00000/(ALGEBRAIC[31]+ALGEBRAIC[47]); RATES[5] = (ALGEBRAIC[12] - STATES[5])/ALGEBRAIC[53]; ALGEBRAIC[27] = pow((1.00000/(1.00000+exp(- ((ALGEBRAIC[9]+0.638300) - CONSTANTS[114])/10.7071))), 1.0 / 2); ALGEBRAIC[44] = 28.0000/(1.00000+exp(- ((ALGEBRAIC[9] - 40.0000) - CONSTANTS[114])/3.00000)); ALGEBRAIC[50] = 1.00000*exp(- ((ALGEBRAIC[9] - CONSTANTS[114]) - 5.00000)/25.0000); ALGEBRAIC[56] = 1.00000/(ALGEBRAIC[44]+ALGEBRAIC[50]); RATES[31] = (ALGEBRAIC[27] - STATES[31])/ALGEBRAIC[56]; ALGEBRAIC[11] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9]+42.0504)/8.31060)); ALGEBRAIC[30] = ALGEBRAIC[9]+41.0000; ALGEBRAIC[46] = (fabs(ALGEBRAIC[30])0.00000 ? CONSTANTS[90]*CONSTANTS[89]*(ALGEBRAIC[9] - CONSTANTS[96])*(1.00000+exp((ALGEBRAIC[9]+20.0000)/20.0000))*STATES[32] : 0.00000); ALGEBRAIC[85] = CONSTANTS[85]*STATES[24]*STATES[25]*(ALGEBRAIC[9] - CONSTANTS[96]); ALGEBRAIC[100] = ALGEBRAIC[59]+ALGEBRAIC[89]+ALGEBRAIC[95]+ALGEBRAIC[87]+ALGEBRAIC[61]+ALGEBRAIC[75]+ALGEBRAIC[79]+ALGEBRAIC[83]+ALGEBRAIC[84]+ALGEBRAIC[98]+ALGEBRAIC[85]; RATES[0] = - ALGEBRAIC[100]/CONSTANTS[3]; } void computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { ALGEBRAIC[6] = CONSTANTS[69]*CONSTANTS[78]*(1.00000 - (STATES[22]+STATES[18])) - CONSTANTS[75]*STATES[18]; ALGEBRAIC[1] = CONSTANTS[47]/(CONSTANTS[47]+STATES[1]); ALGEBRAIC[7] = ( 0.00100000*ALGEBRAIC[1])/CONSTANTS[46]; ALGEBRAIC[2] = CONSTANTS[51] - (CONSTANTS[51] - CONSTANTS[52])/(1.00000+pow(CONSTANTS[53]/STATES[15], CONSTANTS[54])); ALGEBRAIC[8] = CONSTANTS[55]/ALGEBRAIC[2]; ALGEBRAIC[17] = CONSTANTS[56]*ALGEBRAIC[2]; ALGEBRAIC[5] = (VOI>CONSTANTS[5]&&VOI=1.00000 ? ALGEBRAIC[5] : STATES[0]); ALGEBRAIC[10] = 1.00000/(( 0.360000*(((ALGEBRAIC[9]+148.800) - CONSTANTS[95]) - CONSTANTS[99]))/(exp( 0.0660000*(((ALGEBRAIC[9]+148.800) - CONSTANTS[95]) - CONSTANTS[99])) - 1.00000)+( 0.100000*(((ALGEBRAIC[9]+87.3000) - CONSTANTS[95]) - CONSTANTS[99]))/(1.00000 - exp( - 0.200000*(((ALGEBRAIC[9]+87.3000) - CONSTANTS[95]) - CONSTANTS[99])))) - 0.0540000; ALGEBRAIC[29] = (ALGEBRAIC[9]<- (((80.0000 - CONSTANTS[95]) - CONSTANTS[99]) - CONSTANTS[20]) ? 0.0132900+0.999210/(1.00000+exp(((((ALGEBRAIC[9]+97.1340) - CONSTANTS[95]) - CONSTANTS[99]) - CONSTANTS[20])/8.17520)) : 0.000250100*exp(- (((ALGEBRAIC[9] - CONSTANTS[95]) - CONSTANTS[99]) - CONSTANTS[20])/12.8610)); ALGEBRAIC[14] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+37.4000+CONSTANTS[44])/(5.30000+CONSTANTS[45]))); ALGEBRAIC[33] = 0.00100000*(44.3000+ 230.000*exp(- pow((ALGEBRAIC[9]+36.0000)/10.0000, 2.00000))); ALGEBRAIC[15] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9]+38.3000)/5.50000)); ALGEBRAIC[34] = 0.00100000/( 1.06800*exp((ALGEBRAIC[9]+38.3000)/30.0000)+ 1.06800*exp(- (ALGEBRAIC[9]+38.3000)/30.0000)); ALGEBRAIC[16] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+58.7000)/3.80000)); ALGEBRAIC[35] = 1.00000/( 16.6700*exp(- (ALGEBRAIC[9]+75.0000)/83.3000)+ 16.6700*exp((ALGEBRAIC[9]+75.0000)/15.3800))+CONSTANTS[49]; ALGEBRAIC[37] = 0.00900000/(1.00000+exp((ALGEBRAIC[9]+5.00000)/12.0000))+0.000500000; ALGEBRAIC[19] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+6.00000)/- 8.60000)); ALGEBRAIC[38] = 0.590000/(1.00000+exp((ALGEBRAIC[9]+60.0000)/10.0000))+3.05000; ALGEBRAIC[20] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+7.50000)/10.0000)); ALGEBRAIC[21] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+49.0000)/13.0000)); ALGEBRAIC[39] = 0.00100000*0.600000*(65.1700/( 0.570000*exp( - 0.0800000*(ALGEBRAIC[9]+44.0000))+ 0.0650000*exp( 0.100000*(ALGEBRAIC[9]+45.9300)))+10.1000); ALGEBRAIC[22] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9] - 19.3000)/15.0000)); ALGEBRAIC[40] = 0.00100000*0.660000*1.40000*(15.5900/( 1.03700*exp( 0.0900000*(ALGEBRAIC[9]+30.6100))+ 0.369000*exp( - 0.120000*(ALGEBRAIC[9]+23.8400)))+2.98000); ALGEBRAIC[23] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9]+10.0144)/7.66070)); ALGEBRAIC[41] = 0.846554/( 4.20000*exp(ALGEBRAIC[9]/17.0000)+ 0.150000*exp(- ALGEBRAIC[9]/21.6000)); ALGEBRAIC[42] = 1.00000/( 30.0000*exp(ALGEBRAIC[9]/10.0000)+exp(- ALGEBRAIC[9]/12.0000)); ALGEBRAIC[43] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+28.6000)/17.1000)); ALGEBRAIC[26] = 1.00000/( 100.000*exp(- ALGEBRAIC[9]/54.6450)+ 656.000*exp(ALGEBRAIC[9]/106.157)); ALGEBRAIC[28] = 10.0000*exp( 0.0133000*(ALGEBRAIC[9]+40.0000)); ALGEBRAIC[45] = CONSTANTS[115]/(CONSTANTS[115]+ALGEBRAIC[28]); ALGEBRAIC[51] = 1.00000/(CONSTANTS[115]+ALGEBRAIC[28]); ALGEBRAIC[12] = 1.00000/(1.00000+exp((ALGEBRAIC[9]+69.8040)/4.45650)); ALGEBRAIC[31] = 20.0000*exp( - 0.125000*(ALGEBRAIC[9]+75.0000)); ALGEBRAIC[47] = 2000.00/( 320.000*exp( - 0.100000*(ALGEBRAIC[9]+75.0000))+1.00000); ALGEBRAIC[53] = 1.00000/(ALGEBRAIC[31]+ALGEBRAIC[47]); ALGEBRAIC[27] = pow((1.00000/(1.00000+exp(- ((ALGEBRAIC[9]+0.638300) - CONSTANTS[114])/10.7071))), 1.0 / 2); ALGEBRAIC[44] = 28.0000/(1.00000+exp(- ((ALGEBRAIC[9] - 40.0000) - CONSTANTS[114])/3.00000)); ALGEBRAIC[50] = 1.00000*exp(- ((ALGEBRAIC[9] - CONSTANTS[114]) - 5.00000)/25.0000); ALGEBRAIC[56] = 1.00000/(ALGEBRAIC[44]+ALGEBRAIC[50]); ALGEBRAIC[11] = 1.00000/(1.00000+exp(- (ALGEBRAIC[9]+42.0504)/8.31060)); ALGEBRAIC[30] = ALGEBRAIC[9]+41.0000; ALGEBRAIC[46] = (fabs(ALGEBRAIC[30])0.00000 ? CONSTANTS[90]*CONSTANTS[89]*(ALGEBRAIC[9] - CONSTANTS[96])*(1.00000+exp((ALGEBRAIC[9]+20.0000)/20.0000))*STATES[32] : 0.00000); ALGEBRAIC[85] = CONSTANTS[85]*STATES[24]*STATES[25]*(ALGEBRAIC[9] - CONSTANTS[96]); ALGEBRAIC[100] = ALGEBRAIC[59]+ALGEBRAIC[89]+ALGEBRAIC[95]+ALGEBRAIC[87]+ALGEBRAIC[61]+ALGEBRAIC[75]+ALGEBRAIC[79]+ALGEBRAIC[83]+ALGEBRAIC[84]+ALGEBRAIC[98]+ALGEBRAIC[85]; ALGEBRAIC[0] = 0.500000*CONSTANTS[91]*log(CONSTANTS[14]/STATES[1]); ALGEBRAIC[3] = STATES[15] - STATES[1]; ALGEBRAIC[4] = STATES[11]+STATES[12]+STATES[13]+STATES[14]; ALGEBRAIC[24] = (1.00000/(1.00000+exp(- (ALGEBRAIC[9]+23.2000)/6.60000)))/(0.846554/( 37.2000*exp(ALGEBRAIC[9]/11.9000)+ 0.960000*exp(- ALGEBRAIC[9]/18.5000))); ALGEBRAIC[25] = 4.00000*(( 37.2000*exp(ALGEBRAIC[9]/15.9000)+ 0.960000*exp(- ALGEBRAIC[9]/22.5000))/0.846554 - (1.00000/(1.00000+exp(- (ALGEBRAIC[9]+23.2000)/10.6000)))/(0.846554/( 37.2000*exp(ALGEBRAIC[9]/15.9000)+ 0.960000*exp(- ALGEBRAIC[9]/22.5000)))); }