# Size of variable arrays:
sizeAlgebraic = 79
sizeStates = 25
sizeConstants = 76
from math import *
from numpy import *

def createLegends():
    legend_states = [""] * sizeStates
    legend_rates = [""] * sizeStates
    legend_algebraic = [""] * sizeAlgebraic
    legend_voi = ""
    legend_constants = [""] * sizeConstants
    legend_voi = "time in component environment (second)"
    legend_states[0] = "V in component membrane (millivolt)"
    legend_constants[0] = "R in component membrane (joule_per_kilomole_kelvin)"
    legend_constants[1] = "T in component membrane (kelvin)"
    legend_constants[2] = "F in component membrane (coulomb_per_mole)"
    legend_constants[3] = "Cm in component membrane (microF)"
    legend_algebraic[12] = "I_st in component membrane (microA_per_microF)"
    legend_algebraic[31] = "i_Na in component fast_sodium_current (microA_per_microF)"
    legend_algebraic[44] = "i_Ca_L in component L_type_Ca_channel (microA_per_microF)"
    legend_algebraic[63] = "i_Ca_T in component T_type_Ca_channel (microA_per_microF)"
    legend_algebraic[50] = "i_Kr in component rapid_delayed_rectifier_potassium_current (microA_per_microF)"
    legend_algebraic[48] = "i_Ks in component slow_delayed_rectifier_potassium_current (microA_per_microF)"
    legend_algebraic[57] = "i_K_ATP in component ATP_sensitive_potassium_current (microA_per_microF)"
    legend_algebraic[59] = "i_to in component transient_outward_current (microA_per_microF)"
    legend_algebraic[54] = "i_K1 in component time_independent_potassium_current (microA_per_microF)"
    legend_algebraic[56] = "i_Kp in component plateau_potassium_current (microA_per_microF)"
    legend_algebraic[60] = "i_p_Ca in component sarcolemmal_calcium_pump (microA_per_microF)"
    legend_algebraic[61] = "i_Na_b in component sodium_background_current (microA_per_microF)"
    legend_algebraic[64] = "i_Ca_b in component calcium_background_current (microA_per_microF)"
    legend_algebraic[66] = "i_NaK in component sodium_potassium_pump (microA_per_microF)"
    legend_algebraic[72] = "i_NaCa in component Na_Ca_exchanger (microA_per_microF)"
    legend_algebraic[71] = "i_ns_Ca in component non_specific_calcium_activated_current (microA_per_microF)"
    legend_algebraic[73] = "dVdt in component membrane (dimensionless)"
    legend_constants[4] = "stim_start in component membrane (second)"
    legend_constants[5] = "stim_end in component membrane (second)"
    legend_constants[6] = "stim_period in component membrane (second)"
    legend_constants[7] = "stim_duration in component membrane (second)"
    legend_constants[8] = "stim_amplitude in component membrane (microA_per_microF)"
    legend_algebraic[25] = "E_Na in component fast_sodium_current (millivolt)"
    legend_constants[9] = "g_Na in component fast_sodium_current (milliS_per_microF)"
    legend_states[1] = "Nai in component ionic_concentrations (millimolar)"
    legend_constants[10] = "Nao in component ionic_concentrations (millimolar)"
    legend_states[2] = "m in component fast_sodium_current_m_gate (dimensionless)"
    legend_states[3] = "h in component fast_sodium_current_h_gate (dimensionless)"
    legend_states[4] = "j in component fast_sodium_current_j_gate (dimensionless)"
    legend_algebraic[13] = "alpha_m in component fast_sodium_current_m_gate (per_second)"
    legend_algebraic[26] = "beta_m in component fast_sodium_current_m_gate (per_second)"
    legend_constants[11] = "delta_m in component fast_sodium_current_m_gate (dimensionless)"
    legend_algebraic[0] = "E0_m in component fast_sodium_current_m_gate (millivolt)"
    legend_algebraic[1] = "alpha_h in component fast_sodium_current_h_gate (per_second)"
    legend_algebraic[14] = "beta_h in component fast_sodium_current_h_gate (per_second)"
    legend_algebraic[2] = "alpha_j in component fast_sodium_current_j_gate (per_second)"
    legend_algebraic[15] = "beta_j in component fast_sodium_current_j_gate (per_second)"
    legend_algebraic[41] = "i_CaCa in component L_type_Ca_channel (microA_per_microF)"
    legend_algebraic[43] = "i_CaK in component L_type_Ca_channel (microA_per_microF)"
    legend_algebraic[42] = "i_CaNa in component L_type_Ca_channel (microA_per_microF)"
    legend_constants[12] = "gamma_Nai in component L_type_Ca_channel (dimensionless)"
    legend_constants[13] = "gamma_Nao in component L_type_Ca_channel (dimensionless)"
    legend_constants[14] = "gamma_Ki in component L_type_Ca_channel (dimensionless)"
    legend_constants[15] = "gamma_Ko in component L_type_Ca_channel (dimensionless)"
    legend_algebraic[36] = "I_CaCa in component L_type_Ca_channel (microA_per_microF)"
    legend_algebraic[39] = "I_CaK in component L_type_Ca_channel (microA_per_microF)"
    legend_algebraic[38] = "I_CaNa in component L_type_Ca_channel (microA_per_microF)"
    legend_constants[16] = "P_Ca in component L_type_Ca_channel (cm_per_second)"
    legend_constants[17] = "P_Na in component L_type_Ca_channel (cm_per_second)"
    legend_constants[18] = "P_K in component L_type_Ca_channel (cm_per_second)"
    legend_constants[19] = "gamma_Cai in component L_type_Ca_channel (dimensionless)"
    legend_constants[20] = "gamma_Cao in component L_type_Ca_channel (dimensionless)"
    legend_states[5] = "Cai in component calcium_dynamics (millimolar)"
    legend_constants[21] = "Cao in component calcium_dynamics (millimolar)"
    legend_constants[22] = "Ko in component ionic_concentrations (millimolar)"
    legend_states[6] = "Ki in component ionic_concentrations (millimolar)"
    legend_states[7] = "d in component L_type_Ca_channel_d_gate (dimensionless)"
    legend_states[8] = "f in component L_type_Ca_channel_f_gate (dimensionless)"
    legend_algebraic[40] = "f_Ca in component L_type_Ca_channel_f_Ca_gate (dimensionless)"
    legend_algebraic[32] = "alpha_d in component L_type_Ca_channel_d_gate (per_second)"
    legend_algebraic[37] = "beta_d in component L_type_Ca_channel_d_gate (per_second)"
    legend_algebraic[16] = "d_infinity in component L_type_Ca_channel_d_gate (dimensionless)"
    legend_algebraic[27] = "tau_d in component L_type_Ca_channel_d_gate (second)"
    legend_algebraic[3] = "E0_d in component L_type_Ca_channel_d_gate (millivolt)"
    legend_algebraic[28] = "alpha_f in component L_type_Ca_channel_f_gate (per_second)"
    legend_algebraic[33] = "beta_f in component L_type_Ca_channel_f_gate (per_second)"
    legend_algebraic[4] = "f_infinity in component L_type_Ca_channel_f_gate (dimensionless)"
    legend_algebraic[17] = "tau_f in component L_type_Ca_channel_f_gate (second)"
    legend_constants[23] = "Km_Ca in component L_type_Ca_channel_f_Ca_gate (millimolar)"
    legend_constants[24] = "g_CaT in component T_type_Ca_channel (milliS_per_microF)"
    legend_algebraic[62] = "E_Ca in component calcium_background_current (millivolt)"
    legend_states[9] = "b in component T_type_Ca_channel_b_gate (dimensionless)"
    legend_states[10] = "g in component T_type_Ca_channel_g_gate (dimensionless)"
    legend_algebraic[5] = "b_inf in component T_type_Ca_channel_b_gate (dimensionless)"
    legend_algebraic[18] = "tau_b in component T_type_Ca_channel_b_gate (second)"
    legend_algebraic[6] = "g_inf in component T_type_Ca_channel_g_gate (dimensionless)"
    legend_algebraic[19] = "tau_g in component T_type_Ca_channel_g_gate (second)"
    legend_constants[63] = "g_Kr in component rapid_delayed_rectifier_potassium_current (milliS_per_microF)"
    legend_algebraic[45] = "Rect in component rapid_delayed_rectifier_potassium_current (dimensionless)"
    legend_algebraic[49] = "E_K in component time_independent_potassium_current (millivolt)"
    legend_states[11] = "xr in component rapid_delayed_rectifier_potassium_current_xr_gate (dimensionless)"
    legend_algebraic[7] = "xr_infinity in component rapid_delayed_rectifier_potassium_current_xr_gate (dimensionless)"
    legend_algebraic[20] = "tau_xr in component rapid_delayed_rectifier_potassium_current_xr_gate (second)"
    legend_algebraic[47] = "g_Ks in component slow_delayed_rectifier_potassium_current (milliS_per_microF)"
    legend_algebraic[46] = "E_Ks in component slow_delayed_rectifier_potassium_current (millivolt)"
    legend_constants[25] = "PNaK in component slow_delayed_rectifier_potassium_current (dimensionless)"
    legend_states[12] = "xs1 in component slow_delayed_rectifier_potassium_current_xs1_gate (dimensionless)"
    legend_states[13] = "xs2 in component slow_delayed_rectifier_potassium_current_xs2_gate (dimensionless)"
    legend_algebraic[8] = "xs1_infinity in component slow_delayed_rectifier_potassium_current_xs1_gate (dimensionless)"
    legend_algebraic[21] = "tau_xs1 in component slow_delayed_rectifier_potassium_current_xs1_gate (second)"
    legend_algebraic[9] = "xs2_infinity in component slow_delayed_rectifier_potassium_current_xs2_gate (dimensionless)"
    legend_algebraic[22] = "tau_xs2 in component slow_delayed_rectifier_potassium_current_xs2_gate (second)"
    legend_constants[64] = "g_K1 in component time_independent_potassium_current (milliS_per_cm2)"
    legend_algebraic[53] = "K1_infinity in component time_independent_potassium_current_K1_gate (dimensionless)"
    legend_algebraic[51] = "alpha_K1 in component time_independent_potassium_current_K1_gate (per_second)"
    legend_algebraic[52] = "beta_K1 in component time_independent_potassium_current_K1_gate (per_second)"
    legend_constants[26] = "g_Kp in component plateau_potassium_current (milliS_per_microF)"
    legend_algebraic[55] = "Kp in component plateau_potassium_current (dimensionless)"
    legend_constants[65] = "g_K_ATP in component ATP_sensitive_potassium_current (milliS_per_microF)"
    legend_constants[27] = "nATP in component ATP_sensitive_potassium_current (dimensionless)"
    legend_constants[28] = "nicholsarea in component ATP_sensitive_potassium_current (dimensionless)"
    legend_constants[29] = "ATPi in component ATP_sensitive_potassium_current (millimolar)"
    legend_constants[30] = "hATP in component ATP_sensitive_potassium_current (dimensionless)"
    legend_constants[31] = "kATP in component ATP_sensitive_potassium_current (millimolar)"
    legend_constants[71] = "pATP in component ATP_sensitive_potassium_current (dimensionless)"
    legend_constants[73] = "GKbaraATP in component ATP_sensitive_potassium_current (milliS_per_microF)"
    legend_constants[66] = "g_to in component transient_outward_current (milliS_per_microF)"
    legend_algebraic[58] = "rvdv in component transient_outward_current (dimensionless)"
    legend_states[14] = "zdv in component transient_outward_current_zdv_gate (dimensionless)"
    legend_states[15] = "ydv in component transient_outward_current_ydv_gate (dimensionless)"
    legend_algebraic[10] = "alpha_zdv in component transient_outward_current_zdv_gate (per_second)"
    legend_algebraic[23] = "beta_zdv in component transient_outward_current_zdv_gate (per_second)"
    legend_algebraic[29] = "tau_zdv in component transient_outward_current_zdv_gate (second)"
    legend_algebraic[34] = "zdv_ss in component transient_outward_current_zdv_gate (dimensionless)"
    legend_algebraic[11] = "alpha_ydv in component transient_outward_current_ydv_gate (per_second)"
    legend_algebraic[24] = "beta_ydv in component transient_outward_current_ydv_gate (per_second)"
    legend_algebraic[30] = "tau_ydv in component transient_outward_current_ydv_gate (second)"
    legend_algebraic[35] = "ydv_ss in component transient_outward_current_ydv_gate (dimensionless)"
    legend_constants[32] = "K_mpCa in component sarcolemmal_calcium_pump (millimolar)"
    legend_constants[33] = "I_pCa in component sarcolemmal_calcium_pump (microA_per_microF)"
    legend_constants[34] = "g_Nab in component sodium_background_current (milliS_per_microF)"
    legend_constants[35] = "g_Cab in component calcium_background_current (milliS_per_microF)"
    legend_constants[36] = "I_NaK in component sodium_potassium_pump (microA_per_microF)"
    legend_algebraic[65] = "f_NaK in component sodium_potassium_pump (dimensionless)"
    legend_constants[37] = "K_mNai in component sodium_potassium_pump (millimolar)"
    legend_constants[38] = "K_mKo in component sodium_potassium_pump (millimolar)"
    legend_constants[67] = "sigma in component sodium_potassium_pump (dimensionless)"
    legend_algebraic[69] = "i_ns_Na in component non_specific_calcium_activated_current (microA_per_microF)"
    legend_algebraic[70] = "i_ns_K in component non_specific_calcium_activated_current (microA_per_microF)"
    legend_constants[68] = "P_ns_Ca in component non_specific_calcium_activated_current (cm_per_second)"
    legend_algebraic[67] = "I_ns_Na in component non_specific_calcium_activated_current (microA_per_microF)"
    legend_algebraic[68] = "I_ns_K in component non_specific_calcium_activated_current (microA_per_microF)"
    legend_constants[39] = "K_m_ns_Ca in component non_specific_calcium_activated_current (millimolar)"
    legend_constants[40] = "n_NaCa in component Na_Ca_exchanger (dimensionless)"
    legend_constants[41] = "K_NaCa in component Na_Ca_exchanger (millimolar)"
    legend_constants[42] = "d_NaCa in component Na_Ca_exchanger (millimolar)"
    legend_constants[43] = "gamma in component Na_Ca_exchanger (dimensionless)"
    legend_algebraic[75] = "i_rel in component calcium_dynamics (millimolar_per_second)"
    legend_algebraic[76] = "i_up in component calcium_dynamics (millimolar_per_second)"
    legend_algebraic[77] = "i_leak in component calcium_dynamics (millimolar_per_second)"
    legend_algebraic[78] = "i_tr in component calcium_dynamics (millimolar_per_second)"
    legend_algebraic[74] = "G_rel in component calcium_dynamics (per_second)"
    legend_constants[44] = "G_rel_max in component calcium_dynamics (per_second)"
    legend_constants[45] = "G_rel_overload in component calcium_dynamics (per_second)"
    legend_constants[46] = "tau_tr in component calcium_dynamics (second)"
    legend_constants[47] = "K_mrel in component calcium_dynamics (millimolar)"
    legend_constants[48] = "delta_Ca_ith in component calcium_dynamics (millimolar)"
    legend_constants[49] = "CSQN_max in component calcium_dynamics (millimolar)"
    legend_constants[50] = "K_mCSQN in component calcium_dynamics (millimolar)"
    legend_constants[51] = "K_mup in component calcium_dynamics (millimolar)"
    legend_constants[69] = "K_leak in component calcium_dynamics (per_second)"
    legend_constants[52] = "I_up in component calcium_dynamics (millimolar_per_second)"
    legend_constants[53] = "Ca_NSR_max in component calcium_dynamics (millimolar)"
    legend_states[16] = "Ca_JSR in component calcium_dynamics (millimolar)"
    legend_states[17] = "Ca_NSR in component calcium_dynamics (millimolar)"
    legend_constants[72] = "V_myo in component ionic_concentrations (micro_litre)"
    legend_constants[54] = "A_cap in component ionic_concentrations (mm2)"
    legend_constants[74] = "V_JSR in component calcium_dynamics (micro_litre)"
    legend_constants[75] = "V_NSR in component calcium_dynamics (micro_litre)"
    legend_constants[55] = "K_mTn in component calcium_dynamics (millimolar)"
    legend_constants[56] = "K_mCMDN in component calcium_dynamics (millimolar)"
    legend_constants[57] = "Tn_max in component calcium_dynamics (millimolar)"
    legend_constants[58] = "CMDN_max in component calcium_dynamics (millimolar)"
    legend_states[18] = "APtrack in component calcium_dynamics (dimensionless)"
    legend_states[19] = "APtrack2 in component calcium_dynamics (dimensionless)"
    legend_states[20] = "APtrack3 in component calcium_dynamics (dimensionless)"
    legend_states[21] = "Cainfluxtrack in component calcium_dynamics (dimensionless)"
    legend_states[22] = "OVRLDtrack in component calcium_dynamics (dimensionless)"
    legend_states[23] = "OVRLDtrack2 in component calcium_dynamics (dimensionless)"
    legend_states[24] = "OVRLDtrack3 in component calcium_dynamics (dimensionless)"
    legend_constants[59] = "CSQNthresh in component calcium_dynamics (millimolar)"
    legend_constants[60] = "Logicthresh in component calcium_dynamics (dimensionless)"
    legend_constants[61] = "preplength in component ionic_concentrations (mm)"
    legend_constants[62] = "radius in component ionic_concentrations (mm)"
    legend_constants[70] = "volume in component ionic_concentrations (micro_litre)"
    legend_rates[0] = "d/dt V in component membrane (millivolt)"
    legend_rates[2] = "d/dt m in component fast_sodium_current_m_gate (dimensionless)"
    legend_rates[3] = "d/dt h in component fast_sodium_current_h_gate (dimensionless)"
    legend_rates[4] = "d/dt j in component fast_sodium_current_j_gate (dimensionless)"
    legend_rates[7] = "d/dt d in component L_type_Ca_channel_d_gate (dimensionless)"
    legend_rates[8] = "d/dt f in component L_type_Ca_channel_f_gate (dimensionless)"
    legend_rates[9] = "d/dt b in component T_type_Ca_channel_b_gate (dimensionless)"
    legend_rates[10] = "d/dt g in component T_type_Ca_channel_g_gate (dimensionless)"
    legend_rates[11] = "d/dt xr in component rapid_delayed_rectifier_potassium_current_xr_gate (dimensionless)"
    legend_rates[12] = "d/dt xs1 in component slow_delayed_rectifier_potassium_current_xs1_gate (dimensionless)"
    legend_rates[13] = "d/dt xs2 in component slow_delayed_rectifier_potassium_current_xs2_gate (dimensionless)"
    legend_rates[14] = "d/dt zdv in component transient_outward_current_zdv_gate (dimensionless)"
    legend_rates[15] = "d/dt ydv in component transient_outward_current_ydv_gate (dimensionless)"
    legend_rates[18] = "d/dt APtrack in component calcium_dynamics (dimensionless)"
    legend_rates[19] = "d/dt APtrack2 in component calcium_dynamics (dimensionless)"
    legend_rates[20] = "d/dt APtrack3 in component calcium_dynamics (dimensionless)"
    legend_rates[21] = "d/dt Cainfluxtrack in component calcium_dynamics (dimensionless)"
    legend_rates[22] = "d/dt OVRLDtrack in component calcium_dynamics (dimensionless)"
    legend_rates[23] = "d/dt OVRLDtrack2 in component calcium_dynamics (dimensionless)"
    legend_rates[24] = "d/dt OVRLDtrack3 in component calcium_dynamics (dimensionless)"
    legend_rates[16] = "d/dt Ca_JSR in component calcium_dynamics (millimolar)"
    legend_rates[17] = "d/dt Ca_NSR in component calcium_dynamics (millimolar)"
    legend_rates[5] = "d/dt Cai in component calcium_dynamics (millimolar)"
    legend_rates[1] = "d/dt Nai in component ionic_concentrations (millimolar)"
    legend_rates[6] = "d/dt Ki in component ionic_concentrations (millimolar)"
    return (legend_states, legend_algebraic, legend_voi, legend_constants)

