/* There are a total of 30 entries in the algebraic variable array. There are a total of 18 entries in each of the rate and state variable arrays. There are a total of 33 entries in the constant variable array. */ /* * VOI is time in component environment (second). * STATES[0] is q_ATP in component environment (fmol). * STATES[1] is q_AC in component environment (fmol). * STATES[2] is q_cAMP in component environment (fmol). * STATES[3] is q_AC_ATP in component environment (fmol). * STATES[4] is q_FSK in component environment (fmol). * STATES[5] is q_FSK_AC in component environment (fmol). * STATES[6] is q_FSK_AC_ATP in component environment (fmol). * STATES[7] is q_Gsa_GTP in component environment (fmol). * STATES[8] is q_Gsa_GTP_AC in component environment (fmol). * STATES[9] is q_Gsa_GTP_AC_ATP in component environment (fmol). * STATES[10] is q_PDE in component environment (fmol). * STATES[11] is q_PDEinh in component environment (fmol). * STATES[12] is q_PDE_cAMP in component environment (fmol). * STATES[13] is q_IBMX in component environment (fmol). * STATES[14] is q_five_AMP in component environment (fmol). * STATES[15] is q_Gia_GTP in component environment (fmol). * STATES[16] is q_ACinh in component environment (fmol). * STATES[17] is q_PPi in component environment (fmol). * ALGEBRAIC[18] is v_1a in component cAMP (fmol_per_sec). * ALGEBRAIC[19] is v_1b in component cAMP (fmol_per_sec). * ALGEBRAIC[20] is v_2a in component cAMP (fmol_per_sec). * ALGEBRAIC[21] is v_2b in component cAMP (fmol_per_sec). * ALGEBRAIC[22] is v_3a in component cAMP (fmol_per_sec). * ALGEBRAIC[23] is v_3b in component cAMP (fmol_per_sec). * ALGEBRAIC[24] is v_4a in component cAMP (fmol_per_sec). * ALGEBRAIC[25] is v_4b in component cAMP (fmol_per_sec). * ALGEBRAIC[26] is v_5 in component cAMP (fmol_per_sec). * ALGEBRAIC[27] is v_6 in component cAMP (fmol_per_sec). * ALGEBRAIC[28] is v_7 in component cAMP (fmol_per_sec). * ALGEBRAIC[29] is v_GiAC in component cAMP (fmol_per_sec). * CONSTANTS[0] is kappa_1a in component cAMP_parameters (fmol_per_sec). * CONSTANTS[1] is kappa_1b in component cAMP_parameters (fmol_per_sec). * CONSTANTS[2] is kappa_2a in component cAMP_parameters (fmol_per_sec). * CONSTANTS[3] is kappa_2b in component cAMP_parameters (fmol_per_sec). * CONSTANTS[4] is kappa_3a in component cAMP_parameters (fmol_per_sec). * CONSTANTS[5] is kappa_3b in component cAMP_parameters (fmol_per_sec). * CONSTANTS[6] is kappa_4a in component cAMP_parameters (fmol_per_sec). * CONSTANTS[7] is kappa_4b in component cAMP_parameters (fmol_per_sec). * CONSTANTS[8] is kappa_5 in component cAMP_parameters (fmol_per_sec). * CONSTANTS[9] is kappa_6 in component cAMP_parameters (fmol_per_sec). * CONSTANTS[10] is kappa_7 in component cAMP_parameters (fmol_per_sec). * CONSTANTS[11] is kappa_GiAC in component cAMP_parameters (fmol_per_sec). * CONSTANTS[12] is K_ATP in component cAMP_parameters (per_fmol). * CONSTANTS[13] is K_cAMP in component cAMP_parameters (per_fmol). * CONSTANTS[14] is K_AC in component cAMP_parameters (per_fmol). * CONSTANTS[15] is K_AC_ATP in component cAMP_parameters (per_fmol). * CONSTANTS[16] is K_Gsa_GTP_AC in component cAMP_parameters (per_fmol). * CONSTANTS[17] is K_Gsa_GTP_AC_ATP in component cAMP_parameters (per_fmol). * CONSTANTS[18] is K_FSK_AC in component cAMP_parameters (per_fmol). * CONSTANTS[19] is K_FSK_AC_ATP in component cAMP_parameters (per_fmol). * CONSTANTS[20] is K_PDE in component cAMP_parameters (per_fmol). * CONSTANTS[21] is K_PDE_cAMP in component cAMP_parameters (per_fmol). * CONSTANTS[22] is K_five_AMP in component cAMP_parameters (per_fmol). * CONSTANTS[23] is K_IBMX in component cAMP_parameters (per_fmol). * CONSTANTS[24] is K_PDEinh in component cAMP_parameters (per_fmol). * CONSTANTS[25] is K_Gsa_GTP in component cAMP_parameters (per_fmol). * CONSTANTS[26] is K_FSK in component cAMP_parameters (per_fmol). * CONSTANTS[27] is K_Gia_GTP in component cAMP_parameters (per_fmol). * CONSTANTS[28] is K_ACinh in component cAMP_parameters (per_fmol). * CONSTANTS[29] is K_PPi in component cAMP_parameters (per_fmol). * CONSTANTS[30] is R in component constants (J_per_K_per_mol). * CONSTANTS[31] is T in component constants (kelvin). * ALGEBRAIC[0] is mu_ATP in component cAMP (J_per_mol). * ALGEBRAIC[1] is mu_cAMP in component cAMP (J_per_mol). * ALGEBRAIC[2] is mu_AC in component cAMP (J_per_mol). * ALGEBRAIC[3] is mu_AC_ATP in component cAMP (J_per_mol). * ALGEBRAIC[4] is mu_Gsa_GTP_AC in component cAMP (J_per_mol). * ALGEBRAIC[5] is mu_Gsa_GTP_AC_ATP in component cAMP (J_per_mol). * ALGEBRAIC[6] is mu_FSK_AC in component cAMP (J_per_mol). * ALGEBRAIC[7] is mu_FSK_AC_ATP in component cAMP (J_per_mol). * ALGEBRAIC[8] is mu_PDE in component cAMP (J_per_mol). * ALGEBRAIC[9] is mu_PDE_cAMP in component cAMP (J_per_mol). * ALGEBRAIC[10] is mu_five_AMP in component cAMP (J_per_mol). * ALGEBRAIC[11] is mu_IBMX in component cAMP (J_per_mol). * ALGEBRAIC[12] is mu_PDEinh in component cAMP (J_per_mol). * ALGEBRAIC[13] is mu_Gsa_GTP in component cAMP (J_per_mol). * ALGEBRAIC[14] is mu_FSK in component cAMP (J_per_mol). * ALGEBRAIC[15] is mu_Gia_GTP in component cAMP (J_per_mol). * ALGEBRAIC[16] is mu_ACinh in component cAMP (J_per_mol). * ALGEBRAIC[17] is mu_PPi in component cAMP (J_per_mol). * CONSTANTS[32] is F in component constants (C_per_mol). * RATES[0] is d/dt q_ATP in component environment (fmol). * RATES[1] is d/dt q_AC in component environment (fmol). * RATES[3] is d/dt q_AC_ATP in component environment (fmol). * RATES[2] is d/dt q_cAMP in component environment (fmol). * RATES[4] is d/dt q_FSK in component environment (fmol). * RATES[5] is d/dt q_FSK_AC in component environment (fmol). * RATES[6] is d/dt q_FSK_AC_ATP in component environment (fmol). * RATES[7] is d/dt q_Gsa_GTP in component environment (fmol). * RATES[8] is d/dt q_Gsa_GTP_AC in component environment (fmol). * RATES[9] is d/dt q_Gsa_GTP_AC_ATP in component environment (fmol). * RATES[12] is d/dt q_PDE_cAMP in component environment (fmol). * RATES[10] is d/dt q_PDE in component environment (fmol). * RATES[13] is d/dt q_IBMX in component environment (fmol). * RATES[11] is d/dt q_PDEinh in component environment (fmol). * RATES[14] is d/dt q_five_AMP in component environment (fmol). * RATES[15] is d/dt q_Gia_GTP in component environment (fmol). * RATES[16] is d/dt q_ACinh in component environment (fmol). * RATES[17] is d/dt q_PPi in component environment (fmol). * There are a total of 0 condition variables. */ void initConsts(double* CONSTANTS, double* RATES, double *STATES) { STATES[0] = 190; STATES[1] = 1.889E-03; STATES[2] = 3.212E-02; STATES[3] = 1e-18; STATES[4] = 3.8e-5; STATES[5] = 1e-18; STATES[6] = 1e-18; STATES[7] = 9.519E-04; STATES[8] = 1e-18; STATES[9] = 1e-18; STATES[10] = 1.482E-03; STATES[11] = 1e-18; STATES[12] = 1e-18; STATES[13] = 3.80E-06; STATES[14] = 1e-18; STATES[15] = 4.81E-04; STATES[16] = 1e-18; STATES[17] = 1e-18; CONSTANTS[0] = 9.47329e+06; CONSTANTS[1] = 0.00197793; CONSTANTS[2] = 176000; CONSTANTS[3] = 0.047492; CONSTANTS[4] = 5.07667e+08; CONSTANTS[5] = 5.9031e-17; CONSTANTS[6] = 36084.5; CONSTANTS[7] = 0.138787; CONSTANTS[8] = 751.564; CONSTANTS[9] = 556.617; CONSTANTS[10] = 160555; CONSTANTS[11] = 685.521; CONSTANTS[12] = 9.19362e-06; CONSTANTS[13] = 0.0102598; CONSTANTS[14] = 9.02358; CONSTANTS[15] = 2.93942; CONSTANTS[16] = 52.2258; CONSTANTS[17] = 5.20284; CONSTANTS[18] = 0.181058; CONSTANTS[19] = 0.0492449; CONSTANTS[20] = 2.28256; CONSTANTS[21] = 1.04728; CONSTANTS[22] = 0.0102598; CONSTANTS[23] = 0.01642; CONSTANTS[24] = 38.679; CONSTANTS[25] = 0.420618; CONSTANTS[26] = 1.32565e-05; CONSTANTS[27] = 0.013661; CONSTANTS[28] = 42.4053; CONSTANTS[29] = 2.60488e-05; CONSTANTS[30] = 8.31; CONSTANTS[31] = 310; CONSTANTS[32] = 96485; RATES[0] = 0.1001; RATES[1] = 0.1001; RATES[3] = 0.1001; RATES[2] = 0.1001; RATES[4] = 0.1001; RATES[5] = 0.1001; RATES[6] = 0.1001; RATES[7] = 0.1001; RATES[8] = 0.1001; RATES[9] = 0.1001; RATES[12] = 0.1001; RATES[10] = 0.1001; RATES[13] = 0.1001; RATES[11] = 0.1001; RATES[14] = 0.1001; RATES[15] = 0.1001; RATES[16] = 0.1001; RATES[17] = 0.1001; } void computeResiduals(double VOI, double* CONSTANTS, double* RATES, double* OLDRATES, double* STATES, double* OLDSTATES, double* ALGEBRAIC, double* CONDVARS) { resid[0] = RATES[0] - (- ALGEBRAIC[18] - ALGEBRAIC[22]) - ALGEBRAIC[20]; resid[1] = RATES[1] - (((ALGEBRAIC[19] - ALGEBRAIC[18]) - ALGEBRAIC[27]) - ALGEBRAIC[28]) - ALGEBRAIC[29]; resid[2] = RATES[3] - ALGEBRAIC[18] - ALGEBRAIC[19]; resid[3] = RATES[2] - (ALGEBRAIC[19]+ALGEBRAIC[23]+ALGEBRAIC[21]) - ALGEBRAIC[24]; resid[4] = RATES[4] - - ALGEBRAIC[28]; resid[5] = RATES[5] - (ALGEBRAIC[28]+ALGEBRAIC[23]) - ALGEBRAIC[22]; resid[6] = RATES[6] - ALGEBRAIC[22] - ALGEBRAIC[23]; resid[7] = RATES[7] - - ALGEBRAIC[27]; resid[8] = RATES[8] - (ALGEBRAIC[27] - ALGEBRAIC[20])+ALGEBRAIC[21]; resid[9] = RATES[9] - ALGEBRAIC[20] - ALGEBRAIC[21]; resid[10] = RATES[12] - ALGEBRAIC[24] - ALGEBRAIC[25]; resid[11] = RATES[10] - (ALGEBRAIC[25] - ALGEBRAIC[24]) - ALGEBRAIC[26]; resid[12] = RATES[13] - - ALGEBRAIC[26]; resid[13] = RATES[11] - ALGEBRAIC[26]; resid[14] = RATES[14] - ALGEBRAIC[25]; resid[15] = RATES[15] - - ALGEBRAIC[29]; resid[16] = RATES[16] - ALGEBRAIC[29]; resid[17] = RATES[17] - ALGEBRAIC[29]; } void computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { } void computeEssentialVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { ALGEBRAIC[0] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[12]*STATES[0]); ALGEBRAIC[2] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[14]*STATES[1]); ALGEBRAIC[3] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[15]*STATES[3]); ALGEBRAIC[18] = CONSTANTS[0]*(exp((ALGEBRAIC[2]+ALGEBRAIC[0])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[3]/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[1] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[13]*STATES[2]); ALGEBRAIC[17] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[29]*STATES[17]); ALGEBRAIC[19] = CONSTANTS[1]*(exp(ALGEBRAIC[3]/( CONSTANTS[30]*CONSTANTS[31])) - exp((ALGEBRAIC[2]+ALGEBRAIC[1]+ALGEBRAIC[17])/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[4] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[16]*STATES[8]); ALGEBRAIC[5] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[17]*STATES[9]); ALGEBRAIC[20] = CONSTANTS[2]*(exp((ALGEBRAIC[4]+ALGEBRAIC[0])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[5]/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[21] = CONSTANTS[3]*(exp(ALGEBRAIC[5]/( CONSTANTS[30]*CONSTANTS[31])) - exp((ALGEBRAIC[4]+ALGEBRAIC[1]+ALGEBRAIC[17])/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[6] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[18]*STATES[5]); ALGEBRAIC[7] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[19]*STATES[6]); ALGEBRAIC[22] = CONSTANTS[4]*(exp((ALGEBRAIC[6]+ALGEBRAIC[0])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[7]/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[23] = CONSTANTS[5]*(exp(ALGEBRAIC[7]/( CONSTANTS[30]*CONSTANTS[31])) - exp((ALGEBRAIC[6]+ALGEBRAIC[1]+ALGEBRAIC[17])/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[8] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[20]*STATES[10]); ALGEBRAIC[9] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[21]*STATES[12]); ALGEBRAIC[24] = CONSTANTS[6]*(exp((ALGEBRAIC[8]+ALGEBRAIC[1])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[9]/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[10] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[22]*STATES[14]); ALGEBRAIC[25] = CONSTANTS[7]*(exp(ALGEBRAIC[9]/( CONSTANTS[30]*CONSTANTS[31])) - exp((ALGEBRAIC[8]+ALGEBRAIC[10])/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[11] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[23]*STATES[13]); ALGEBRAIC[12] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[24]*STATES[11]); ALGEBRAIC[26] = CONSTANTS[8]*(exp((ALGEBRAIC[8]+ALGEBRAIC[11])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[12]/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[13] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[25]*STATES[7]); ALGEBRAIC[27] = CONSTANTS[9]*(exp((ALGEBRAIC[2]+ALGEBRAIC[13])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[4]/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[14] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[26]*STATES[4]); ALGEBRAIC[28] = CONSTANTS[10]*(exp((ALGEBRAIC[14]+ALGEBRAIC[2])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[6]/( CONSTANTS[30]*CONSTANTS[31]))); ALGEBRAIC[15] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[27]*STATES[15]); ALGEBRAIC[16] = CONSTANTS[30]*CONSTANTS[31]*log( CONSTANTS[28]*STATES[16]); ALGEBRAIC[29] = CONSTANTS[11]*(exp((ALGEBRAIC[2]+ALGEBRAIC[15])/( CONSTANTS[30]*CONSTANTS[31])) - exp(ALGEBRAIC[16]/( CONSTANTS[30]*CONSTANTS[31]))); } void getStateInformation(double* SI) { SI[0] = 1.0; SI[1] = 1.0; SI[2] = 1.0; SI[3] = 1.0; SI[4] = 1.0; SI[5] = 1.0; SI[6] = 1.0; SI[7] = 1.0; SI[8] = 1.0; SI[9] = 1.0; SI[10] = 1.0; SI[11] = 1.0; SI[12] = 1.0; SI[13] = 1.0; SI[14] = 1.0; SI[15] = 1.0; SI[16] = 1.0; SI[17] = 1.0; } void computeRoots(double VOI, double* CONSTANTS, double* RATES, double* OLDRATES, double* STATES, double* OLDSTATES, double* ALGEBRAIC, double* CONDVARS) { }