Generated Code
The following is matlab code generated by the CellML API from this CellML file. (Back to language selection)
The raw code is available.
function [VOI, STATES, ALGEBRAIC, CONSTANTS] = mainFunction() % This is the "main function". In Matlab, things work best if you rename this function to match the filename. [VOI, STATES, ALGEBRAIC, CONSTANTS] = solveModel(); end function [algebraicVariableCount] = getAlgebraicVariableCount() % Used later when setting a global variable with the number of algebraic variables. % Note: This is not the "main method". algebraicVariableCount =146; end % There are a total of 41 entries in each of the rate and state variable arrays. % There are a total of 99 entries in the constant variable array. % function [VOI, STATES, ALGEBRAIC, CONSTANTS] = solveModel() % Create ALGEBRAIC of correct size global algebraicVariableCount; algebraicVariableCount = getAlgebraicVariableCount(); % Initialise constants and state variables [INIT_STATES, CONSTANTS] = initConsts; % Set timespan to solve over tspan = [0, 10]; % Set numerical accuracy options for ODE solver options = odeset('RelTol', 1e-06, 'AbsTol', 1e-06, 'MaxStep', 1); % Solve model with ODE solver [VOI, STATES] = ode15s(@(VOI, STATES)computeRates(VOI, STATES, CONSTANTS), tspan, INIT_STATES, options); % Compute algebraic variables [RATES, ALGEBRAIC] = computeRates(VOI, STATES, CONSTANTS); ALGEBRAIC = computeAlgebraic(ALGEBRAIC, CONSTANTS, STATES, VOI); % Plot state variables against variable of integration [LEGEND_STATES, LEGEND_ALGEBRAIC, LEGEND_VOI, LEGEND_CONSTANTS] = createLegends(); figure(); plot(VOI, STATES); xlabel(LEGEND_VOI); l = legend(LEGEND_STATES); set(l,'Interpreter','none'); end function [LEGEND_STATES, LEGEND_ALGEBRAIC, LEGEND_VOI, LEGEND_CONSTANTS] = createLegends() LEGEND_STATES = ''; LEGEND_ALGEBRAIC = ''; LEGEND_VOI = ''; LEGEND_CONSTANTS = ''; LEGEND_VOI = strpad('time in component environment (millisecond)'); LEGEND_STATES(:,1) = strpad('Vm in component membrane (millivolt)'); LEGEND_CONSTANTS(:,1) = strpad('R in component membrane (coulomb_millivolt_per_kelvin_millimole)'); LEGEND_CONSTANTS(:,2) = strpad('T in component membrane (kelvin)'); LEGEND_CONSTANTS(:,3) = strpad('F in component membrane (coulomb_per_millimole)'); LEGEND_CONSTANTS(:,4) = strpad('Cm in component membrane (picoF)'); LEGEND_ALGEBRAIC(:,111) = strpad('i_tot in component membrane (picoA)'); LEGEND_ALGEBRAIC(:,95) = strpad('i_I in component membrane (picoA)'); LEGEND_ALGEBRAIC(:,50) = strpad('i_Na in component sodium_current (picoA)'); LEGEND_ALGEBRAIC(:,55) = strpad('i_Ca_L in component L_type_Ca_channel (picoA)'); LEGEND_ALGEBRAIC(:,59) = strpad('i_Ca_T in component T_type_Ca_channel (picoA)'); LEGEND_ALGEBRAIC(:,81) = strpad('i_K1 in component time_independent_potassium_current (picoA)'); LEGEND_ALGEBRAIC(:,82) = strpad('i_Kr in component rapid_time_dependent_potassium_current (picoA)'); LEGEND_ALGEBRAIC(:,66) = strpad('i_st in component st_channel (picoA)'); LEGEND_ALGEBRAIC(:,70) = strpad('i_ha in component ha_channel (picoA)'); LEGEND_ALGEBRAIC(:,83) = strpad('i_KACh in component ACh_dependent_potassium_current (picoA)'); LEGEND_ALGEBRAIC(:,109) = strpad('i_NaK in component sodium_potassium_pump (picoA)'); LEGEND_ALGEBRAIC(:,100) = strpad('i_NaCa in component sodium_calcium_exchanger (picoA)'); LEGEND_ALGEBRAIC(:,86) = strpad('i_bNSC in component background_NSC_current (picoA)'); LEGEND_ALGEBRAIC(:,94) = strpad('i_Cab in component background_Cab_current (picoA)'); LEGEND_ALGEBRAIC(:,87) = strpad('i_Kpl in component background_Kpl_current (picoA)'); LEGEND_ALGEBRAIC(:,91) = strpad('i_lCa in component background_lCa_current (picoA)'); LEGEND_ALGEBRAIC(:,93) = strpad('i_KATP in component background_KATP_current (picoA)'); LEGEND_CONSTANTS(:,5) = strpad('Nao in component external_ion_concentrations (millimolar)'); LEGEND_CONSTANTS(:,6) = strpad('Cao in component external_ion_concentrations (millimolar)'); LEGEND_CONSTANTS(:,7) = strpad('Ko in component external_ion_concentrations (millimolar)'); LEGEND_STATES(:,2) = strpad('Nai in component internal_ion_concentrations (millimolar)'); LEGEND_ALGEBRAIC(:,28) = strpad('Cai in component internal_ion_concentrations (millimolar)'); LEGEND_STATES(:,3) = strpad('Ki in component internal_ion_concentrations (millimolar)'); LEGEND_CONSTANTS(:,8) = strpad('Vi in component internal_ion_concentrations (micrometre3)'); LEGEND_ALGEBRAIC(:,112) = strpad('i_net_Na in component internal_ion_concentrations (picoA)'); LEGEND_ALGEBRAIC(:,113) = strpad('i_net_K in component internal_ion_concentrations (picoA)'); LEGEND_ALGEBRAIC(:,102) = strpad('i_net_Ca in component internal_ion_concentrations (picoA)'); LEGEND_ALGEBRAIC(:,45) = strpad('i_Na_Na in component sodium_current (picoA)'); LEGEND_ALGEBRAIC(:,53) = strpad('i_CaL_Na in component L_type_Ca_channel (picoA)'); LEGEND_ALGEBRAIC(:,61) = strpad('i_st_Na in component st_channel (picoA)'); LEGEND_ALGEBRAIC(:,68) = strpad('i_ha_Na in component ha_channel (picoA)'); LEGEND_ALGEBRAIC(:,85) = strpad('i_bNSC_Na in component background_NSC_current (picoA)'); LEGEND_ALGEBRAIC(:,90) = strpad('i_lCa_Na in component background_lCa_current (picoA)'); LEGEND_ALGEBRAIC(:,48) = strpad('i_Na_K in component sodium_current (picoA)'); LEGEND_ALGEBRAIC(:,54) = strpad('i_CaL_K in component L_type_Ca_channel (picoA)'); LEGEND_ALGEBRAIC(:,64) = strpad('i_st_K in component st_channel (picoA)'); LEGEND_ALGEBRAIC(:,69) = strpad('i_ha_K in component ha_channel (picoA)'); LEGEND_ALGEBRAIC(:,84) = strpad('i_bNSC_K in component background_NSC_current (picoA)'); LEGEND_ALGEBRAIC(:,89) = strpad('i_lCa_K in component background_lCa_current (picoA)'); LEGEND_ALGEBRAIC(:,52) = strpad('i_CaL_Ca in component L_type_Ca_channel (picoA)'); LEGEND_ALGEBRAIC(:,132) = strpad('i_RyR in component RyR_channel (picoA)'); LEGEND_ALGEBRAIC(:,121) = strpad('i_SR_U in component SR_calcium_pump (picoA)'); LEGEND_ALGEBRAIC(:,126) = strpad('i_SR_L in component SR_L_current (picoA)'); LEGEND_ALGEBRAIC(:,146) = strpad('dCaidt in component NL_model (millimolar_per_millisecond)'); LEGEND_CONSTANTS(:,9) = strpad('CMDN_max in component internal_ion_concentrations (millimolar)'); LEGEND_CONSTANTS(:,10) = strpad('K_mCMDN in component internal_ion_concentrations (millimolar)'); LEGEND_STATES(:,4) = strpad('Ca_Total in component internal_ion_concentrations (millimolar)'); LEGEND_ALGEBRAIC(:,1) = strpad('b1 in component internal_ion_concentrations (millimolar)'); LEGEND_ALGEBRAIC(:,15) = strpad('c1 in component internal_ion_concentrations (millimolar2)'); LEGEND_ALGEBRAIC(:,32) = strpad('CF_Na in component constant_field_equations (millimolar)'); LEGEND_ALGEBRAIC(:,37) = strpad('CF_Ca in component constant_field_equations (millimolar)'); LEGEND_ALGEBRAIC(:,42) = strpad('CF_K in component constant_field_equations (millimolar)'); LEGEND_STATES(:,5) = strpad('ATPi in component ATP_production (millimolar)'); LEGEND_ALGEBRAIC(:,123) = strpad('dATPdt in component NL_model (millimolar_per_millisecond)'); LEGEND_CONSTANTS(:,11) = strpad('ProducingRate_Max in component ATP_production (per_millisecond)'); LEGEND_CONSTANTS(:,12) = strpad('Adenosine_Total in component ATP_production (millimolar)'); LEGEND_CONSTANTS(:,13) = strpad('P_Na in component sodium_current (picoA_per_millimolar)'); LEGEND_STATES(:,6) = strpad('p_AP_Na in component sodium_current_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,7) = strpad('y in component sodium_current_ultra_slow_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,2) = strpad('p_RI_Na in component sodium_current_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,8) = strpad('p_RP_Na in component sodium_current_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,9) = strpad('p_AI_Na in component sodium_current_voltage_dependent_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,16) = strpad('k_RP_AP in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,29) = strpad('k_AP_RP in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,43) = strpad('k_RI_AI in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,38) = strpad('k_AI_RI in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,33) = strpad('k_AP_AI in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,14) = strpad('k_AI_AP in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,46) = strpad('k_RP_RI in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,49) = strpad('k_RI_RP in component sodium_current_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,3) = strpad('alpha_y in component sodium_current_ultra_slow_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,17) = strpad('beta_y in component sodium_current_ultra_slow_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,51) = strpad('p_open_CaL in component L_type_Ca_channel (dimensionless)'); LEGEND_ALGEBRAIC(:,57) = strpad('CaDiadic in component L_type_Ca_channel_Ca_dependent_gate (picoA)'); LEGEND_CONSTANTS(:,15) = strpad('P_CaL in component L_type_Ca_channel (picoA_per_millimolar)'); LEGEND_STATES(:,10) = strpad('p_AP_CaL in component L_type_Ca_channel_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,11) = strpad('p_U in component L_type_Ca_channel_Ca_dependent_gate (dimensionless)'); LEGEND_STATES(:,12) = strpad('p_UCa in component L_type_Ca_channel_Ca_dependent_gate (dimensionless)'); LEGEND_STATES(:,13) = strpad('y in component L_type_Ca_channel_ultra_slow_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,4) = strpad('p_RI_CaL in component L_type_Ca_channel_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,14) = strpad('p_RP_CaL in component L_type_Ca_channel_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,15) = strpad('p_AI_CaL in component L_type_Ca_channel_voltage_dependent_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,18) = strpad('k_RP_AP in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,30) = strpad('k_AP_RP in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,34) = strpad('k_RI_AI in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,39) = strpad('k_AI_RI in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,16) = strpad('k_AP_AI in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,17) = strpad('k_AI_AP in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,44) = strpad('k_RP_RI in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,47) = strpad('k_RI_RP in component L_type_Ca_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,56) = strpad('iCaL in component L_type_Ca_channel_Ca_dependent_gate (picoA)'); LEGEND_ALGEBRAIC(:,58) = strpad('Cacm in component L_type_Ca_channel_Ca_dependent_gate (millimolar)'); LEGEND_ALGEBRAIC(:,67) = strpad('p_CCa in component L_type_Ca_channel_Ca_dependent_gate (dimensionless)'); LEGEND_STATES(:,16) = strpad('p_C in component L_type_Ca_channel_Ca_dependent_gate (dimensionless)'); LEGEND_CONSTANTS(:,18) = strpad('k_CCa_UCa in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,19) = strpad('k_UCa_CCa in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,20) = strpad('k_C_U in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,21) = strpad('k_U_C in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,90) = strpad('k_UCa_U in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,22) = strpad('k_U_UCa in component L_type_Ca_channel_Ca_dependent_gate (per_millimolar_millisecond)'); LEGEND_CONSTANTS(:,23) = strpad('k_CCa_C in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_CONSTANTS(:,24) = strpad('k_C_CCa in component L_type_Ca_channel_Ca_dependent_gate (per_millimolar_millisecond)'); LEGEND_ALGEBRAIC(:,60) = strpad('CaEffC in component L_type_Ca_channel_Ca_dependent_gate (millimolar)'); LEGEND_ALGEBRAIC(:,62) = strpad('CaEffU in component L_type_Ca_channel_Ca_dependent_gate (millimolar)'); LEGEND_ALGEBRAIC(:,65) = strpad('k_UUCa_Ca in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,63) = strpad('k_CCCa_Ca in component L_type_Ca_channel_Ca_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,5) = strpad('alpha_y in component L_type_Ca_channel_ultra_slow_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,19) = strpad('beta_y in component L_type_Ca_channel_ultra_slow_gate (per_millisecond)'); LEGEND_CONSTANTS(:,25) = strpad('P_CaT in component T_type_Ca_channel (picoA_per_millimolar)'); LEGEND_STATES(:,17) = strpad('y1 in component T_type_Ca_channel_y1_gate (dimensionless)'); LEGEND_STATES(:,18) = strpad('y2 in component T_type_Ca_channel_y2_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,6) = strpad('alpha_y1 in component T_type_Ca_channel_y1_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,20) = strpad('beta_y1 in component T_type_Ca_channel_y1_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,7) = strpad('alpha_y2 in component T_type_Ca_channel_y2_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,21) = strpad('beta_y2 in component T_type_Ca_channel_y2_gate (per_millisecond)'); LEGEND_STATES(:,19) = strpad('y1 in component st_channel_y1_gate (dimensionless)'); LEGEND_STATES(:,20) = strpad('y2 in component st_channel_y2_gate (dimensionless)'); LEGEND_STATES(:,21) = strpad('y3 in component st_channel_y3_gate (dimensionless)'); LEGEND_CONSTANTS(:,26) = strpad('P_st_Na in component st_channel (picoA_per_millimolar)'); LEGEND_CONSTANTS(:,27) = strpad('P_st_K in component st_channel (picoA_per_millimolar)'); LEGEND_ALGEBRAIC(:,8) = strpad('alpha_y1 in component st_channel_y1_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,22) = strpad('beta_y1 in component st_channel_y1_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,35) = strpad('alpha_y2 in component st_channel_y2_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,40) = strpad('beta_y2 in component st_channel_y2_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,9) = strpad('alpha_y3 in component st_channel_y3_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,23) = strpad('beta_y3 in component st_channel_y3_gate (per_millisecond)'); LEGEND_STATES(:,22) = strpad('C1 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,23) = strpad('C2 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_CONSTANTS(:,28) = strpad('P_ha_Na in component ha_channel (picoA_per_millimolar)'); LEGEND_CONSTANTS(:,29) = strpad('P_ha_K in component ha_channel (picoA_per_millimolar)'); LEGEND_STATES(:,24) = strpad('O1 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_STATES(:,25) = strpad('O2 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,10) = strpad('O3 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,24) = strpad('alpha in component ha_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,31) = strpad('beta in component ha_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,36) = strpad('mu in component ha_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,41) = strpad('lambda in component ha_channel_voltage_dependent_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,71) = strpad('E_K in component time_independent_potassium_current (millivolt)'); LEGEND_CONSTANTS(:,91) = strpad('g_K1 in component time_independent_potassium_current (nanoS)'); LEGEND_CONSTANTS(:,30) = strpad('P_K1_0 in component time_independent_potassium_current (nanoS_per_picoF)'); LEGEND_ALGEBRAIC(:,75) = strpad('fO in component time_independent_potassium_current (dimensionless)'); LEGEND_ALGEBRAIC(:,76) = strpad('fO2 in component time_independent_potassium_current (dimensionless)'); LEGEND_ALGEBRAIC(:,78) = strpad('fO3 in component time_independent_potassium_current (dimensionless)'); LEGEND_ALGEBRAIC(:,80) = strpad('fO4 in component time_independent_potassium_current (dimensionless)'); LEGEND_ALGEBRAIC(:,74) = strpad('fB in component time_independent_potassium_current (dimensionless)'); LEGEND_ALGEBRAIC(:,72) = strpad('mu in component time_independent_potassium_current (per_millisecond)'); LEGEND_ALGEBRAIC(:,73) = strpad('lambda in component time_independent_potassium_current (per_millisecond)'); LEGEND_STATES(:,26) = strpad('y in component time_independent_potassium_current_y_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,77) = strpad('alpha_y in component time_independent_potassium_current_y_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,79) = strpad('beta_y in component time_independent_potassium_current_y_gate (per_millisecond)'); LEGEND_CONSTANTS(:,92) = strpad('g_Kr in component rapid_time_dependent_potassium_current (nanoS)'); LEGEND_CONSTANTS(:,31) = strpad('P_Kr in component rapid_time_dependent_potassium_current (nanoS_per_picoF)'); LEGEND_STATES(:,27) = strpad('y1 in component rapid_time_dependent_potassium_current_y1_gate (dimensionless)'); LEGEND_STATES(:,28) = strpad('y2 in component rapid_time_dependent_potassium_current_y2_gate (dimensionless)'); LEGEND_STATES(:,29) = strpad('y3 in component rapid_time_dependent_potassium_current_y3_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,11) = strpad('alpha_y1 in component rapid_time_dependent_potassium_current_y1_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,25) = strpad('beta_y1 in component rapid_time_dependent_potassium_current_y1_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,12) = strpad('alpha_y2 in component rapid_time_dependent_potassium_current_y2_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,26) = strpad('beta_y2 in component rapid_time_dependent_potassium_current_y2_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,13) = strpad('alpha_y3 in component rapid_time_dependent_potassium_current_y3_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,27) = strpad('beta_y3 in component rapid_time_dependent_potassium_current_y3_gate (per_millisecond)'); LEGEND_STATES(:,30) = strpad('y in component ACh_dependent_potassium_current_y_gate (dimensionless)'); LEGEND_CONSTANTS(:,32) = strpad('g_ACh in component ACh_dependent_potassium_current (nanoS)'); LEGEND_CONSTANTS(:,93) = strpad('alpha_y in component ACh_dependent_potassium_current_y_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,14) = strpad('beta_y in component ACh_dependent_potassium_current_y_gate (per_millisecond)'); LEGEND_CONSTANTS(:,33) = strpad('ACh in component ACh_dependent_potassium_current_y_gate (millimolar)'); LEGEND_CONSTANTS(:,34) = strpad('Km_ACh in component ACh_dependent_potassium_current_y_gate (millimolar)'); LEGEND_CONSTANTS(:,35) = strpad('P_bNSC in component background_NSC_current (picoA_per_millimolar)'); LEGEND_CONSTANTS(:,94) = strpad('P_Kpl in component background_Kpl_current (nanoS_per_millimolar)'); LEGEND_CONSTANTS(:,36) = strpad('P_lCa in component background_lCa_current (picoA_per_millimolar)'); LEGEND_ALGEBRAIC(:,88) = strpad('p_open in component background_lCa_current (dimensionless)'); LEGEND_ALGEBRAIC(:,92) = strpad('p_open in component background_KATP_current (dimensionless)'); LEGEND_CONSTANTS(:,95) = strpad('gamma in component background_KATP_current (nanoS)'); LEGEND_CONSTANTS(:,37) = strpad('P_KATP in component background_KATP_current (nanoS_per_picoF)'); LEGEND_CONSTANTS(:,38) = strpad('N in component background_KATP_current (picoF)'); LEGEND_CONSTANTS(:,39) = strpad('P_Cab in component background_Cab_current (picoA_per_millimolar)'); LEGEND_CONSTANTS(:,96) = strpad('p_E2Na in component sodium_calcium_exchanger (dimensionless)'); LEGEND_ALGEBRAIC(:,96) = strpad('p_E1Na in component sodium_calcium_exchanger (dimensionless)'); LEGEND_ALGEBRAIC(:,97) = strpad('p_E1Ca in component sodium_calcium_exchanger (dimensionless)'); LEGEND_CONSTANTS(:,99) = strpad('p_E2Ca in component sodium_calcium_exchanger (dimensionless)'); LEGEND_ALGEBRAIC(:,98) = strpad('k1 in component sodium_calcium_exchanger (per_millisecond)'); LEGEND_ALGEBRAIC(:,99) = strpad('k2 in component sodium_calcium_exchanger (per_millisecond)'); LEGEND_CONSTANTS(:,40) = strpad('k3 in component sodium_calcium_exchanger (per_millisecond)'); LEGEND_CONSTANTS(:,41) = strpad('k4 in component sodium_calcium_exchanger (per_millisecond)'); LEGEND_CONSTANTS(:,42) = strpad('Km_Nai in component sodium_calcium_exchanger (millimolar)'); LEGEND_CONSTANTS(:,43) = strpad('Km_Nao in component sodium_calcium_exchanger (millimolar)'); LEGEND_CONSTANTS(:,44) = strpad('Km_Cai in component sodium_calcium_exchanger (millimolar)'); LEGEND_CONSTANTS(:,45) = strpad('Km_Cao in component sodium_calcium_exchanger (millimolar)'); LEGEND_STATES(:,31) = strpad('y in component sodium_calcium_exchanger_y_gate (dimensionless)'); LEGEND_CONSTANTS(:,46) = strpad('P_NaCa in component sodium_calcium_exchanger (picoA_per_picoF)'); LEGEND_CONSTANTS(:,47) = strpad('Partition in component sodium_calcium_exchanger (dimensionless)'); LEGEND_ALGEBRAIC(:,101) = strpad('alpha_y in component sodium_calcium_exchanger_y_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,103) = strpad('beta_y in component sodium_calcium_exchanger_y_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,108) = strpad('p_E2Na in component sodium_potassium_pump (dimensionless)'); LEGEND_ALGEBRAIC(:,104) = strpad('p_E1Na in component sodium_potassium_pump (dimensionless)'); LEGEND_ALGEBRAIC(:,105) = strpad('p_E1K in component sodium_potassium_pump (dimensionless)'); LEGEND_ALGEBRAIC(:,110) = strpad('p_E2K in component sodium_potassium_pump (dimensionless)'); LEGEND_ALGEBRAIC(:,106) = strpad('k1 in component sodium_potassium_pump (per_millisecond)'); LEGEND_CONSTANTS(:,48) = strpad('k2 in component sodium_potassium_pump (per_millisecond)'); LEGEND_CONSTANTS(:,49) = strpad('k3 in component sodium_potassium_pump (per_millisecond)'); LEGEND_CONSTANTS(:,50) = strpad('k4 in component sodium_potassium_pump (per_millisecond)'); LEGEND_CONSTANTS(:,51) = strpad('Km_Nai in component sodium_potassium_pump (millimolar)'); LEGEND_CONSTANTS(:,52) = strpad('Km_Nao in component sodium_potassium_pump (millimolar)'); LEGEND_CONSTANTS(:,53) = strpad('Km_Ki in component sodium_potassium_pump (millimolar)'); LEGEND_CONSTANTS(:,54) = strpad('Km_Ko in component sodium_potassium_pump (millimolar)'); LEGEND_CONSTANTS(:,55) = strpad('Km_ATP in component sodium_potassium_pump (millimolar)'); LEGEND_ALGEBRAIC(:,107) = strpad('Nao_Eff in component sodium_potassium_pump (millimolar)'); LEGEND_STATES(:,32) = strpad('y in component sodium_potassium_pump_y_gate (dimensionless)'); LEGEND_CONSTANTS(:,56) = strpad('P_NaK in component sodium_potassium_pump (picoA_per_picoF)'); LEGEND_ALGEBRAIC(:,115) = strpad('alpha_y in component sodium_potassium_pump_y_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,117) = strpad('beta_y in component sodium_potassium_pump_y_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,116) = strpad('p_E2Ca in component SR_calcium_pump (dimensionless)'); LEGEND_ALGEBRAIC(:,114) = strpad('p_E1Ca in component SR_calcium_pump (dimensionless)'); LEGEND_ALGEBRAIC(:,118) = strpad('p_E1 in component SR_calcium_pump (dimensionless)'); LEGEND_ALGEBRAIC(:,119) = strpad('p_E2 in component SR_calcium_pump (dimensionless)'); LEGEND_CONSTANTS(:,57) = strpad('k1 in component SR_calcium_pump (per_millisecond)'); LEGEND_ALGEBRAIC(:,120) = strpad('k2 in component SR_calcium_pump (per_millisecond)'); LEGEND_CONSTANTS(:,58) = strpad('k3 in component SR_calcium_pump (per_millisecond)'); LEGEND_CONSTANTS(:,59) = strpad('k4 in component SR_calcium_pump (per_millisecond)'); LEGEND_CONSTANTS(:,60) = strpad('Km_CaSR in component SR_calcium_pump (millimolar)'); LEGEND_CONSTANTS(:,61) = strpad('Km_CaCyto in component SR_calcium_pump (millimolar)'); LEGEND_CONSTANTS(:,62) = strpad('Km_ATP in component SR_calcium_pump (millimolar)'); LEGEND_CONSTANTS(:,63) = strpad('i_max in component SR_calcium_pump (picoA)'); LEGEND_STATES(:,33) = strpad('Caup in component Ca_concentrations_in_SR (millimolar)'); LEGEND_STATES(:,34) = strpad('y in component SR_calcium_pump_y_gate (dimensionless)'); LEGEND_ALGEBRAIC(:,122) = strpad('alpha_y in component SR_calcium_pump_y_gate (per_millisecond)'); LEGEND_ALGEBRAIC(:,124) = strpad('beta_y in component SR_calcium_pump_y_gate (per_millisecond)'); LEGEND_CONSTANTS(:,64) = strpad('P_RyR in component RyR_channel (picoA_per_millimolar)'); LEGEND_ALGEBRAIC(:,125) = strpad('k1 in component RyR_channel (per_millisecond)'); LEGEND_ALGEBRAIC(:,130) = strpad('k2 in component RyR_channel (per_millisecond)'); LEGEND_ALGEBRAIC(:,131) = strpad('k3 in component RyR_channel (per_millisecond)'); LEGEND_CONSTANTS(:,65) = strpad('k4 in component RyR_channel (per_millisecond)'); LEGEND_STATES(:,35) = strpad('p_open_RyR in component RyR_channel (dimensionless)'); LEGEND_STATES(:,36) = strpad('p_close_RyR in component RyR_channel (dimensionless)'); LEGEND_ALGEBRAIC(:,129) = strpad('Carel in component Ca_concentrations_in_SR (millimolar)'); LEGEND_CONSTANTS(:,66) = strpad('Diadid_Factor in component RyR_channel (per_picoA_millisecond)'); LEGEND_ALGEBRAIC(:,133) = strpad('i_SR_T in component SR_T_current (picoA)'); LEGEND_CONSTANTS(:,67) = strpad('P_SR_T in component SR_T_current (picoA_per_millimolar)'); LEGEND_CONSTANTS(:,68) = strpad('P_SR_L in component SR_L_current (picoA_per_millimolar)'); LEGEND_STATES(:,37) = strpad('Ca_Total in component Ca_concentrations_in_SR (millimolar)'); LEGEND_CONSTANTS(:,69) = strpad('V_rel in component Ca_concentrations_in_SR (micrometre3)'); LEGEND_CONSTANTS(:,70) = strpad('V_up in component Ca_concentrations_in_SR (micrometre3)'); LEGEND_CONSTANTS(:,71) = strpad('CSQN_max in component Ca_concentrations_in_SR (millimolar)'); LEGEND_CONSTANTS(:,72) = strpad('K_mCSQN in component Ca_concentrations_in_SR (millimolar)'); LEGEND_ALGEBRAIC(:,127) = strpad('b1 in component Ca_concentrations_in_SR (millimolar)'); LEGEND_ALGEBRAIC(:,128) = strpad('c1 in component Ca_concentrations_in_SR (millimolar2)'); LEGEND_CONSTANTS(:,97) = strpad('EffFraction in component NL_model (dimensionless)'); LEGEND_STATES(:,38) = strpad('pCa in component NL_model (dimensionless)'); LEGEND_STATES(:,39) = strpad('pCaCB in component NL_model (dimensionless)'); LEGEND_STATES(:,40) = strpad('pCB in component NL_model (dimensionless)'); LEGEND_ALGEBRAIC(:,136) = strpad('p in component NL_model (dimensionless)'); LEGEND_CONSTANTS(:,73) = strpad('T_t in component NL_model (millimolar)'); LEGEND_ALGEBRAIC(:,140) = strpad('Q_a in component NL_model (per_millisecond)'); LEGEND_ALGEBRAIC(:,138) = strpad('Q_b in component NL_model (per_millisecond)'); LEGEND_ALGEBRAIC(:,142) = strpad('Q_r in component NL_model (per_millisecond)'); LEGEND_ALGEBRAIC(:,143) = strpad('Q_d in component NL_model (per_millisecond)'); LEGEND_ALGEBRAIC(:,144) = strpad('Q_d1 in component NL_model (per_millisecond)'); LEGEND_ALGEBRAIC(:,145) = strpad('Q_d2 in component NL_model (per_millisecond)'); LEGEND_CONSTANTS(:,74) = strpad('Y_1 in component NL_model (per_millimolar_millisecond)'); LEGEND_CONSTANTS(:,75) = strpad('Y_2 in component NL_model (per_millisecond)'); LEGEND_CONSTANTS(:,76) = strpad('Y_3 in component NL_model (per_millisecond)'); LEGEND_CONSTANTS(:,77) = strpad('Y_4 in component NL_model (per_millisecond)'); LEGEND_CONSTANTS(:,78) = strpad('Y_d in component NL_model (millisecond_per_micrometre2)'); LEGEND_CONSTANTS(:,79) = strpad('Z_1 in component NL_model (per_millisecond)'); LEGEND_CONSTANTS(:,80) = strpad('Z_2 in component NL_model (per_millisecond)'); LEGEND_CONSTANTS(:,81) = strpad('Z_3 in component NL_model (per_millimolar_millisecond)'); LEGEND_ALGEBRAIC(:,134) = strpad('h in component NL_model (micrometre)'); LEGEND_CONSTANTS(:,82) = strpad('L_a in component NL_model (micrometre)'); LEGEND_CONSTANTS(:,83) = strpad('L in component NL_model (micrometre)'); LEGEND_ALGEBRAIC(:,139) = strpad('ForceCB in component NL_model (mN_per_mm2)'); LEGEND_STATES(:,41) = strpad('X in component NL_model (micrometre)'); LEGEND_ALGEBRAIC(:,137) = strpad('NewCBF in component NL_model (mN_per_mm2_micrometre)'); LEGEND_ALGEBRAIC(:,135) = strpad('CBBound in component NL_model (millimolar)'); LEGEND_CONSTANTS(:,84) = strpad('KForceEC in component NL_model (mN_per_mm2_micrometre5)'); LEGEND_CONSTANTS(:,85) = strpad('ZeroForceEL in component NL_model (micrometre)'); LEGEND_CONSTANTS(:,86) = strpad('KForceLinearEc in component NL_model (mN_per_mm2_micrometre)'); LEGEND_CONSTANTS(:,87) = strpad('ForceFactor in component NL_model (mN_per_mm2_micrometre_millimolar)'); LEGEND_CONSTANTS(:,98) = strpad('ForceEcomp in component NL_model (mN_per_mm2)'); LEGEND_CONSTANTS(:,88) = strpad('B in component NL_model (per_millisecond)'); LEGEND_CONSTANTS(:,89) = strpad('h_c in component NL_model (micrometre)'); LEGEND_ALGEBRAIC(:,141) = strpad('ForceExt in component NL_model (mN_per_mm2)'); LEGEND_RATES(:,1) = strpad('d/dt Vm in component membrane (millivolt)'); LEGEND_RATES(:,2) = strpad('d/dt Nai in component internal_ion_concentrations (millimolar)'); LEGEND_RATES(:,3) = strpad('d/dt Ki in component internal_ion_concentrations (millimolar)'); LEGEND_RATES(:,4) = strpad('d/dt Ca_Total in component internal_ion_concentrations (millimolar)'); LEGEND_RATES(:,5) = strpad('d/dt ATPi in component ATP_production (millimolar)'); LEGEND_RATES(:,8) = strpad('d/dt p_RP_Na in component sodium_current_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,6) = strpad('d/dt p_AP_Na in component sodium_current_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,9) = strpad('d/dt p_AI_Na in component sodium_current_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,7) = strpad('d/dt y in component sodium_current_ultra_slow_gate (dimensionless)'); LEGEND_RATES(:,14) = strpad('d/dt p_RP_CaL in component L_type_Ca_channel_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,10) = strpad('d/dt p_AP_CaL in component L_type_Ca_channel_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,15) = strpad('d/dt p_AI_CaL in component L_type_Ca_channel_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,11) = strpad('d/dt p_U in component L_type_Ca_channel_Ca_dependent_gate (dimensionless)'); LEGEND_RATES(:,12) = strpad('d/dt p_UCa in component L_type_Ca_channel_Ca_dependent_gate (dimensionless)'); LEGEND_RATES(:,16) = strpad('d/dt p_C in component L_type_Ca_channel_Ca_dependent_gate (dimensionless)'); LEGEND_RATES(:,13) = strpad('d/dt y in component L_type_Ca_channel_ultra_slow_gate (dimensionless)'); LEGEND_RATES(:,17) = strpad('d/dt y1 in component T_type_Ca_channel_y1_gate (dimensionless)'); LEGEND_RATES(:,18) = strpad('d/dt y2 in component T_type_Ca_channel_y2_gate (dimensionless)'); LEGEND_RATES(:,19) = strpad('d/dt y1 in component st_channel_y1_gate (dimensionless)'); LEGEND_RATES(:,20) = strpad('d/dt y2 in component st_channel_y2_gate (dimensionless)'); LEGEND_RATES(:,21) = strpad('d/dt y3 in component st_channel_y3_gate (dimensionless)'); LEGEND_RATES(:,24) = strpad('d/dt O1 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,25) = strpad('d/dt O2 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,22) = strpad('d/dt C1 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,23) = strpad('d/dt C2 in component ha_channel_voltage_dependent_gate (dimensionless)'); LEGEND_RATES(:,26) = strpad('d/dt y in component time_independent_potassium_current_y_gate (dimensionless)'); LEGEND_RATES(:,27) = strpad('d/dt y1 in component rapid_time_dependent_potassium_current_y1_gate (dimensionless)'); LEGEND_RATES(:,28) = strpad('d/dt y2 in component rapid_time_dependent_potassium_current_y2_gate (dimensionless)'); LEGEND_RATES(:,29) = strpad('d/dt y3 in component rapid_time_dependent_potassium_current_y3_gate (dimensionless)'); LEGEND_RATES(:,30) = strpad('d/dt y in component ACh_dependent_potassium_current_y_gate (dimensionless)'); LEGEND_RATES(:,31) = strpad('d/dt y in component sodium_calcium_exchanger_y_gate (dimensionless)'); LEGEND_RATES(:,32) = strpad('d/dt y in component sodium_potassium_pump_y_gate (dimensionless)'); LEGEND_RATES(:,34) = strpad('d/dt y in component SR_calcium_pump_y_gate (dimensionless)'); LEGEND_RATES(:,35) = strpad('d/dt p_open_RyR in component RyR_channel (dimensionless)'); LEGEND_RATES(:,36) = strpad('d/dt p_close_RyR in component RyR_channel (dimensionless)'); LEGEND_RATES(:,37) = strpad('d/dt Ca_Total in component Ca_concentrations_in_SR (millimolar)'); LEGEND_RATES(:,33) = strpad('d/dt Caup in component Ca_concentrations_in_SR (millimolar)'); LEGEND_RATES(:,41) = strpad('d/dt X in component NL_model (micrometre)'); LEGEND_RATES(:,38) = strpad('d/dt pCa in component NL_model (dimensionless)'); LEGEND_RATES(:,39) = strpad('d/dt pCaCB in component NL_model (dimensionless)'); LEGEND_RATES(:,40) = strpad('d/dt pCB in component NL_model (dimensionless)'); LEGEND_STATES = LEGEND_STATES'; LEGEND_ALGEBRAIC = LEGEND_ALGEBRAIC'; LEGEND_RATES = LEGEND_RATES'; LEGEND_CONSTANTS = LEGEND_CONSTANTS'; end function [STATES, CONSTANTS] = initConsts() VOI = 0; CONSTANTS = []; STATES = []; ALGEBRAIC = []; STATES(:,1) = -42.987671350068005; CONSTANTS(:,1) = 8.3143; CONSTANTS(:,2) = 310; CONSTANTS(:,3) = 96.4867; CONSTANTS(:,4) = 32; CONSTANTS(:,5) = 139.99977217549068; CONSTANTS(:,6) = 1.7999668787634697; CONSTANTS(:,7) = 5.399964171929831; STATES(:,2) = 4.6808027298969925; STATES(:,3) = 139.22099524072777; CONSTANTS(:,8) = 2513.25; CONSTANTS(:,9) = 0.05; CONSTANTS(:,10) = 0.00238; STATES(:,4) = 0.003834100516470642; STATES(:,5) = 4.929308214702568; CONSTANTS(:,11) = 0.003; CONSTANTS(:,12) = 5; CONSTANTS(:,13) = 12; STATES(:,6) = 5.9898633533987405e-5; STATES(:,7) = 0.02691630436856424; STATES(:,8) = 2.2262336890623873e-4; STATES(:,9) = 0.9715915109181413; CONSTANTS(:,14) = 8.75e-5; CONSTANTS(:,15) = 2112; STATES(:,10) = 0.010773205742759775; STATES(:,11) = 0.018412749759150325; STATES(:,12) = 2.0870506374005444e-4; STATES(:,13) = 0.8256168329801671; STATES(:,14) = 0.42833044151885075; STATES(:,15) = 0.5607106503080197; CONSTANTS(:,16) = 0.004; CONSTANTS(:,17) = 0.001; STATES(:,16) = 0.05040310692927668; CONSTANTS(:,18) = 0.0003; CONSTANTS(:,19) = 0.35; CONSTANTS(:,20) = 0.143; CONSTANTS(:,21) = 0.35; CONSTANTS(:,22) = 6.954; CONSTANTS(:,23) = 0.0042; CONSTANTS(:,24) = 6.954; CONSTANTS(:,25) = 612; STATES(:,17) = 0.04679297803939428; STATES(:,18) = 0.004220636800632867; STATES(:,19) = 0.5375825176280309; STATES(:,20) = 0.3404904569858008; STATES(:,21) = 0.5596860236041188; CONSTANTS(:,26) = 0.236; CONSTANTS(:,27) = 0.138; STATES(:,22) = 0.9999616586460943; STATES(:,23) = 3.757612529902994e-5; CONSTANTS(:,28) = 1.821; CONSTANTS(:,29) = 7.7286; STATES(:,24) = 7.531035735927369e-7; STATES(:,25) = 1.1957124194086763e-8; CONSTANTS(:,30) = 0.003125; STATES(:,26) = 0.54434573606543; CONSTANTS(:,31) = 0.1045; STATES(:,27) = 0.7520936568166604; STATES(:,28) = 0.6128486629679218; STATES(:,29) = 0.6786243213825371; STATES(:,30) = 0.018249236601344903; CONSTANTS(:,32) = 4.32; CONSTANTS(:,33) = 0; CONSTANTS(:,34) = 0.0042; CONSTANTS(:,35) = 0.152; CONSTANTS(:,36) = 0.44; CONSTANTS(:,37) = 0.0236; CONSTANTS(:,38) = 1000; CONSTANTS(:,39) = 0.008; CONSTANTS(:,40) = 1; CONSTANTS(:,41) = 1; CONSTANTS(:,42) = 8.75; CONSTANTS(:,43) = 87.5; CONSTANTS(:,44) = 0.00138; CONSTANTS(:,45) = 1.38; STATES(:,31) = 0.9218642754061908; CONSTANTS(:,46) = 6.81; CONSTANTS(:,47) = 0.32; CONSTANTS(:,48) = 0.04; CONSTANTS(:,49) = 0.01; CONSTANTS(:,50) = 0.165; CONSTANTS(:,51) = 4.05; CONSTANTS(:,52) = 69.8; CONSTANTS(:,53) = 32.88; CONSTANTS(:,54) = 0.258; CONSTANTS(:,55) = 0.094; STATES(:,32) = 0.6755031143352256; CONSTANTS(:,56) = 21; CONSTANTS(:,57) = 0.01; CONSTANTS(:,58) = 1; CONSTANTS(:,59) = 0.01; CONSTANTS(:,60) = 0.08; CONSTANTS(:,61) = 0.0008; CONSTANTS(:,62) = 0.1; CONSTANTS(:,63) = 4875; STATES(:,33) = 3.539652240305415; STATES(:,34) = 0.8709732600283433; CONSTANTS(:,64) = 1860; CONSTANTS(:,65) = 0.000849; STATES(:,35) = 0.011424172905335395; STATES(:,36) = 0.007354039651246729; CONSTANTS(:,66) = -3; CONSTANTS(:,67) = 11.58; CONSTANTS(:,68) = 13.77; STATES(:,37) = 5.185011336959393; CONSTANTS(:,69) = 1.50795; CONSTANTS(:,70) = 3.769875; CONSTANTS(:,71) = 10; CONSTANTS(:,72) = 0.8; STATES(:,38) = 0.24298053499618683; STATES(:,39) = 0.02896443650702234; STATES(:,40) = 0.0020275353474589783; CONSTANTS(:,73) = 0.007; CONSTANTS(:,74) = 39; CONSTANTS(:,75) = 0.0039; CONSTANTS(:,76) = 0.03; CONSTANTS(:,77) = 0.12; CONSTANTS(:,78) = 0.027; CONSTANTS(:,79) = 0.03; CONSTANTS(:,80) = 0.0039; CONSTANTS(:,81) = 1560; CONSTANTS(:,82) = 1.17; CONSTANTS(:,83) = 0.9602399999150041; STATES(:,41) = 0.9552449999150041; CONSTANTS(:,84) = 140000; CONSTANTS(:,85) = 0.97; CONSTANTS(:,86) = 200; CONSTANTS(:,87) = 1800000; CONSTANTS(:,88) = 1.2; CONSTANTS(:,89) = 0.005; CONSTANTS(:,90) = ( CONSTANTS(:,23).*CONSTANTS(:,20).*CONSTANTS(:,22).*CONSTANTS(:,19))./( CONSTANTS(:,21).*CONSTANTS(:,24).*CONSTANTS(:,18)); CONSTANTS(:,91) = CONSTANTS(:,30).*CONSTANTS(:,4).*power(CONSTANTS(:,7)./5.40000, 0.400000); CONSTANTS(:,92) = CONSTANTS(:,31).*CONSTANTS(:,4).*power(CONSTANTS(:,7)./5.40000, 0.200000); CONSTANTS(:,93) = piecewise({CONSTANTS(:,33)==0.00000, 0.000247500 }, 0.0123200./(1.00000+CONSTANTS(:,34)./CONSTANTS(:,33))+0.000247500); CONSTANTS(:,94) = 0.00700000.*power(CONSTANTS(:,7)./5.40000, 0.160000); CONSTANTS(:,95) = CONSTANTS(:,37).*CONSTANTS(:,38).*power(CONSTANTS(:,7)./1.00000, 0.240000); CONSTANTS(:,96) = 1.00000./(1.00000+ power(CONSTANTS(:,43)./CONSTANTS(:,5), 3.00000).*(1.00000+CONSTANTS(:,6)./CONSTANTS(:,45))); CONSTANTS(:,97) = exp( - 20.0000.*power(CONSTANTS(:,83) - CONSTANTS(:,82), 2.00000)); CONSTANTS(:,98) = CONSTANTS(:,84).*power(CONSTANTS(:,85) - CONSTANTS(:,83), 5.00000)+ CONSTANTS(:,86).*(CONSTANTS(:,85) - CONSTANTS(:,83)); CONSTANTS(:,99) = 1.00000./(1.00000+ (CONSTANTS(:,45)./CONSTANTS(:,6)).*(1.00000+power(CONSTANTS(:,5)./CONSTANTS(:,43), 3.00000))); if (isempty(STATES)), warning('Initial values for states not set');, end end function [RATES, ALGEBRAIC] = computeRates(VOI, STATES, CONSTANTS) global algebraicVariableCount; statesSize = size(STATES); statesColumnCount = statesSize(2); if ( statesColumnCount == 1) STATES = STATES'; ALGEBRAIC = zeros(1, algebraicVariableCount); utilOnes = 1; else statesRowCount = statesSize(1); ALGEBRAIC = zeros(statesRowCount, algebraicVariableCount); RATES = zeros(statesRowCount, statesColumnCount); utilOnes = ones(statesRowCount, 1); end ALGEBRAIC(:,14) = 0.0100000.*exp( 0.0133000.*(STATES(:,1)+40.0000)); RATES(:,30) = CONSTANTS(:,93).*(1.00000 - STATES(:,30)) - ALGEBRAIC(:,14).*STATES(:,30); ALGEBRAIC(:,3) = 1.00000./( 9.00000e+09.*exp(STATES(:,1)./5.00000)+ 8000.00.*exp(STATES(:,1)./100.000)); ALGEBRAIC(:,17) = 1.00000./( 0.0140000.*exp( - STATES(:,1)./5.00000)+ 4000.00.*exp( - STATES(:,1)./100.000)); RATES(:,7) = ALGEBRAIC(:,3).*(1.00000 - STATES(:,7)) - ALGEBRAIC(:,17).*STATES(:,7); ALGEBRAIC(:,5) = 1.00000./( 250000..*exp(STATES(:,1)./9.00000)+ 58.0000.*exp(STATES(:,1)./65.0000)); ALGEBRAIC(:,19) = 1.00000./( 1800.00.*exp( - STATES(:,1)./14.0000)+ 66.0000.*exp( - STATES(:,1)./65.0000)); RATES(:,13) = ALGEBRAIC(:,5).*(1.00000 - STATES(:,13)) - ALGEBRAIC(:,19).*STATES(:,13); ALGEBRAIC(:,6) = 1.00000./( 0.0190000.*exp( - STATES(:,1)./5.60000)+ 0.820000.*exp( - STATES(:,1)./250.000)); ALGEBRAIC(:,20) = 1.00000./( 40.0000.*exp(STATES(:,1)./6.30000)+ 1.50000.*exp(STATES(:,1)./10000.0)); RATES(:,17) = ALGEBRAIC(:,6).*(1.00000 - STATES(:,17)) - ALGEBRAIC(:,20).*STATES(:,17); ALGEBRAIC(:,7) = 1.00000./( 62000.0.*exp(STATES(:,1)./10.1000)+ 30.0000.*exp(STATES(:,1)./3000.00)); ALGEBRAIC(:,21) = 1.00000./( 0.000600000.*exp( - STATES(:,1)./6.70000)+ 1.20000.*exp( - STATES(:,1)./25.0000)); RATES(:,18) = ALGEBRAIC(:,7).*(1.00000 - STATES(:,18)) - ALGEBRAIC(:,21).*STATES(:,18); ALGEBRAIC(:,8) = 1.00000./( 0.150000.*exp( - STATES(:,1)./11.0000)+ 0.200000.*exp( - STATES(:,1)./700.000)); ALGEBRAIC(:,22) = 1.00000./( 16.0000.*exp(STATES(:,1)./8.00000)+ 15.0000.*exp(STATES(:,1)./50.0000)); RATES(:,19) = ALGEBRAIC(:,8).*(1.00000 - STATES(:,19)) - ALGEBRAIC(:,22).*STATES(:,19); ALGEBRAIC(:,9) = 1.00000./( 400000..*exp(STATES(:,1)./9.00000)+ 60.0000.*exp(STATES(:,1)./65.0000)); ALGEBRAIC(:,23) = 1.00000./( 700.000.*exp( - STATES(:,1)./14.0000)+ 60.0000.*exp( - STATES(:,1)./65.0000)); RATES(:,21) = ALGEBRAIC(:,9).*(1.00000 - STATES(:,21)) - ALGEBRAIC(:,23).*STATES(:,21); ALGEBRAIC(:,11) = 1.00000./( 20.0000.*exp( - STATES(:,1)./11.5000)+ 5.00000.*exp( - STATES(:,1)./300.000)); ALGEBRAIC(:,25) = 1.00000./( 160.000.*exp(STATES(:,1)./28.0000)+ 200.000.*exp(STATES(:,1)./1000.00))+1.00000./( 2500.00.*exp(STATES(:,1)./20.0000)); RATES(:,27) = ALGEBRAIC(:,11).*(1.00000 - STATES(:,27)) - ALGEBRAIC(:,25).*STATES(:,27); ALGEBRAIC(:,12) = 1.00000./( 200.000.*exp( - STATES(:,1)./13.0000)+ 20.0000.*exp( - STATES(:,1)./300.000)); ALGEBRAIC(:,26) = 1.00000./( 1600.00.*exp(STATES(:,1)./28.0000)+ 2000.00.*exp(STATES(:,1)./1000.00))+1.00000./( 10000.0.*exp(STATES(:,1)./20.0000)); RATES(:,28) = ALGEBRAIC(:,12).*(1.00000 - STATES(:,28)) - ALGEBRAIC(:,26).*STATES(:,28); ALGEBRAIC(:,13) = 1.00000./( 10.0000.*exp(STATES(:,1)./17.0000)+ 2.50000.*exp(STATES(:,1)./300.000)); ALGEBRAIC(:,27) = 1.00000./( 0.350000.*exp( - STATES(:,1)./17.0000)+ 2.00000.*exp( - STATES(:,1)./150.000)); RATES(:,29) = ALGEBRAIC(:,13).*(1.00000 - STATES(:,29)) - ALGEBRAIC(:,27).*STATES(:,29); ALGEBRAIC(:,18) = 1.00000./( 0.270000.*exp( - STATES(:,1)./5.90000)+ 1.50000.*exp( - STATES(:,1)./65.0000)); ALGEBRAIC(:,30) = 1.00000./( 480.000.*exp(STATES(:,1)./7.00000)+ 2.20000.*exp(STATES(:,1)./65.0000)); RATES(:,10) = ( STATES(:,14).*ALGEBRAIC(:,18)+ STATES(:,15).*CONSTANTS(:,17)) - STATES(:,10).*(ALGEBRAIC(:,30)+CONSTANTS(:,16)); ALGEBRAIC(:,24) = 1.00000./( 3500.00.*exp(STATES(:,1)./16.8000)+ 0.300000.*exp(STATES(:,1)./400.000)); ALGEBRAIC(:,31) = 1.00000./( 4.00000.*exp( - STATES(:,1)./14.0000)+ 2.00000.*exp( - STATES(:,1)./400.000)); RATES(:,24) = ( ALGEBRAIC(:,24).*STATES(:,23)+ ALGEBRAIC(:,31).*STATES(:,25)) - (ALGEBRAIC(:,24)+ALGEBRAIC(:,31)).*STATES(:,24); ALGEBRAIC(:,10) = (((1.00000 - STATES(:,22)) - STATES(:,23)) - STATES(:,24)) - STATES(:,25); RATES(:,25) = ( ALGEBRAIC(:,24).*STATES(:,24)+ ALGEBRAIC(:,31).*ALGEBRAIC(:,10)) - (ALGEBRAIC(:,24)+ALGEBRAIC(:,31)).*STATES(:,25); ALGEBRAIC(:,16) = 1.00000./( 0.102700.*exp( - STATES(:,1)./8.00000)+ 0.250000.*exp( - STATES(:,1)./50.0000)); ALGEBRAIC(:,29) = 1.00000./( 26.0000.*exp(STATES(:,1)./17.0000)+ 0.0200000.*exp(STATES(:,1)./800.000)); ALGEBRAIC(:,33) = 1.00000./( 0.800000.*exp( - STATES(:,1)./400.000)); RATES(:,6) = ( STATES(:,8).*ALGEBRAIC(:,16)+ STATES(:,9).*CONSTANTS(:,14)) - STATES(:,6).*(ALGEBRAIC(:,29)+ALGEBRAIC(:,33)); ALGEBRAIC(:,4) = ((1.00000 - STATES(:,10)) - STATES(:,14)) - STATES(:,15); ALGEBRAIC(:,34) = 1.00000./( 0.00180000.*exp( - STATES(:,1)./7.40000)+ 2.00000.*exp( - STATES(:,1)./100.000)); ALGEBRAIC(:,39) = 1.00000./( 2.20000e+06.*exp(STATES(:,1)./7.40000)+ 11.0000.*exp(STATES(:,1)./100.000)); RATES(:,15) = ( ALGEBRAIC(:,4).*ALGEBRAIC(:,34)+ STATES(:,10).*CONSTANTS(:,16)) - STATES(:,15).*(ALGEBRAIC(:,39)+CONSTANTS(:,17)); ALGEBRAIC(:,35) = 1.00000./( 3100.00.*exp(STATES(:,1)./13.0000)+ 700.000.*exp(STATES(:,1)./70.0000)); ALGEBRAIC(:,1) = (CONSTANTS(:,9) - STATES(:,4))+CONSTANTS(:,10); ALGEBRAIC(:,15) = CONSTANTS(:,10).*STATES(:,4); ALGEBRAIC(:,28) = (power((power(ALGEBRAIC(:,1), 2.00000)+ 4.00000.*ALGEBRAIC(:,15)), 1.0 ./ 2) - ALGEBRAIC(:,1))./2.00000; ALGEBRAIC(:,40) = 1.00000./( 95.0000.*exp( - STATES(:,1)./10.0000)+ 50.0000.*exp( - STATES(:,1)./700.000))+( ALGEBRAIC(:,28).*2.50000)./(1.00000+exp( - STATES(:,1)./5.00000)); RATES(:,20) = ALGEBRAIC(:,35).*(1.00000 - STATES(:,20)) - ALGEBRAIC(:,40).*STATES(:,20); ALGEBRAIC(:,36) = 1.00000./( 4.50000e+07.*exp(STATES(:,1)./8.00000)+ 500.000.*exp(STATES(:,1)./200.000)); ALGEBRAIC(:,41) = 1.00000./( 10.5000.*exp( - STATES(:,1)./16.4000)+ 0.400000.*exp( - STATES(:,1)./400.000)); RATES(:,22) = ALGEBRAIC(:,41).*STATES(:,23) - ALGEBRAIC(:,36).*STATES(:,22); RATES(:,23) = ( ALGEBRAIC(:,36).*STATES(:,22)+ ALGEBRAIC(:,31).*STATES(:,24)) - (ALGEBRAIC(:,24)+ALGEBRAIC(:,41)).*STATES(:,23); ALGEBRAIC(:,2) = ((1.00000 - STATES(:,8)) - STATES(:,6)) - STATES(:,9); ALGEBRAIC(:,43) = 1.00000./( 0.000102700.*exp( - STATES(:,1)./8.00000)+ 5.00000.*exp( - STATES(:,1)./400.000)); ALGEBRAIC(:,38) = 1.00000./( 1300.00.*exp(STATES(:,1)./20.0000)+ 0.0400000.*exp(STATES(:,1)./800.000)); RATES(:,9) = ( ALGEBRAIC(:,2).*ALGEBRAIC(:,43)+ STATES(:,6).*ALGEBRAIC(:,33)) - STATES(:,9).*(ALGEBRAIC(:,38)+CONSTANTS(:,14)); ALGEBRAIC(:,44) = 0.0400000./(1.00000+( CONSTANTS(:,17).*ALGEBRAIC(:,30).*ALGEBRAIC(:,34))./( CONSTANTS(:,16).*ALGEBRAIC(:,18).*ALGEBRAIC(:,39))); ALGEBRAIC(:,47) = 0.0400000 - ALGEBRAIC(:,44); RATES(:,14) = ( STATES(:,10).*ALGEBRAIC(:,30)+ ALGEBRAIC(:,4).*ALGEBRAIC(:,47)) - STATES(:,14).*(ALGEBRAIC(:,44)+ALGEBRAIC(:,18)); ALGEBRAIC(:,46) = 0.0100000./(1.00000+( CONSTANTS(:,14).*ALGEBRAIC(:,29).*ALGEBRAIC(:,43))./( ALGEBRAIC(:,33).*ALGEBRAIC(:,16).*ALGEBRAIC(:,38))); ALGEBRAIC(:,49) = 0.0100000 - ALGEBRAIC(:,46); RATES(:,8) = ( STATES(:,6).*ALGEBRAIC(:,29)+ ALGEBRAIC(:,2).*ALGEBRAIC(:,49)) - STATES(:,8).*(ALGEBRAIC(:,46)+ALGEBRAIC(:,16)); ALGEBRAIC(:,37) = piecewise({STATES(:,1)==0.00000, - CONSTANTS(:,6) }, ( (( 2.00000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))).*(ALGEBRAIC(:,28) - CONSTANTS(:,6).*exp(( - 2.00000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2)))))./(1.00000 - exp(( - 2.00000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))))); ALGEBRAIC(:,56) = 0.0676000.*ALGEBRAIC(:,37); ALGEBRAIC(:,58) = ALGEBRAIC(:,28) - 0.300000.*ALGEBRAIC(:,56); ALGEBRAIC(:,60) = ALGEBRAIC(:,58).*STATES(:,10); ALGEBRAIC(:,62) = ALGEBRAIC(:,60)+ ALGEBRAIC(:,28).*(1.00000 - STATES(:,10)); ALGEBRAIC(:,65) = CONSTANTS(:,22).*ALGEBRAIC(:,62); RATES(:,11) = ( STATES(:,16).*CONSTANTS(:,20)+ STATES(:,12).*CONSTANTS(:,90)) - STATES(:,11).*(ALGEBRAIC(:,65)+CONSTANTS(:,21)); ALGEBRAIC(:,67) = ((1.00000 - STATES(:,16)) - STATES(:,11)) - STATES(:,12); RATES(:,12) = ( STATES(:,11).*ALGEBRAIC(:,65)+ ALGEBRAIC(:,67).*CONSTANTS(:,18)) - STATES(:,12).*(CONSTANTS(:,19)+CONSTANTS(:,90)); RATES(:,16) = ( ALGEBRAIC(:,67).*CONSTANTS(:,23)+ STATES(:,11).*CONSTANTS(:,21)) - STATES(:,16).*(CONSTANTS(:,20)+ CONSTANTS(:,24).*ALGEBRAIC(:,58).*STATES(:,10)); ALGEBRAIC(:,71) = (( CONSTANTS(:,1).*CONSTANTS(:,2))./CONSTANTS(:,3)).*log(CONSTANTS(:,7)./STATES(:,3)); ALGEBRAIC(:,77) = 1.00000./( 8000.00.*exp(((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./8.50000)+ 7.00000.*exp(((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./300.000)); ALGEBRAIC(:,72) = ( 0.750000.*exp( 0.0350000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 10.0000)))./(1.00000+exp( 0.0150000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 140.000))); ALGEBRAIC(:,73) = ( 3.00000.*exp( - 0.0480000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 10.0000)).*(1.00000+exp( 0.0640000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 38.0000))))./(1.00000+exp( 0.0300000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 70.0000))); ALGEBRAIC(:,75) = ALGEBRAIC(:,73)./(ALGEBRAIC(:,72)+ALGEBRAIC(:,73)); ALGEBRAIC(:,79) = ( power(ALGEBRAIC(:,75), 4.00000).*1.00000)./( 0.000140000.*exp( - ((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./9.10000)+ 0.200000.*exp( - ((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./500.000)); RATES(:,26) = ALGEBRAIC(:,77).*(1.00000 - STATES(:,26)) - ALGEBRAIC(:,79).*STATES(:,26); ALGEBRAIC(:,99) = 1.00000.*exp(( (CONSTANTS(:,47) - 1.00000).*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))); ALGEBRAIC(:,101) = ALGEBRAIC(:,99).*CONSTANTS(:,96)+ CONSTANTS(:,41).*CONSTANTS(:,99); ALGEBRAIC(:,96) = 1.00000./(1.00000+ power(CONSTANTS(:,42)./STATES(:,2), 3.00000).*(1.00000+ALGEBRAIC(:,28)./CONSTANTS(:,44))); ALGEBRAIC(:,97) = 1.00000./(1.00000+ (CONSTANTS(:,44)./ALGEBRAIC(:,28)).*(1.00000+power(STATES(:,2)./CONSTANTS(:,42), 3.00000))); ALGEBRAIC(:,98) = 1.00000.*exp(( CONSTANTS(:,47).*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))); ALGEBRAIC(:,103) = ALGEBRAIC(:,98).*ALGEBRAIC(:,96)+ CONSTANTS(:,40).*ALGEBRAIC(:,97); RATES(:,31) = ALGEBRAIC(:,101).*(1.00000 - STATES(:,31)) - ALGEBRAIC(:,103).*STATES(:,31); ALGEBRAIC(:,32) = piecewise({STATES(:,1)==0.00000, - CONSTANTS(:,5) }, ( (( CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))).*(STATES(:,2) - CONSTANTS(:,5).*exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2)))))./(1.00000 - exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))))); ALGEBRAIC(:,85) = CONSTANTS(:,35).*ALGEBRAIC(:,32); ALGEBRAIC(:,42) = piecewise({STATES(:,1)==0.00000, STATES(:,3) }, ( (( CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))).*(STATES(:,3) - CONSTANTS(:,7).*exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2)))))./(1.00000 - exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))))); ALGEBRAIC(:,84) = 0.400000.*CONSTANTS(:,35).*ALGEBRAIC(:,42); ALGEBRAIC(:,86) = ALGEBRAIC(:,84)+ALGEBRAIC(:,85); ALGEBRAIC(:,94) = CONSTANTS(:,39).*ALGEBRAIC(:,37); ALGEBRAIC(:,87) = piecewise({STATES(:,1)== - 3.00000, CONSTANTS(:,94).*ALGEBRAIC(:,42).*13.0077 }, ( CONSTANTS(:,94).*ALGEBRAIC(:,42).*(STATES(:,1)+3.00000))./(1.00000 - exp( - (STATES(:,1)+3.00000)./13.0000))); ALGEBRAIC(:,88) = 1.00000./(1.00000+power(0.00120000./ALGEBRAIC(:,28), 3.00000)); ALGEBRAIC(:,90) = CONSTANTS(:,36).*ALGEBRAIC(:,32).*ALGEBRAIC(:,88); ALGEBRAIC(:,89) = CONSTANTS(:,36).*ALGEBRAIC(:,42).*ALGEBRAIC(:,88); ALGEBRAIC(:,91) = ALGEBRAIC(:,89)+ALGEBRAIC(:,90); ALGEBRAIC(:,92) = 0.800000./(1.00000+power(STATES(:,5)./0.100000, 2.00000)); ALGEBRAIC(:,93) = CONSTANTS(:,95).*(STATES(:,1) - ALGEBRAIC(:,71)).*ALGEBRAIC(:,92); ALGEBRAIC(:,95) = ALGEBRAIC(:,86)+ALGEBRAIC(:,94)+ALGEBRAIC(:,87)+ALGEBRAIC(:,91)+ALGEBRAIC(:,93); ALGEBRAIC(:,45) = CONSTANTS(:,13).*ALGEBRAIC(:,32).*STATES(:,6).*STATES(:,7); ALGEBRAIC(:,48) = 0.100000.*CONSTANTS(:,13).*ALGEBRAIC(:,42).*STATES(:,6).*STATES(:,7); ALGEBRAIC(:,50) = ALGEBRAIC(:,45)+ALGEBRAIC(:,48); ALGEBRAIC(:,51) = ( STATES(:,10).*(STATES(:,11)+STATES(:,12)).*STATES(:,13))./(1.00000+power(1.40000./STATES(:,5), 3.00000)); ALGEBRAIC(:,53) = 1.85000e-05.*CONSTANTS(:,15).*ALGEBRAIC(:,32).*ALGEBRAIC(:,51); ALGEBRAIC(:,54) = 0.000365000.*CONSTANTS(:,15).*ALGEBRAIC(:,42).*ALGEBRAIC(:,51); ALGEBRAIC(:,52) = CONSTANTS(:,15).*ALGEBRAIC(:,37).*ALGEBRAIC(:,51); ALGEBRAIC(:,55) = ALGEBRAIC(:,53)+ALGEBRAIC(:,52)+ALGEBRAIC(:,54); ALGEBRAIC(:,59) = CONSTANTS(:,25).*ALGEBRAIC(:,37).*STATES(:,17).*STATES(:,18); ALGEBRAIC(:,74) = ALGEBRAIC(:,72)./(ALGEBRAIC(:,72)+ALGEBRAIC(:,73)); ALGEBRAIC(:,76) = 2.00000.*power(ALGEBRAIC(:,75), 2.00000).*power(ALGEBRAIC(:,74), 2.00000); ALGEBRAIC(:,78) = (8.00000./3.00000).*power(ALGEBRAIC(:,75), 3.00000).*ALGEBRAIC(:,74); ALGEBRAIC(:,80) = power(ALGEBRAIC(:,75), 4.00000); ALGEBRAIC(:,81) = CONSTANTS(:,91).*(STATES(:,1) - ALGEBRAIC(:,71)).*(ALGEBRAIC(:,80)+ALGEBRAIC(:,78)+ALGEBRAIC(:,76)).*STATES(:,26); ALGEBRAIC(:,82) = CONSTANTS(:,92).*(STATES(:,1) - ALGEBRAIC(:,71)).*( 0.600000.*STATES(:,27)+ 0.400000.*STATES(:,28)).*STATES(:,29); ALGEBRAIC(:,61) = CONSTANTS(:,26).*ALGEBRAIC(:,32).*STATES(:,19).*STATES(:,20).*STATES(:,21); ALGEBRAIC(:,64) = CONSTANTS(:,27).*ALGEBRAIC(:,42).*STATES(:,19).*STATES(:,20).*STATES(:,21); ALGEBRAIC(:,66) = ALGEBRAIC(:,61)+ALGEBRAIC(:,64); ALGEBRAIC(:,68) = CONSTANTS(:,28).*ALGEBRAIC(:,32).*((1.00000 - STATES(:,22)) - STATES(:,23)); ALGEBRAIC(:,69) = CONSTANTS(:,29).*ALGEBRAIC(:,42).*((1.00000 - STATES(:,22)) - STATES(:,23)); ALGEBRAIC(:,70) = ALGEBRAIC(:,68)+ALGEBRAIC(:,69); ALGEBRAIC(:,83) = (( CONSTANTS(:,32).*(STATES(:,1) - ALGEBRAIC(:,71)))./(1.00000+exp((STATES(:,1)+20.0000)./20.0000))).*STATES(:,30); ALGEBRAIC(:,107) = CONSTANTS(:,5).*exp(( - 0.820000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))); ALGEBRAIC(:,108) = 1.00000./(1.00000+ power(CONSTANTS(:,52)./ALGEBRAIC(:,107), 1.06000).*(1.00000+power(CONSTANTS(:,7)./CONSTANTS(:,54), 1.12000))); ALGEBRAIC(:,104) = 1.00000./(1.00000+ power(CONSTANTS(:,51)./STATES(:,2), 1.06000).*(1.00000+power(STATES(:,3)./CONSTANTS(:,53), 1.12000))); ALGEBRAIC(:,106) = 0.370000./(1.00000+CONSTANTS(:,55)./STATES(:,5)); ALGEBRAIC(:,109) = CONSTANTS(:,56).*CONSTANTS(:,4).*1.00000.*( ALGEBRAIC(:,106).*ALGEBRAIC(:,104).*STATES(:,32) - CONSTANTS(:,48).*ALGEBRAIC(:,108).*(1.00000 - STATES(:,32))); ALGEBRAIC(:,100) = CONSTANTS(:,46).*CONSTANTS(:,4).*1.00000.*( ALGEBRAIC(:,98).*ALGEBRAIC(:,96).*STATES(:,31) - ALGEBRAIC(:,99).*CONSTANTS(:,96).*(1.00000 - STATES(:,31))); ALGEBRAIC(:,111) = ALGEBRAIC(:,50)+ALGEBRAIC(:,55)+ALGEBRAIC(:,59)+ALGEBRAIC(:,81)+ALGEBRAIC(:,82)+ALGEBRAIC(:,95)+ALGEBRAIC(:,109)+ALGEBRAIC(:,100)+ALGEBRAIC(:,66)+ALGEBRAIC(:,70)+ALGEBRAIC(:,83); RATES(:,1) = - ALGEBRAIC(:,111)./CONSTANTS(:,4); ALGEBRAIC(:,112) = ALGEBRAIC(:,45)+ALGEBRAIC(:,53)+ALGEBRAIC(:,61)+ALGEBRAIC(:,68)+ALGEBRAIC(:,85)+ALGEBRAIC(:,90)+ 3.00000.*ALGEBRAIC(:,109)+ 3.00000.*ALGEBRAIC(:,100); RATES(:,2) = - ALGEBRAIC(:,112)./( CONSTANTS(:,3).*CONSTANTS(:,8)); ALGEBRAIC(:,113) = (ALGEBRAIC(:,81)+ALGEBRAIC(:,82)+ALGEBRAIC(:,93)+ALGEBRAIC(:,83)+ALGEBRAIC(:,48)+ALGEBRAIC(:,54)+ALGEBRAIC(:,64)+ALGEBRAIC(:,69)+ALGEBRAIC(:,84)+ALGEBRAIC(:,89)+ALGEBRAIC(:,87)) - 2.00000.*ALGEBRAIC(:,109); RATES(:,3) = - ALGEBRAIC(:,113)./( CONSTANTS(:,3).*CONSTANTS(:,8)); ALGEBRAIC(:,110) = 1.00000./(1.00000+ power(CONSTANTS(:,54)./CONSTANTS(:,7), 1.12000).*(1.00000+power(ALGEBRAIC(:,107)./CONSTANTS(:,52), 1.06000))); ALGEBRAIC(:,115) = CONSTANTS(:,48).*ALGEBRAIC(:,108)+ CONSTANTS(:,50).*ALGEBRAIC(:,110); ALGEBRAIC(:,105) = 1.00000./(1.00000+ power(CONSTANTS(:,53)./STATES(:,3), 1.12000).*(1.00000+power(STATES(:,2)./CONSTANTS(:,51), 1.06000))); ALGEBRAIC(:,117) = ALGEBRAIC(:,106).*ALGEBRAIC(:,104)+ CONSTANTS(:,49).*ALGEBRAIC(:,105); RATES(:,32) = ALGEBRAIC(:,115).*(1.00000 - STATES(:,32)) - ALGEBRAIC(:,117).*STATES(:,32); ALGEBRAIC(:,116) = 1.00000./(1.00000+CONSTANTS(:,61)./ALGEBRAIC(:,28)); ALGEBRAIC(:,114) = 1.00000./(1.00000+CONSTANTS(:,60)./STATES(:,33)); ALGEBRAIC(:,120) = 1.00000./(1.00000+CONSTANTS(:,62)./STATES(:,5)); ALGEBRAIC(:,121) = CONSTANTS(:,63).*1.00000.*( CONSTANTS(:,57).*ALGEBRAIC(:,114).*STATES(:,34) - ALGEBRAIC(:,120).*ALGEBRAIC(:,116).*(1.00000 - STATES(:,34))); ALGEBRAIC(:,123) = - 0.400000.*STATES(:,39).*CONSTANTS(:,73); RATES(:,5) = (( CONSTANTS(:,11).*(CONSTANTS(:,12) - STATES(:,5))+ALGEBRAIC(:,123)) - ALGEBRAIC(:,109)./( CONSTANTS(:,3).*CONSTANTS(:,8)))+ALGEBRAIC(:,121)./( 4.00000.*CONSTANTS(:,3).*CONSTANTS(:,8)); ALGEBRAIC(:,119) = 1.00000 - ALGEBRAIC(:,116); ALGEBRAIC(:,122) = ALGEBRAIC(:,120).*ALGEBRAIC(:,116)+ CONSTANTS(:,59).*ALGEBRAIC(:,119); ALGEBRAIC(:,118) = 1.00000 - ALGEBRAIC(:,114); ALGEBRAIC(:,124) = CONSTANTS(:,57).*ALGEBRAIC(:,114)+ CONSTANTS(:,58).*ALGEBRAIC(:,118); RATES(:,34) = ALGEBRAIC(:,122).*(1.00000 - STATES(:,34)) - ALGEBRAIC(:,124).*STATES(:,34); ALGEBRAIC(:,57) = ALGEBRAIC(:,56).*ALGEBRAIC(:,51); ALGEBRAIC(:,125) = 280000..*power(ALGEBRAIC(:,28)./1.00000, 2.00000)+ CONSTANTS(:,66).*ALGEBRAIC(:,57); ALGEBRAIC(:,127) = (CONSTANTS(:,71) - STATES(:,37))+CONSTANTS(:,72); ALGEBRAIC(:,128) = CONSTANTS(:,72).*STATES(:,37); ALGEBRAIC(:,129) = (power((power(ALGEBRAIC(:,127), 2.00000)+ 4.00000.*ALGEBRAIC(:,128)), 1.0 ./ 2) - ALGEBRAIC(:,127))./2.00000; ALGEBRAIC(:,130) = 0.0800000./(1.00000+0.360000./ALGEBRAIC(:,129)); RATES(:,35) = STATES(:,36).*ALGEBRAIC(:,125) - STATES(:,35).*ALGEBRAIC(:,130); ALGEBRAIC(:,131) = 0.000377000.*power(ALGEBRAIC(:,129)./1.00000, 2.00000); RATES(:,36) = ALGEBRAIC(:,131).*(1.00000 - (STATES(:,35)+STATES(:,36))) - (ALGEBRAIC(:,125)+CONSTANTS(:,65)).*STATES(:,36); ALGEBRAIC(:,132) = CONSTANTS(:,64).*(ALGEBRAIC(:,129) - ALGEBRAIC(:,28)).*STATES(:,35); ALGEBRAIC(:,133) = CONSTANTS(:,67).*(STATES(:,33) - ALGEBRAIC(:,129)); RATES(:,37) = (ALGEBRAIC(:,133) - ALGEBRAIC(:,132))./( 2.00000.*CONSTANTS(:,3).*CONSTANTS(:,69)); ALGEBRAIC(:,126) = CONSTANTS(:,68).*(STATES(:,33) - ALGEBRAIC(:,28)); RATES(:,33) = (( - ALGEBRAIC(:,121) - ALGEBRAIC(:,133)) - ALGEBRAIC(:,126))./( 2.00000.*CONSTANTS(:,3).*CONSTANTS(:,70)); ALGEBRAIC(:,140) = CONSTANTS(:,75).*STATES(:,38).*CONSTANTS(:,97) - CONSTANTS(:,80).*STATES(:,39); ALGEBRAIC(:,136) = ((1.00000 - STATES(:,38)) - STATES(:,39)) - STATES(:,40); ALGEBRAIC(:,138) = CONSTANTS(:,74).*ALGEBRAIC(:,28).*ALGEBRAIC(:,136) - CONSTANTS(:,79).*STATES(:,38); RATES(:,38) = ALGEBRAIC(:,138) - ALGEBRAIC(:,140); ALGEBRAIC(:,134) = CONSTANTS(:,83) - STATES(:,41); RATES(:,41) = CONSTANTS(:,88).*(ALGEBRAIC(:,134) - CONSTANTS(:,89)); ALGEBRAIC(:,142) = CONSTANTS(:,76).*STATES(:,39) - CONSTANTS(:,81).*STATES(:,40).*ALGEBRAIC(:,28); ALGEBRAIC(:,145) = CONSTANTS(:,78).*power(RATES(:,41), 2.00000).*STATES(:,39); RATES(:,39) = (ALGEBRAIC(:,140) - ALGEBRAIC(:,142)) - ALGEBRAIC(:,145); ALGEBRAIC(:,143) = CONSTANTS(:,77).*STATES(:,40); ALGEBRAIC(:,144) = CONSTANTS(:,78).*power(RATES(:,41), 2.00000).*STATES(:,40); RATES(:,40) = (ALGEBRAIC(:,142) - ALGEBRAIC(:,143)) - ALGEBRAIC(:,144); ALGEBRAIC(:,102) = (ALGEBRAIC(:,52)+ALGEBRAIC(:,59)+ALGEBRAIC(:,94)) - 2.00000.*ALGEBRAIC(:,100); ALGEBRAIC(:,146) = CONSTANTS(:,73).*((ALGEBRAIC(:,145)+ALGEBRAIC(:,142)) - ALGEBRAIC(:,138)); RATES(:,4) = - (((ALGEBRAIC(:,102) - ALGEBRAIC(:,121)) - ALGEBRAIC(:,132)) - ALGEBRAIC(:,126))./( 2.00000.*CONSTANTS(:,3).*CONSTANTS(:,8))+ALGEBRAIC(:,146); RATES = RATES'; end % Calculate algebraic variables function ALGEBRAIC = computeAlgebraic(ALGEBRAIC, CONSTANTS, STATES, VOI) statesSize = size(STATES); statesColumnCount = statesSize(2); if ( statesColumnCount == 1) STATES = STATES'; utilOnes = 1; else statesRowCount = statesSize(1); utilOnes = ones(statesRowCount, 1); end ALGEBRAIC(:,14) = 0.0100000.*exp( 0.0133000.*(STATES(:,1)+40.0000)); ALGEBRAIC(:,3) = 1.00000./( 9.00000e+09.*exp(STATES(:,1)./5.00000)+ 8000.00.*exp(STATES(:,1)./100.000)); ALGEBRAIC(:,17) = 1.00000./( 0.0140000.*exp( - STATES(:,1)./5.00000)+ 4000.00.*exp( - STATES(:,1)./100.000)); ALGEBRAIC(:,5) = 1.00000./( 250000..*exp(STATES(:,1)./9.00000)+ 58.0000.*exp(STATES(:,1)./65.0000)); ALGEBRAIC(:,19) = 1.00000./( 1800.00.*exp( - STATES(:,1)./14.0000)+ 66.0000.*exp( - STATES(:,1)./65.0000)); ALGEBRAIC(:,6) = 1.00000./( 0.0190000.*exp( - STATES(:,1)./5.60000)+ 0.820000.*exp( - STATES(:,1)./250.000)); ALGEBRAIC(:,20) = 1.00000./( 40.0000.*exp(STATES(:,1)./6.30000)+ 1.50000.*exp(STATES(:,1)./10000.0)); ALGEBRAIC(:,7) = 1.00000./( 62000.0.*exp(STATES(:,1)./10.1000)+ 30.0000.*exp(STATES(:,1)./3000.00)); ALGEBRAIC(:,21) = 1.00000./( 0.000600000.*exp( - STATES(:,1)./6.70000)+ 1.20000.*exp( - STATES(:,1)./25.0000)); ALGEBRAIC(:,8) = 1.00000./( 0.150000.*exp( - STATES(:,1)./11.0000)+ 0.200000.*exp( - STATES(:,1)./700.000)); ALGEBRAIC(:,22) = 1.00000./( 16.0000.*exp(STATES(:,1)./8.00000)+ 15.0000.*exp(STATES(:,1)./50.0000)); ALGEBRAIC(:,9) = 1.00000./( 400000..*exp(STATES(:,1)./9.00000)+ 60.0000.*exp(STATES(:,1)./65.0000)); ALGEBRAIC(:,23) = 1.00000./( 700.000.*exp( - STATES(:,1)./14.0000)+ 60.0000.*exp( - STATES(:,1)./65.0000)); ALGEBRAIC(:,11) = 1.00000./( 20.0000.*exp( - STATES(:,1)./11.5000)+ 5.00000.*exp( - STATES(:,1)./300.000)); ALGEBRAIC(:,25) = 1.00000./( 160.000.*exp(STATES(:,1)./28.0000)+ 200.000.*exp(STATES(:,1)./1000.00))+1.00000./( 2500.00.*exp(STATES(:,1)./20.0000)); ALGEBRAIC(:,12) = 1.00000./( 200.000.*exp( - STATES(:,1)./13.0000)+ 20.0000.*exp( - STATES(:,1)./300.000)); ALGEBRAIC(:,26) = 1.00000./( 1600.00.*exp(STATES(:,1)./28.0000)+ 2000.00.*exp(STATES(:,1)./1000.00))+1.00000./( 10000.0.*exp(STATES(:,1)./20.0000)); ALGEBRAIC(:,13) = 1.00000./( 10.0000.*exp(STATES(:,1)./17.0000)+ 2.50000.*exp(STATES(:,1)./300.000)); ALGEBRAIC(:,27) = 1.00000./( 0.350000.*exp( - STATES(:,1)./17.0000)+ 2.00000.*exp( - STATES(:,1)./150.000)); ALGEBRAIC(:,18) = 1.00000./( 0.270000.*exp( - STATES(:,1)./5.90000)+ 1.50000.*exp( - STATES(:,1)./65.0000)); ALGEBRAIC(:,30) = 1.00000./( 480.000.*exp(STATES(:,1)./7.00000)+ 2.20000.*exp(STATES(:,1)./65.0000)); ALGEBRAIC(:,24) = 1.00000./( 3500.00.*exp(STATES(:,1)./16.8000)+ 0.300000.*exp(STATES(:,1)./400.000)); ALGEBRAIC(:,31) = 1.00000./( 4.00000.*exp( - STATES(:,1)./14.0000)+ 2.00000.*exp( - STATES(:,1)./400.000)); ALGEBRAIC(:,10) = (((1.00000 - STATES(:,22)) - STATES(:,23)) - STATES(:,24)) - STATES(:,25); ALGEBRAIC(:,16) = 1.00000./( 0.102700.*exp( - STATES(:,1)./8.00000)+ 0.250000.*exp( - STATES(:,1)./50.0000)); ALGEBRAIC(:,29) = 1.00000./( 26.0000.*exp(STATES(:,1)./17.0000)+ 0.0200000.*exp(STATES(:,1)./800.000)); ALGEBRAIC(:,33) = 1.00000./( 0.800000.*exp( - STATES(:,1)./400.000)); ALGEBRAIC(:,4) = ((1.00000 - STATES(:,10)) - STATES(:,14)) - STATES(:,15); ALGEBRAIC(:,34) = 1.00000./( 0.00180000.*exp( - STATES(:,1)./7.40000)+ 2.00000.*exp( - STATES(:,1)./100.000)); ALGEBRAIC(:,39) = 1.00000./( 2.20000e+06.*exp(STATES(:,1)./7.40000)+ 11.0000.*exp(STATES(:,1)./100.000)); ALGEBRAIC(:,35) = 1.00000./( 3100.00.*exp(STATES(:,1)./13.0000)+ 700.000.*exp(STATES(:,1)./70.0000)); ALGEBRAIC(:,1) = (CONSTANTS(:,9) - STATES(:,4))+CONSTANTS(:,10); ALGEBRAIC(:,15) = CONSTANTS(:,10).*STATES(:,4); ALGEBRAIC(:,28) = (power((power(ALGEBRAIC(:,1), 2.00000)+ 4.00000.*ALGEBRAIC(:,15)), 1.0 ./ 2) - ALGEBRAIC(:,1))./2.00000; ALGEBRAIC(:,40) = 1.00000./( 95.0000.*exp( - STATES(:,1)./10.0000)+ 50.0000.*exp( - STATES(:,1)./700.000))+( ALGEBRAIC(:,28).*2.50000)./(1.00000+exp( - STATES(:,1)./5.00000)); ALGEBRAIC(:,36) = 1.00000./( 4.50000e+07.*exp(STATES(:,1)./8.00000)+ 500.000.*exp(STATES(:,1)./200.000)); ALGEBRAIC(:,41) = 1.00000./( 10.5000.*exp( - STATES(:,1)./16.4000)+ 0.400000.*exp( - STATES(:,1)./400.000)); ALGEBRAIC(:,2) = ((1.00000 - STATES(:,8)) - STATES(:,6)) - STATES(:,9); ALGEBRAIC(:,43) = 1.00000./( 0.000102700.*exp( - STATES(:,1)./8.00000)+ 5.00000.*exp( - STATES(:,1)./400.000)); ALGEBRAIC(:,38) = 1.00000./( 1300.00.*exp(STATES(:,1)./20.0000)+ 0.0400000.*exp(STATES(:,1)./800.000)); ALGEBRAIC(:,44) = 0.0400000./(1.00000+( CONSTANTS(:,17).*ALGEBRAIC(:,30).*ALGEBRAIC(:,34))./( CONSTANTS(:,16).*ALGEBRAIC(:,18).*ALGEBRAIC(:,39))); ALGEBRAIC(:,47) = 0.0400000 - ALGEBRAIC(:,44); ALGEBRAIC(:,46) = 0.0100000./(1.00000+( CONSTANTS(:,14).*ALGEBRAIC(:,29).*ALGEBRAIC(:,43))./( ALGEBRAIC(:,33).*ALGEBRAIC(:,16).*ALGEBRAIC(:,38))); ALGEBRAIC(:,49) = 0.0100000 - ALGEBRAIC(:,46); ALGEBRAIC(:,37) = piecewise({STATES(:,1)==0.00000, - CONSTANTS(:,6) }, ( (( 2.00000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))).*(ALGEBRAIC(:,28) - CONSTANTS(:,6).*exp(( - 2.00000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2)))))./(1.00000 - exp(( - 2.00000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))))); ALGEBRAIC(:,56) = 0.0676000.*ALGEBRAIC(:,37); ALGEBRAIC(:,58) = ALGEBRAIC(:,28) - 0.300000.*ALGEBRAIC(:,56); ALGEBRAIC(:,60) = ALGEBRAIC(:,58).*STATES(:,10); ALGEBRAIC(:,62) = ALGEBRAIC(:,60)+ ALGEBRAIC(:,28).*(1.00000 - STATES(:,10)); ALGEBRAIC(:,65) = CONSTANTS(:,22).*ALGEBRAIC(:,62); ALGEBRAIC(:,67) = ((1.00000 - STATES(:,16)) - STATES(:,11)) - STATES(:,12); ALGEBRAIC(:,71) = (( CONSTANTS(:,1).*CONSTANTS(:,2))./CONSTANTS(:,3)).*log(CONSTANTS(:,7)./STATES(:,3)); ALGEBRAIC(:,77) = 1.00000./( 8000.00.*exp(((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./8.50000)+ 7.00000.*exp(((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./300.000)); ALGEBRAIC(:,72) = ( 0.750000.*exp( 0.0350000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 10.0000)))./(1.00000+exp( 0.0150000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 140.000))); ALGEBRAIC(:,73) = ( 3.00000.*exp( - 0.0480000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 10.0000)).*(1.00000+exp( 0.0640000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 38.0000))))./(1.00000+exp( 0.0300000.*((STATES(:,1) - ALGEBRAIC(:,71)) - 70.0000))); ALGEBRAIC(:,75) = ALGEBRAIC(:,73)./(ALGEBRAIC(:,72)+ALGEBRAIC(:,73)); ALGEBRAIC(:,79) = ( power(ALGEBRAIC(:,75), 4.00000).*1.00000)./( 0.000140000.*exp( - ((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./9.10000)+ 0.200000.*exp( - ((STATES(:,1) - ALGEBRAIC(:,71)) - 97.0000)./500.000)); ALGEBRAIC(:,99) = 1.00000.*exp(( (CONSTANTS(:,47) - 1.00000).*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))); ALGEBRAIC(:,101) = ALGEBRAIC(:,99).*CONSTANTS(:,96)+ CONSTANTS(:,41).*CONSTANTS(:,99); ALGEBRAIC(:,96) = 1.00000./(1.00000+ power(CONSTANTS(:,42)./STATES(:,2), 3.00000).*(1.00000+ALGEBRAIC(:,28)./CONSTANTS(:,44))); ALGEBRAIC(:,97) = 1.00000./(1.00000+ (CONSTANTS(:,44)./ALGEBRAIC(:,28)).*(1.00000+power(STATES(:,2)./CONSTANTS(:,42), 3.00000))); ALGEBRAIC(:,98) = 1.00000.*exp(( CONSTANTS(:,47).*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))); ALGEBRAIC(:,103) = ALGEBRAIC(:,98).*ALGEBRAIC(:,96)+ CONSTANTS(:,40).*ALGEBRAIC(:,97); ALGEBRAIC(:,32) = piecewise({STATES(:,1)==0.00000, - CONSTANTS(:,5) }, ( (( CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))).*(STATES(:,2) - CONSTANTS(:,5).*exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2)))))./(1.00000 - exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))))); ALGEBRAIC(:,85) = CONSTANTS(:,35).*ALGEBRAIC(:,32); ALGEBRAIC(:,42) = piecewise({STATES(:,1)==0.00000, STATES(:,3) }, ( (( CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))).*(STATES(:,3) - CONSTANTS(:,7).*exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2)))))./(1.00000 - exp(( - CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))))); ALGEBRAIC(:,84) = 0.400000.*CONSTANTS(:,35).*ALGEBRAIC(:,42); ALGEBRAIC(:,86) = ALGEBRAIC(:,84)+ALGEBRAIC(:,85); ALGEBRAIC(:,94) = CONSTANTS(:,39).*ALGEBRAIC(:,37); ALGEBRAIC(:,87) = piecewise({STATES(:,1)== - 3.00000, CONSTANTS(:,94).*ALGEBRAIC(:,42).*13.0077 }, ( CONSTANTS(:,94).*ALGEBRAIC(:,42).*(STATES(:,1)+3.00000))./(1.00000 - exp( - (STATES(:,1)+3.00000)./13.0000))); ALGEBRAIC(:,88) = 1.00000./(1.00000+power(0.00120000./ALGEBRAIC(:,28), 3.00000)); ALGEBRAIC(:,90) = CONSTANTS(:,36).*ALGEBRAIC(:,32).*ALGEBRAIC(:,88); ALGEBRAIC(:,89) = CONSTANTS(:,36).*ALGEBRAIC(:,42).*ALGEBRAIC(:,88); ALGEBRAIC(:,91) = ALGEBRAIC(:,89)+ALGEBRAIC(:,90); ALGEBRAIC(:,92) = 0.800000./(1.00000+power(STATES(:,5)./0.100000, 2.00000)); ALGEBRAIC(:,93) = CONSTANTS(:,95).*(STATES(:,1) - ALGEBRAIC(:,71)).*ALGEBRAIC(:,92); ALGEBRAIC(:,95) = ALGEBRAIC(:,86)+ALGEBRAIC(:,94)+ALGEBRAIC(:,87)+ALGEBRAIC(:,91)+ALGEBRAIC(:,93); ALGEBRAIC(:,45) = CONSTANTS(:,13).*ALGEBRAIC(:,32).*STATES(:,6).*STATES(:,7); ALGEBRAIC(:,48) = 0.100000.*CONSTANTS(:,13).*ALGEBRAIC(:,42).*STATES(:,6).*STATES(:,7); ALGEBRAIC(:,50) = ALGEBRAIC(:,45)+ALGEBRAIC(:,48); ALGEBRAIC(:,51) = ( STATES(:,10).*(STATES(:,11)+STATES(:,12)).*STATES(:,13))./(1.00000+power(1.40000./STATES(:,5), 3.00000)); ALGEBRAIC(:,53) = 1.85000e-05.*CONSTANTS(:,15).*ALGEBRAIC(:,32).*ALGEBRAIC(:,51); ALGEBRAIC(:,54) = 0.000365000.*CONSTANTS(:,15).*ALGEBRAIC(:,42).*ALGEBRAIC(:,51); ALGEBRAIC(:,52) = CONSTANTS(:,15).*ALGEBRAIC(:,37).*ALGEBRAIC(:,51); ALGEBRAIC(:,55) = ALGEBRAIC(:,53)+ALGEBRAIC(:,52)+ALGEBRAIC(:,54); ALGEBRAIC(:,59) = CONSTANTS(:,25).*ALGEBRAIC(:,37).*STATES(:,17).*STATES(:,18); ALGEBRAIC(:,74) = ALGEBRAIC(:,72)./(ALGEBRAIC(:,72)+ALGEBRAIC(:,73)); ALGEBRAIC(:,76) = 2.00000.*power(ALGEBRAIC(:,75), 2.00000).*power(ALGEBRAIC(:,74), 2.00000); ALGEBRAIC(:,78) = (8.00000./3.00000).*power(ALGEBRAIC(:,75), 3.00000).*ALGEBRAIC(:,74); ALGEBRAIC(:,80) = power(ALGEBRAIC(:,75), 4.00000); ALGEBRAIC(:,81) = CONSTANTS(:,91).*(STATES(:,1) - ALGEBRAIC(:,71)).*(ALGEBRAIC(:,80)+ALGEBRAIC(:,78)+ALGEBRAIC(:,76)).*STATES(:,26); ALGEBRAIC(:,82) = CONSTANTS(:,92).*(STATES(:,1) - ALGEBRAIC(:,71)).*( 0.600000.*STATES(:,27)+ 0.400000.*STATES(:,28)).*STATES(:,29); ALGEBRAIC(:,61) = CONSTANTS(:,26).*ALGEBRAIC(:,32).*STATES(:,19).*STATES(:,20).*STATES(:,21); ALGEBRAIC(:,64) = CONSTANTS(:,27).*ALGEBRAIC(:,42).*STATES(:,19).*STATES(:,20).*STATES(:,21); ALGEBRAIC(:,66) = ALGEBRAIC(:,61)+ALGEBRAIC(:,64); ALGEBRAIC(:,68) = CONSTANTS(:,28).*ALGEBRAIC(:,32).*((1.00000 - STATES(:,22)) - STATES(:,23)); ALGEBRAIC(:,69) = CONSTANTS(:,29).*ALGEBRAIC(:,42).*((1.00000 - STATES(:,22)) - STATES(:,23)); ALGEBRAIC(:,70) = ALGEBRAIC(:,68)+ALGEBRAIC(:,69); ALGEBRAIC(:,83) = (( CONSTANTS(:,32).*(STATES(:,1) - ALGEBRAIC(:,71)))./(1.00000+exp((STATES(:,1)+20.0000)./20.0000))).*STATES(:,30); ALGEBRAIC(:,107) = CONSTANTS(:,5).*exp(( - 0.820000.*CONSTANTS(:,3).*STATES(:,1))./( CONSTANTS(:,1).*CONSTANTS(:,2))); ALGEBRAIC(:,108) = 1.00000./(1.00000+ power(CONSTANTS(:,52)./ALGEBRAIC(:,107), 1.06000).*(1.00000+power(CONSTANTS(:,7)./CONSTANTS(:,54), 1.12000))); ALGEBRAIC(:,104) = 1.00000./(1.00000+ power(CONSTANTS(:,51)./STATES(:,2), 1.06000).*(1.00000+power(STATES(:,3)./CONSTANTS(:,53), 1.12000))); ALGEBRAIC(:,106) = 0.370000./(1.00000+CONSTANTS(:,55)./STATES(:,5)); ALGEBRAIC(:,109) = CONSTANTS(:,56).*CONSTANTS(:,4).*1.00000.*( ALGEBRAIC(:,106).*ALGEBRAIC(:,104).*STATES(:,32) - CONSTANTS(:,48).*ALGEBRAIC(:,108).*(1.00000 - STATES(:,32))); ALGEBRAIC(:,100) = CONSTANTS(:,46).*CONSTANTS(:,4).*1.00000.*( ALGEBRAIC(:,98).*ALGEBRAIC(:,96).*STATES(:,31) - ALGEBRAIC(:,99).*CONSTANTS(:,96).*(1.00000 - STATES(:,31))); ALGEBRAIC(:,111) = ALGEBRAIC(:,50)+ALGEBRAIC(:,55)+ALGEBRAIC(:,59)+ALGEBRAIC(:,81)+ALGEBRAIC(:,82)+ALGEBRAIC(:,95)+ALGEBRAIC(:,109)+ALGEBRAIC(:,100)+ALGEBRAIC(:,66)+ALGEBRAIC(:,70)+ALGEBRAIC(:,83); ALGEBRAIC(:,112) = ALGEBRAIC(:,45)+ALGEBRAIC(:,53)+ALGEBRAIC(:,61)+ALGEBRAIC(:,68)+ALGEBRAIC(:,85)+ALGEBRAIC(:,90)+ 3.00000.*ALGEBRAIC(:,109)+ 3.00000.*ALGEBRAIC(:,100); ALGEBRAIC(:,113) = (ALGEBRAIC(:,81)+ALGEBRAIC(:,82)+ALGEBRAIC(:,93)+ALGEBRAIC(:,83)+ALGEBRAIC(:,48)+ALGEBRAIC(:,54)+ALGEBRAIC(:,64)+ALGEBRAIC(:,69)+ALGEBRAIC(:,84)+ALGEBRAIC(:,89)+ALGEBRAIC(:,87)) - 2.00000.*ALGEBRAIC(:,109); ALGEBRAIC(:,110) = 1.00000./(1.00000+ power(CONSTANTS(:,54)./CONSTANTS(:,7), 1.12000).*(1.00000+power(ALGEBRAIC(:,107)./CONSTANTS(:,52), 1.06000))); ALGEBRAIC(:,115) = CONSTANTS(:,48).*ALGEBRAIC(:,108)+ CONSTANTS(:,50).*ALGEBRAIC(:,110); ALGEBRAIC(:,105) = 1.00000./(1.00000+ power(CONSTANTS(:,53)./STATES(:,3), 1.12000).*(1.00000+power(STATES(:,2)./CONSTANTS(:,51), 1.06000))); ALGEBRAIC(:,117) = ALGEBRAIC(:,106).*ALGEBRAIC(:,104)+ CONSTANTS(:,49).*ALGEBRAIC(:,105); ALGEBRAIC(:,116) = 1.00000./(1.00000+CONSTANTS(:,61)./ALGEBRAIC(:,28)); ALGEBRAIC(:,114) = 1.00000./(1.00000+CONSTANTS(:,60)./STATES(:,33)); ALGEBRAIC(:,120) = 1.00000./(1.00000+CONSTANTS(:,62)./STATES(:,5)); ALGEBRAIC(:,121) = CONSTANTS(:,63).*1.00000.*( CONSTANTS(:,57).*ALGEBRAIC(:,114).*STATES(:,34) - ALGEBRAIC(:,120).*ALGEBRAIC(:,116).*(1.00000 - STATES(:,34))); ALGEBRAIC(:,123) = - 0.400000.*STATES(:,39).*CONSTANTS(:,73); ALGEBRAIC(:,119) = 1.00000 - ALGEBRAIC(:,116); ALGEBRAIC(:,122) = ALGEBRAIC(:,120).*ALGEBRAIC(:,116)+ CONSTANTS(:,59).*ALGEBRAIC(:,119); ALGEBRAIC(:,118) = 1.00000 - ALGEBRAIC(:,114); ALGEBRAIC(:,124) = CONSTANTS(:,57).*ALGEBRAIC(:,114)+ CONSTANTS(:,58).*ALGEBRAIC(:,118); ALGEBRAIC(:,57) = ALGEBRAIC(:,56).*ALGEBRAIC(:,51); ALGEBRAIC(:,125) = 280000..*power(ALGEBRAIC(:,28)./1.00000, 2.00000)+ CONSTANTS(:,66).*ALGEBRAIC(:,57); ALGEBRAIC(:,127) = (CONSTANTS(:,71) - STATES(:,37))+CONSTANTS(:,72); ALGEBRAIC(:,128) = CONSTANTS(:,72).*STATES(:,37); ALGEBRAIC(:,129) = (power((power(ALGEBRAIC(:,127), 2.00000)+ 4.00000.*ALGEBRAIC(:,128)), 1.0 ./ 2) - ALGEBRAIC(:,127))./2.00000; ALGEBRAIC(:,130) = 0.0800000./(1.00000+0.360000./ALGEBRAIC(:,129)); ALGEBRAIC(:,131) = 0.000377000.*power(ALGEBRAIC(:,129)./1.00000, 2.00000); ALGEBRAIC(:,132) = CONSTANTS(:,64).*(ALGEBRAIC(:,129) - ALGEBRAIC(:,28)).*STATES(:,35); ALGEBRAIC(:,133) = CONSTANTS(:,67).*(STATES(:,33) - ALGEBRAIC(:,129)); ALGEBRAIC(:,126) = CONSTANTS(:,68).*(STATES(:,33) - ALGEBRAIC(:,28)); ALGEBRAIC(:,140) = CONSTANTS(:,75).*STATES(:,38).*CONSTANTS(:,97) - CONSTANTS(:,80).*STATES(:,39); ALGEBRAIC(:,136) = ((1.00000 - STATES(:,38)) - STATES(:,39)) - STATES(:,40); ALGEBRAIC(:,138) = CONSTANTS(:,74).*ALGEBRAIC(:,28).*ALGEBRAIC(:,136) - CONSTANTS(:,79).*STATES(:,38); ALGEBRAIC(:,134) = CONSTANTS(:,83) - STATES(:,41); ALGEBRAIC(:,142) = CONSTANTS(:,76).*STATES(:,39) - CONSTANTS(:,81).*STATES(:,40).*ALGEBRAIC(:,28); ALGEBRAIC(:,145) = CONSTANTS(:,78).*power(RATES(:,41), 2.00000).*STATES(:,39); ALGEBRAIC(:,143) = CONSTANTS(:,77).*STATES(:,40); ALGEBRAIC(:,144) = CONSTANTS(:,78).*power(RATES(:,41), 2.00000).*STATES(:,40); ALGEBRAIC(:,102) = (ALGEBRAIC(:,52)+ALGEBRAIC(:,59)+ALGEBRAIC(:,94)) - 2.00000.*ALGEBRAIC(:,100); ALGEBRAIC(:,146) = CONSTANTS(:,73).*((ALGEBRAIC(:,145)+ALGEBRAIC(:,142)) - ALGEBRAIC(:,138)); ALGEBRAIC(:,63) = CONSTANTS(:,24).*ALGEBRAIC(:,60); ALGEBRAIC(:,135) = CONSTANTS(:,73).*(STATES(:,39)+STATES(:,40)); ALGEBRAIC(:,137) = CONSTANTS(:,87).*ALGEBRAIC(:,135); ALGEBRAIC(:,139) = ALGEBRAIC(:,137).*ALGEBRAIC(:,134); ALGEBRAIC(:,141) = - CONSTANTS(:,98)+ALGEBRAIC(:,139); end % Compute result of a piecewise function function x = piecewise(cases, default) set = [0]; for i = 1:2:length(cases) if (length(cases{i+1}) == 1) x(cases{i} & ~set,:) = cases{i+1}; else x(cases{i} & ~set,:) = cases{i+1}(cases{i} & ~set); end set = set | cases{i}; if(set), break, end end if (length(default) == 1) x(~set,:) = default; else x(~set,:) = default(~set); end end % Pad out or shorten strings to a set length function strout = strpad(strin) req_length = 160; insize = size(strin,2); if insize > req_length strout = strin(1:req_length); else strout = [strin, blanks(req_length - insize)]; end end