def initConsts():
    constants = [0.0] * sizeConstants; states = [0.0] * sizeStates;
    states[0] = -88.984
    constants[0] = 8314
    constants[1] = 310
    constants[2] = 96485
    constants[3] = 0.001
    constants[4] = 0.1
    constants[5] = 9
    constants[6] = 1
    constants[7] = 0.002
    constants[8] = -25.5
    constants[9] = 16
    states[1] = 15.6748357
    constants[10] = 132
    states[2] = 0.00079287
    states[3] = 0.9938
    states[4] = 0.99573
    constants[11] = 1e-5
    constants[12] = 0.75
    constants[13] = 0.75
    constants[14] = 0.75
    constants[15] = 0.75
    constants[16] = 0.00054
    constants[17] = 6.75e-7
    constants[18] = 1.93e-7
    constants[19] = 1
    constants[20] = 0.341
    states[5] = 0.00035237
    constants[21] = 1.8
    constants[22] = 4.5
    states[6] = 137.6244
    states[7] = 3.18355e-6
    states[8] = 0.9974388
    constants[23] = 0.0006
    constants[24] = 0.05
    states[9] = 0.000967785
    states[10] = 0.95331988
    states[11] = 0.00032151644
    constants[25] = 0.01833
    states[12] = 0.0272635
    states[13] = 0.0631269
    constants[26] = 0.00552
    constants[27] = 0.24
    constants[28] = 5e-5
    constants[29] = 3
    constants[30] = 2
    constants[31] = 0.00025
    states[14] = 0.011528
    states[15] = 0.985232
    constants[32] = 0.0005
    constants[33] = 1.15
    constants[34] = 0.004
    constants[35] = 0.003016
    constants[36] = 2
    constants[37] = 10
    constants[38] = 1.5
    constants[39] = 0.0012
    constants[40] = 3
    constants[41] = 0.002
    constants[42] = 0.001
    constants[43] = 0.5
    constants[44] = 60000
    constants[45] = 4000
    constants[46] = 0.18
    constants[47] = 0.0008
    constants[48] = 0.00018
    constants[49] = 10
    constants[50] = 0.8
    constants[51] = 0.00092
    constants[52] = 5
    constants[53] = 15
    states[16] = 0.817895
    states[17] = 2.797668
    constants[54] = 1.434e-7
    constants[55] = 0.0005
    constants[56] = 0.00238
    constants[57] = 0.07
    constants[58] = 0.05
    states[18] = 3.814e-87
    states[19] = 2.1084e-86
    states[20] = 0.01925
    states[21] = 1.784e-87
    states[22] = 0
    states[23] = 0
    states[24] = 0
    constants[59] = 0.7
    constants[60] = 0.98
    constants[61] = 0.001
    constants[62] = 1.1e-4
    constants[63] = 0.0261400*(power(constants[22]/5.40000, 1.0/2))
    constants[64] = 0.750000*(power(constants[22]/5.40000, 1.0/2))
    constants[65] = 0.000193000/constants[28]
    constants[66] = 0.00000*0.500000
    constants[67] = (1.00000/7.00000)*(exp(constants[10]/67.3000)-1.00000)
    constants[68] = 0.00000*1.75000e-07
    constants[69] = constants[52]/constants[53]
    constants[70] =  pi*constants[61]*(power(constants[62], 2.00000))
    constants[71] = 1.00000/(1.00000+power(constants[29]/constants[31], constants[30]))
    constants[72] = 0.680000*constants[70]
    constants[73] = constants[65]*constants[71]*(power(constants[22]/4.00000, constants[27]))
    constants[74] = (0.00480000/0.680000)*constants[72]
    constants[75] = (0.0552000/0.680000)*constants[72]
    return (states, constants)

