/* There are a total of 6 entries in the algebraic variable array. There are a total of 4 entries in each of the rate and state variable arrays. There are a total of 17 entries in the constant variable array. */ /* * VOI is time in component temporalExistence (second). * CONSTANTS[0] is alphaTF in component Device_TFgenerator (uM_per_second). * CONSTANTS[14] is JTF in component Device_TFgenerator (uM_per_second). * STATES[0] is TFS in component BioEnv_TFSAssociation (uM). * ALGEBRAIC[5] is Jgain_TF in component BioEnv_TFSAssociation_interface (uM_per_second). * CONSTANTS[15] is Jgain_TFS in component BioEnv_TFSAssociation_interface (uM_per_second). * ALGEBRAIC[3] is JTF in component Device_PhzMSgenerator (uM_per_second). * STATES[1] is TF in component BioEnv_TFSAssociation (uM). * CONSTANTS[1] is s in component BioEnv_TFSAssociation (uM). * CONSTANTS[2] is betaTFS in component BioEnv_TFSAssociation (per_uM_per_second). * CONSTANTS[3] is kd in component BioEnv_TFSAssociation (per_second). * CONSTANTS[4] is deltaTFS in component BioEnv_TFSAssociation (per_second). * CONSTANTS[5] is deltaTF in component BioEnv_TFSAssociation (per_second). * ALGEBRAIC[0] is Jassociation in component BioEnv_TFSAssociation (uM_per_second). * CONSTANTS[6] is gammaPhzMS in component Device_PhzMSgenerator (uM). * CONSTANTS[7] is betaPhzMS in component Device_PhzMSgenerator (uM_per_second). * ALGEBRAIC[1] is JPhzMS in component Device_PhzMSgenerator (uM_per_second). * CONSTANTS[8] is gammaTF in component Device_PhzMSgenerator (uM). * CONSTANTS[9] is betaTF in component Device_PhzMSgenerator (uM_per_second). * CONSTANTS[10] is feedbackOn in component Device_PhzMSgenerator (dimensionless). * ALGEBRAIC[4] is Jgain_PhzMS in component BioEnv_PhzMStoPYO_interface (uM_per_second). * CONSTANTS[16] is Jgain_PYO in component BioEnv_PhzMStoPYO_interface (uM_per_second). * STATES[2] is PhzMS in component BioEnv_PhzMStoPYO (uM). * STATES[3] is PYO in component BioEnv_PhzMStoPYO (uM). * CONSTANTS[11] is deltaPhzMS in component BioEnv_PhzMStoPYO (per_second). * CONSTANTS[12] is alphaPYO in component BioEnv_PhzMStoPYO (per_second). * CONSTANTS[13] is deltaPYO in component BioEnv_PhzMStoPYO (per_second). * ALGEBRAIC[2] is JPYOformation in component BioEnv_PhzMStoPYO (uM_per_second). * RATES[1] is d/dt TF in component BioEnv_TFSAssociation (uM). * RATES[0] is d/dt TFS in component BioEnv_TFSAssociation (uM). * RATES[2] is d/dt PhzMS in component BioEnv_PhzMStoPYO (uM). * RATES[3] is d/dt PYO in component BioEnv_PhzMStoPYO (uM). */ void initConsts(double* CONSTANTS, double* RATES, double *STATES) { CONSTANTS[0] = 0.05; STATES[0] = 0; STATES[1] = 8.6207; CONSTANTS[1] = 5; CONSTANTS[2] = 1e6; CONSTANTS[3] = 4e6; CONSTANTS[4] = 3.851e-4; CONSTANTS[5] = 5.8e-3; CONSTANTS[6] = 5; CONSTANTS[7] = 0.1; CONSTANTS[8] = 4; CONSTANTS[9] = 0.07; CONSTANTS[10] = 1; STATES[2] = 0; STATES[3] = 0; CONSTANTS[11] = 8.0225e-6; CONSTANTS[12] = 1.3; CONSTANTS[13] = 5.8e-1; CONSTANTS[14] = CONSTANTS[0]; CONSTANTS[15] = 0.00000; CONSTANTS[16] = 0.00000; } void computeRates(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { ALGEBRAIC[0] = CONSTANTS[2]*CONSTANTS[1]*STATES[1] - CONSTANTS[3]*STATES[0]; RATES[0] = (ALGEBRAIC[0] - CONSTANTS[4]*STATES[0])+CONSTANTS[15]; ALGEBRAIC[2] = CONSTANTS[12]*STATES[2]; RATES[3] = (CONSTANTS[16] - CONSTANTS[13]*STATES[3])+ALGEBRAIC[2]; ALGEBRAIC[1] = ( CONSTANTS[7]*STATES[0])/(CONSTANTS[6]+STATES[0]); ALGEBRAIC[4] = ALGEBRAIC[1]; RATES[2] = ALGEBRAIC[4] - CONSTANTS[11]*STATES[2]; ALGEBRAIC[3] = (CONSTANTS[10] != 0.00000 ? ( CONSTANTS[9]*STATES[0])/(CONSTANTS[8]+STATES[0]) : 0.00000); ALGEBRAIC[5] = CONSTANTS[14]+ALGEBRAIC[3]; RATES[1] = (- ALGEBRAIC[0]+ALGEBRAIC[5]) - CONSTANTS[5]*STATES[1]; } void computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { ALGEBRAIC[0] = CONSTANTS[2]*CONSTANTS[1]*STATES[1] - CONSTANTS[3]*STATES[0]; ALGEBRAIC[2] = CONSTANTS[12]*STATES[2]; ALGEBRAIC[1] = ( CONSTANTS[7]*STATES[0])/(CONSTANTS[6]+STATES[0]); ALGEBRAIC[4] = ALGEBRAIC[1]; ALGEBRAIC[3] = (CONSTANTS[10] != 0.00000 ? ( CONSTANTS[9]*STATES[0])/(CONSTANTS[8]+STATES[0]) : 0.00000); ALGEBRAIC[5] = CONSTANTS[14]+ALGEBRAIC[3]; }