def computeRates(voi, states, constants):
    rates = [0.0] * sizeStates; algebraic = [0.0] * sizeAlgebraic
    rates[19] = custom_piecewise([less(states[18] , 0.200000) & greater(states[18] , 0.180000), 100000.*(1.00000-states[19])-500.000*states[19] , True, -500.000*states[19]])
    rates[20] = custom_piecewise([less(states[18] , 0.200000) & greater(states[18] , 0.180000), 100000.*(1.00000-states[20])-500.000*states[20] , True, -10.0000*states[20]])
    rates[22] = custom_piecewise([greater(1.00000/(1.00000+constants[50]/states[16]) , constants[59]) & less(states[24] , 0.370000) & less(states[20] , 0.370000), 50000.0*(1.00000-states[22]) , True, -500.000*states[22]])
    rates[23] = custom_piecewise([greater(states[22] , constants[60]) & less(states[23] , constants[60]), 50000.0*(1.00000-states[23]) , True, -500.000*states[23]])
    rates[24] = custom_piecewise([greater(states[22] , constants[60]) & less(states[24] , constants[60]), 50000.0*(1.00000-states[24]) , True, -10.0000*states[24]])
    algebraic[1] = custom_piecewise([less(states[0] , -40.0000), 135.000*exp((80.0000+states[0])/-6.80000) , True, 0.00000])
    algebraic[14] = custom_piecewise([less(states[0] , -40.0000), 3560.00*exp(0.0790000*states[0])+3.10000e+08*exp(0.350000*states[0]) , True, 1.00000/(0.000130000*(1.00000+exp((states[0]+10.6600)/-11.1000)))])
    rates[3] = algebraic[1]*(1.00000-states[3])-algebraic[14]*states[3]
    algebraic[2] = custom_piecewise([less(states[0] , -40.0000), (1000.00*-(127140.*exp(0.244400*states[0])+3.47400e-05*exp(-0.0439100*states[0]))*(states[0]+37.7800))/(1.00000+exp(0.311000*(states[0]+79.2300))) , True, 0.00000])
    algebraic[15] = custom_piecewise([less(states[0] , -40.0000), (121.200*exp(-0.0105200*states[0]))/(1.00000+exp(-0.137800*(states[0]+40.1400))) , True, (300.000*exp(-2.53500e-07*states[0]))/(1.00000+exp(-0.100000*(states[0]+32.0000)))])
    rates[4] = algebraic[2]*(1.00000-states[4])-algebraic[15]*states[4]
    algebraic[5] = 1.00000/(1.00000+exp(-(states[0]+14.0000)/10.8000))
    algebraic[18] = 0.00370000+0.00610000/(1.00000+exp((states[0]+25.0000)/4.50000))
    rates[9] = (algebraic[5]-states[9])/algebraic[18]
    algebraic[6] = 1.00000/(1.00000+exp((states[0]+60.0000)/5.60000))
    algebraic[19] = custom_piecewise([less_equal(states[0] , 0.00000), -0.000875000*states[0]+0.0120000 , True, 0.0120000])
    rates[10] = (algebraic[6]-states[10])/algebraic[19]
    algebraic[7] = 1.00000/(1.00000+exp(-(states[0]+21.5000)/7.50000))
    algebraic[20] = 0.00100000/((0.00138000*(states[0]+14.2000))/(1.00000-exp(-0.123000*(states[0]+14.2000)))+(0.000610000*(states[0]+38.9000))/(exp(0.145000*(states[0]+38.9000))-1.00000))
    rates[11] = (algebraic[7]-states[11])/algebraic[20]
    algebraic[8] = 1.00000/(1.00000+exp(-(states[0]-1.50000)/16.7000))
    algebraic[21] = 0.00100000/((7.19000e-05*(states[0]+30.0000))/(1.00000-exp(-0.148000*(states[0]+30.0000)))+(0.000131000*(states[0]+30.0000))/(exp(0.0687000*(states[0]+30.0000))-1.00000))
    rates[12] = (algebraic[8]-states[12])/algebraic[21]
    algebraic[9] = 1.00000/(1.00000+exp(-(states[0]-1.50000)/16.7000))
    algebraic[22] = (4.00000*0.00100000)/((7.19000e-05*(states[0]+30.0000))/(1.00000-exp(-0.148000*(states[0]+30.0000)))+(0.000131000*(states[0]+30.0000))/(exp(0.0687000*(states[0]+30.0000))-1.00000))
    rates[13] = (algebraic[9]-states[13])/algebraic[22]
    algebraic[0] = states[0]+47.1300
    algebraic[13] = custom_piecewise([greater_equal(fabs(algebraic[0]) , constants[11]), (320.000*algebraic[0])/(1.00000-exp(-0.100000*algebraic[0])) , True, 3200.00])
    algebraic[26] = 80.0000*exp(-states[0]/11.0000)
    rates[2] = algebraic[13]*(1.00000-states[2])-algebraic[26]*states[2]
    algebraic[4] = 1.00000/(1.00000+exp((states[0]+32.0000)/8.00000))+0.600000/(1.00000+exp((50.0000-states[0])/20.0000))
    algebraic[17] = 0.00100000/(0.0197000*exp(-(power(0.0337000*(states[0]+10.0000), 2.00000)))+0.0200000)
    algebraic[28] = algebraic[4]/algebraic[17]
    algebraic[33] = (1.00000-algebraic[4])/algebraic[17]
    rates[8] = algebraic[28]*(1.00000-states[8])-algebraic[33]*states[8]
    algebraic[10] = (10000.0*exp((states[0]-40.0000)/25.0000))/(1.00000+exp((states[0]-40.0000)/25.0000))
    algebraic[23] = (10000.0*exp(-(states[0]+90.0000)/25.0000))/(1.00000+exp(-(states[0]+90.0000)/25.0000))
    algebraic[29] = 1.00000/(algebraic[10]+algebraic[23])
    algebraic[34] = algebraic[10]/(algebraic[10]+algebraic[23])
    rates[14] = (algebraic[34]-states[14])/algebraic[29]
    algebraic[11] = 15.0000/(1.00000+exp((states[0]+60.0000)/5.00000))
    algebraic[24] = (100.000*exp((states[0]+25.0000)/5.00000))/(1.00000+exp((states[0]+25.0000)/5.00000))
    algebraic[30] = 1.00000/(algebraic[11]+algebraic[24])
    algebraic[35] = algebraic[11]/(algebraic[11]+algebraic[24])
    rates[15] = (algebraic[35]-states[15])/algebraic[30]
    algebraic[3] = states[0]+10.0000
    algebraic[16] = 1.00000/(1.00000+exp(-algebraic[3]/6.24000))
    algebraic[27] = custom_piecewise([less(fabs(algebraic[3]) , 1.00000e-05), 0.00100000/(0.0350000*6.24000) , True, (0.00100000*algebraic[16]*(1.00000-exp(-algebraic[3]/6.24000)))/(0.0350000*algebraic[3])])
    algebraic[32] = algebraic[16]/algebraic[27]
    algebraic[37] = (1.00000-algebraic[16])/algebraic[27]
    rates[7] = algebraic[32]*(1.00000-states[7])-algebraic[37]*states[7]
    algebraic[45] = 1.00000/(1.00000+exp((states[0]+9.00000)/22.4000))
    algebraic[49] = ((constants[0]*constants[1])/constants[2])*log(constants[22]/states[6])
    algebraic[50] = constants[63]*states[11]*algebraic[45]*(states[0]-algebraic[49])
    algebraic[47] = 0.433000*(1.00000+0.600000/(1.00000+power(3.80000e-05/states[5], 1.40000)))
    algebraic[46] = ((constants[0]*constants[1])/constants[2])*log((constants[22]+constants[25]*constants[10])/(states[6]+constants[25]*states[1]))
    algebraic[48] = algebraic[47]*states[12]*states[13]*(states[0]-algebraic[46])
    algebraic[57] = constants[73]*(states[0]-algebraic[49])
    algebraic[58] = exp(states[0]/100.000)
    algebraic[59] = constants[66]*(power(states[14], 3.00000))*states[15]*algebraic[58]*(states[0]-algebraic[49])
    algebraic[51] = 1020.00/(1.00000+exp(0.238500*((states[0]-algebraic[49])-59.2150)))
    algebraic[52] = (1000.00*(0.491240*exp(0.0803200*((states[0]-algebraic[49])+5.47600))+exp(0.0617500*((states[0]-algebraic[49])-594.310))))/(1.00000+exp(-0.514300*((states[0]-algebraic[49])+4.75300)))
    algebraic[53] = algebraic[51]/(algebraic[51]+algebraic[52])
    algebraic[54] = constants[64]*algebraic[53]*(states[0]-algebraic[49])
    algebraic[55] = 1.00000/(1.00000+exp((7.48800-states[0])/5.98000))
    algebraic[56] = constants[26]*algebraic[55]*(states[0]-algebraic[49])
    algebraic[65] = 1.00000/(1.00000+0.124500*exp((-0.100000*states[0]*constants[2])/(constants[0]*constants[1]))+0.0365000*constants[67]*exp((-states[0]*constants[2])/(constants[0]*constants[1])))
    algebraic[66] = (((constants[36]*algebraic[65]*1.00000)/(1.00000+power(constants[37]/states[1], 2.00000)))*constants[22])/(constants[22]+constants[38])
    algebraic[39] = (((constants[18]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[14]*states[6]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[15]*constants[22]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[40] = 1.00000/(1.00000+states[5]/constants[23])
    algebraic[43] = states[7]*states[8]*algebraic[40]*algebraic[39]
    algebraic[68] = (((constants[68]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[14]*states[6]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[15]*constants[22]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[70] = (algebraic[68]*1.00000)/(1.00000+power(constants[39]/states[5], 3.00000))
    rates[6] = (-(algebraic[43]+algebraic[50]+algebraic[48]+algebraic[54]+algebraic[56]+algebraic[57]+algebraic[59]+algebraic[70]+-algebraic[66]*2.00000)*constants[54])/(constants[72]*constants[2])
    algebraic[12] = custom_piecewise([greater_equal(voi , constants[4]) & less_equal(voi , constants[5]) & less_equal((voi-constants[4])-floor((voi-constants[4])/constants[6])*constants[6] , constants[7]), constants[8] , True, 0.00000])
    algebraic[25] = ((constants[0]*constants[1])/constants[2])*log(constants[10]/states[1])
    algebraic[31] = constants[9]*(power(states[2], 3.00000))*states[3]*states[4]*(states[0]-algebraic[25])
    algebraic[36] = (((constants[16]*(power(2.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[19]*states[5]*exp((2.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[20]*constants[21]))/(exp((2.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[41] = states[7]*states[8]*algebraic[40]*algebraic[36]
    algebraic[38] = (((constants[17]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[12]*states[1]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[13]*constants[10]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[42] = states[7]*states[8]*algebraic[40]*algebraic[38]
    algebraic[44] = algebraic[41]+algebraic[43]+algebraic[42]
    algebraic[62] = ((constants[0]*constants[1])/(2.00000*constants[2]))*log(constants[21]/states[5])
    algebraic[63] = constants[24]*states[9]*states[9]*states[10]*(states[0]-algebraic[62])
    algebraic[60] = (constants[33]*states[5])/(constants[32]+states[5])
    algebraic[61] = constants[34]*(states[0]-algebraic[25])
    algebraic[64] = constants[35]*(states[0]-algebraic[62])
    algebraic[72] = (constants[41]*(exp((constants[43]*(constants[40]-2.00000)*states[0]*constants[2])/(constants[0]*constants[1]))*(power(states[1], constants[40]))*constants[21]-exp(((constants[43]-1.00000)*(constants[40]-2.00000)*states[0]*constants[2])/(constants[0]*constants[1]))*(power(constants[10], constants[40]))*states[5]))/((1.00000+constants[42]*(states[5]*(power(constants[10], constants[40]))+constants[21]*(power(states[1], constants[40]))))*(1.00000+states[5]/0.00690000))
    algebraic[67] = (((constants[68]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[12]*states[1]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[13]*constants[10]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[69] = (algebraic[67]*1.00000)/(1.00000+power(constants[39]/states[5], 3.00000))
    algebraic[71] = algebraic[69]+algebraic[70]
    rates[0] = (-1.00000/constants[3])*(algebraic[31]+algebraic[44]+algebraic[63]+algebraic[50]+algebraic[48]+algebraic[57]+algebraic[59]+algebraic[54]+algebraic[56]+algebraic[60]+algebraic[61]+algebraic[64]+algebraic[66]+algebraic[72]+algebraic[71]+algebraic[12])
    rates[21] = custom_piecewise([greater(states[18] , 0.200000), (-constants[54]*(((algebraic[41]+algebraic[63])-algebraic[72])+algebraic[60]+algebraic[64]))/(2.00000*constants[72]*constants[2]) , greater(states[19] , 0.0100000) & less_equal(states[18] , 0.200000), 0.00000 , True, -500.000*states[21]])
    rates[1] = (-(algebraic[31]+algebraic[42]+algebraic[61]+algebraic[69]+algebraic[72]*3.00000+algebraic[66]*3.00000)*constants[54])/(constants[72]*constants[2])
    algebraic[73] = (-1.00000/constants[3])*(algebraic[31]+algebraic[44]+algebraic[63]+algebraic[50]+algebraic[48]+algebraic[57]+algebraic[59]+algebraic[54]+algebraic[56]+algebraic[60]+algebraic[61]+algebraic[64]+algebraic[66]+algebraic[72]+algebraic[71]+algebraic[12])
    rates[18] = custom_piecewise([greater(algebraic[73] , 150000.), 100000.*(1.00000-states[18])-500.000*states[18] , True, -500.000*states[18]])
    algebraic[74] = custom_piecewise([greater(states[21] , constants[48]), ((constants[44]*(states[21]-constants[48]))/((constants[47]+states[21])-constants[48]))*(1.00000-states[19])*states[19] , less_equal(states[21] , constants[48]) & greater(states[23] , 0.00000), constants[45]*(1.00000-states[23])*states[23] , True, 0.00000])
    algebraic[75] = algebraic[74]*(states[16]-states[5])
    algebraic[76] = (constants[52]*states[5])/(states[5]+constants[51])
    algebraic[77] = constants[69]*states[17]
    rates[5] = (1.00000/(1.00000+(constants[58]*constants[56])/(power(constants[56]+states[5], 2.00000))+(constants[57]*constants[55])/(power(constants[55]+states[5], 2.00000))))*((-constants[54]*(((algebraic[41]+algebraic[63])-algebraic[72])+algebraic[60]+algebraic[64]))/(2.00000*constants[72]*constants[2])+(algebraic[75]*constants[74])/constants[72]+((algebraic[77]-algebraic[76])*constants[75])/constants[72])
    algebraic[78] = (states[17]-states[16])/constants[46]
    rates[16] = (1.00000/(1.00000+(constants[49]*constants[50])/(power(constants[50]+states[16], 2.00000))))*(algebraic[78]-algebraic[75])
    rates[17] = ((-algebraic[78]*constants[74])/constants[75]-algebraic[77])+algebraic[76]
    return(rates)

def computeAlgebraic(constants, states, voi):
    algebraic = array([[0.0] * len(voi)] * sizeAlgebraic)
    states = array(states)
    voi = array(voi)
    algebraic[1] = custom_piecewise([less(states[0] , -40.0000), 135.000*exp((80.0000+states[0])/-6.80000) , True, 0.00000])
    algebraic[14] = custom_piecewise([less(states[0] , -40.0000), 3560.00*exp(0.0790000*states[0])+3.10000e+08*exp(0.350000*states[0]) , True, 1.00000/(0.000130000*(1.00000+exp((states[0]+10.6600)/-11.1000)))])
    algebraic[2] = custom_piecewise([less(states[0] , -40.0000), (1000.00*-(127140.*exp(0.244400*states[0])+3.47400e-05*exp(-0.0439100*states[0]))*(states[0]+37.7800))/(1.00000+exp(0.311000*(states[0]+79.2300))) , True, 0.00000])
    algebraic[15] = custom_piecewise([less(states[0] , -40.0000), (121.200*exp(-0.0105200*states[0]))/(1.00000+exp(-0.137800*(states[0]+40.1400))) , True, (300.000*exp(-2.53500e-07*states[0]))/(1.00000+exp(-0.100000*(states[0]+32.0000)))])
    algebraic[5] = 1.00000/(1.00000+exp(-(states[0]+14.0000)/10.8000))
    algebraic[18] = 0.00370000+0.00610000/(1.00000+exp((states[0]+25.0000)/4.50000))
    algebraic[6] = 1.00000/(1.00000+exp((states[0]+60.0000)/5.60000))
    algebraic[19] = custom_piecewise([less_equal(states[0] , 0.00000), -0.000875000*states[0]+0.0120000 , True, 0.0120000])
    algebraic[7] = 1.00000/(1.00000+exp(-(states[0]+21.5000)/7.50000))
    algebraic[20] = 0.00100000/((0.00138000*(states[0]+14.2000))/(1.00000-exp(-0.123000*(states[0]+14.2000)))+(0.000610000*(states[0]+38.9000))/(exp(0.145000*(states[0]+38.9000))-1.00000))
    algebraic[8] = 1.00000/(1.00000+exp(-(states[0]-1.50000)/16.7000))
    algebraic[21] = 0.00100000/((7.19000e-05*(states[0]+30.0000))/(1.00000-exp(-0.148000*(states[0]+30.0000)))+(0.000131000*(states[0]+30.0000))/(exp(0.0687000*(states[0]+30.0000))-1.00000))
    algebraic[9] = 1.00000/(1.00000+exp(-(states[0]-1.50000)/16.7000))
    algebraic[22] = (4.00000*0.00100000)/((7.19000e-05*(states[0]+30.0000))/(1.00000-exp(-0.148000*(states[0]+30.0000)))+(0.000131000*(states[0]+30.0000))/(exp(0.0687000*(states[0]+30.0000))-1.00000))
    algebraic[0] = states[0]+47.1300
    algebraic[13] = custom_piecewise([greater_equal(fabs(algebraic[0]) , constants[11]), (320.000*algebraic[0])/(1.00000-exp(-0.100000*algebraic[0])) , True, 3200.00])
    algebraic[26] = 80.0000*exp(-states[0]/11.0000)
    algebraic[4] = 1.00000/(1.00000+exp((states[0]+32.0000)/8.00000))+0.600000/(1.00000+exp((50.0000-states[0])/20.0000))
    algebraic[17] = 0.00100000/(0.0197000*exp(-(power(0.0337000*(states[0]+10.0000), 2.00000)))+0.0200000)
    algebraic[28] = algebraic[4]/algebraic[17]
    algebraic[33] = (1.00000-algebraic[4])/algebraic[17]
    algebraic[10] = (10000.0*exp((states[0]-40.0000)/25.0000))/(1.00000+exp((states[0]-40.0000)/25.0000))
    algebraic[23] = (10000.0*exp(-(states[0]+90.0000)/25.0000))/(1.00000+exp(-(states[0]+90.0000)/25.0000))
    algebraic[29] = 1.00000/(algebraic[10]+algebraic[23])
    algebraic[34] = algebraic[10]/(algebraic[10]+algebraic[23])
    algebraic[11] = 15.0000/(1.00000+exp((states[0]+60.0000)/5.00000))
    algebraic[24] = (100.000*exp((states[0]+25.0000)/5.00000))/(1.00000+exp((states[0]+25.0000)/5.00000))
    algebraic[30] = 1.00000/(algebraic[11]+algebraic[24])
    algebraic[35] = algebraic[11]/(algebraic[11]+algebraic[24])
    algebraic[3] = states[0]+10.0000
    algebraic[16] = 1.00000/(1.00000+exp(-algebraic[3]/6.24000))
    algebraic[27] = custom_piecewise([less(fabs(algebraic[3]) , 1.00000e-05), 0.00100000/(0.0350000*6.24000) , True, (0.00100000*algebraic[16]*(1.00000-exp(-algebraic[3]/6.24000)))/(0.0350000*algebraic[3])])
    algebraic[32] = algebraic[16]/algebraic[27]
    algebraic[37] = (1.00000-algebraic[16])/algebraic[27]
    algebraic[45] = 1.00000/(1.00000+exp((states[0]+9.00000)/22.4000))
    algebraic[49] = ((constants[0]*constants[1])/constants[2])*log(constants[22]/states[6])
    algebraic[50] = constants[63]*states[11]*algebraic[45]*(states[0]-algebraic[49])
    algebraic[47] = 0.433000*(1.00000+0.600000/(1.00000+power(3.80000e-05/states[5], 1.40000)))
    algebraic[46] = ((constants[0]*constants[1])/constants[2])*log((constants[22]+constants[25]*constants[10])/(states[6]+constants[25]*states[1]))
    algebraic[48] = algebraic[47]*states[12]*states[13]*(states[0]-algebraic[46])
    algebraic[57] = constants[73]*(states[0]-algebraic[49])
    algebraic[58] = exp(states[0]/100.000)
    algebraic[59] = constants[66]*(power(states[14], 3.00000))*states[15]*algebraic[58]*(states[0]-algebraic[49])
    algebraic[51] = 1020.00/(1.00000+exp(0.238500*((states[0]-algebraic[49])-59.2150)))
    algebraic[52] = (1000.00*(0.491240*exp(0.0803200*((states[0]-algebraic[49])+5.47600))+exp(0.0617500*((states[0]-algebraic[49])-594.310))))/(1.00000+exp(-0.514300*((states[0]-algebraic[49])+4.75300)))
    algebraic[53] = algebraic[51]/(algebraic[51]+algebraic[52])
    algebraic[54] = constants[64]*algebraic[53]*(states[0]-algebraic[49])
    algebraic[55] = 1.00000/(1.00000+exp((7.48800-states[0])/5.98000))
    algebraic[56] = constants[26]*algebraic[55]*(states[0]-algebraic[49])
    algebraic[65] = 1.00000/(1.00000+0.124500*exp((-0.100000*states[0]*constants[2])/(constants[0]*constants[1]))+0.0365000*constants[67]*exp((-states[0]*constants[2])/(constants[0]*constants[1])))
    algebraic[66] = (((constants[36]*algebraic[65]*1.00000)/(1.00000+power(constants[37]/states[1], 2.00000)))*constants[22])/(constants[22]+constants[38])
    algebraic[39] = (((constants[18]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[14]*states[6]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[15]*constants[22]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[40] = 1.00000/(1.00000+states[5]/constants[23])
    algebraic[43] = states[7]*states[8]*algebraic[40]*algebraic[39]
    algebraic[68] = (((constants[68]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[14]*states[6]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[15]*constants[22]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[70] = (algebraic[68]*1.00000)/(1.00000+power(constants[39]/states[5], 3.00000))
    algebraic[12] = custom_piecewise([greater_equal(voi , constants[4]) & less_equal(voi , constants[5]) & less_equal((voi-constants[4])-floor((voi-constants[4])/constants[6])*constants[6] , constants[7]), constants[8] , True, 0.00000])
    algebraic[25] = ((constants[0]*constants[1])/constants[2])*log(constants[10]/states[1])
    algebraic[31] = constants[9]*(power(states[2], 3.00000))*states[3]*states[4]*(states[0]-algebraic[25])
    algebraic[36] = (((constants[16]*(power(2.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[19]*states[5]*exp((2.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[20]*constants[21]))/(exp((2.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[41] = states[7]*states[8]*algebraic[40]*algebraic[36]
    algebraic[38] = (((constants[17]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[12]*states[1]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[13]*constants[10]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[42] = states[7]*states[8]*algebraic[40]*algebraic[38]
    algebraic[44] = algebraic[41]+algebraic[43]+algebraic[42]
    algebraic[62] = ((constants[0]*constants[1])/(2.00000*constants[2]))*log(constants[21]/states[5])
    algebraic[63] = constants[24]*states[9]*states[9]*states[10]*(states[0]-algebraic[62])
    algebraic[60] = (constants[33]*states[5])/(constants[32]+states[5])
    algebraic[61] = constants[34]*(states[0]-algebraic[25])
    algebraic[64] = constants[35]*(states[0]-algebraic[62])
    algebraic[72] = (constants[41]*(exp((constants[43]*(constants[40]-2.00000)*states[0]*constants[2])/(constants[0]*constants[1]))*(power(states[1], constants[40]))*constants[21]-exp(((constants[43]-1.00000)*(constants[40]-2.00000)*states[0]*constants[2])/(constants[0]*constants[1]))*(power(constants[10], constants[40]))*states[5]))/((1.00000+constants[42]*(states[5]*(power(constants[10], constants[40]))+constants[21]*(power(states[1], constants[40]))))*(1.00000+states[5]/0.00690000))
    algebraic[67] = (((constants[68]*(power(1.00000, 2.00000))*states[0]*(power(constants[2], 2.00000)))/(constants[0]*constants[1]))*(constants[12]*states[1]*exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-constants[13]*constants[10]))/(exp((1.00000*states[0]*constants[2])/(constants[0]*constants[1]))-1.00000)
    algebraic[69] = (algebraic[67]*1.00000)/(1.00000+power(constants[39]/states[5], 3.00000))
    algebraic[71] = algebraic[69]+algebraic[70]
    algebraic[73] = (-1.00000/constants[3])*(algebraic[31]+algebraic[44]+algebraic[63]+algebraic[50]+algebraic[48]+algebraic[57]+algebraic[59]+algebraic[54]+algebraic[56]+algebraic[60]+algebraic[61]+algebraic[64]+algebraic[66]+algebraic[72]+algebraic[71]+algebraic[12])
    algebraic[74] = custom_piecewise([greater(states[21] , constants[48]), ((constants[44]*(states[21]-constants[48]))/((constants[47]+states[21])-constants[48]))*(1.00000-states[19])*states[19] , less_equal(states[21] , constants[48]) & greater(states[23] , 0.00000), constants[45]*(1.00000-states[23])*states[23] , True, 0.00000])
    algebraic[75] = algebraic[74]*(states[16]-states[5])
    algebraic[76] = (constants[52]*states[5])/(states[5]+constants[51])
    algebraic[77] = constants[69]*states[17]
    algebraic[78] = (states[17]-states[16])/constants[46]
    return algebraic

def custom_piecewise(cases):
    """Compute result of a piecewise function"""
    return select(cases[0::2],cases[1::2])

def solve_model():
    """Solve model with ODE solver"""
    from scipy.integrate import ode
    # Initialise constants and state variables
    (init_states, constants) = initConsts()

    # Set timespan to solve over
    voi = linspace(0, 10, 500)

    # Construct ODE object to solve
    r = ode(computeRates)
    r.set_integrator('vode', method='bdf', atol=1e-06, rtol=1e-06, max_step=1)
    r.set_initial_value(init_states, voi[0])
    r.set_f_params(constants)

    # Solve model
    states = array([[0.0] * len(voi)] * sizeStates)
    states[:,0] = init_states
    for (i,t) in enumerate(voi[1:]):
        if r.successful():
            r.integrate(t)
            states[:,i+1] = r.y
        else:
            break

    # Compute algebraic variables
    algebraic = computeAlgebraic(constants, states, voi)
    return (voi, states, algebraic)

def plot_model(voi, states, algebraic):
    """Plot variables against variable of integration"""
    import pylab
    (legend_states, legend_algebraic, legend_voi, legend_constants) = createLegends()
    pylab.figure(1)
    pylab.plot(voi,vstack((states,algebraic)).T)
    pylab.xlabel(legend_voi)
    pylab.legend(legend_states + legend_algebraic, loc='best')
    pylab.show()

if __name__ == "__main__":
    (voi, states, algebraic) = solve_model()
    plot_model(voi, states, algebraic)