/*
   There are a total of 0 entries in the algebraic variable array.
   There are a total of 6 entries in each of the rate and state variable arrays.
   There are a total of 8 entries in the constant variable array.
 */
/*
 * VOI is time in component environment (second).
 * STATES[0] is Ca in component Ca (micromolar).
 * CONSTANTS[0] is k1 in component reaction_constants (second_order_rate_constant).
 * CONSTANTS[1] is k1_ in component reaction_constants (first_order_rate_constant).
 * CONSTANTS[2] is k2 in component reaction_constants (second_order_rate_constant).
 * CONSTANTS[3] is k2_ in component reaction_constants (first_order_rate_constant).
 * STATES[1] is Fluo in component Fluo (micromolar).
 * STATES[2] is CaFluo in component CaFluo (micromolar).
 * STATES[3] is CaPrFluo in component CaPrFluo (micromolar).
 * STATES[4] is PrFluo in component PrFluo (micromolar).
 * CONSTANTS[4] is k3 in component reaction_constants (second_order_rate_constant).
 * CONSTANTS[5] is k3_ in component reaction_constants (first_order_rate_constant).
 * STATES[5] is Pr in component Pr (micromolar).
 * CONSTANTS[6] is k4 in component reaction_constants (second_order_rate_constant).
 * CONSTANTS[7] is k4_ in component reaction_constants (first_order_rate_constant).
 * RATES[0] is d/dt Ca in component Ca (micromolar).
 * RATES[1] is d/dt Fluo in component Fluo (micromolar).
 * RATES[5] is d/dt Pr in component Pr (micromolar).
 * RATES[4] is d/dt PrFluo in component PrFluo (micromolar).
 * RATES[2] is d/dt CaFluo in component CaFluo (micromolar).
 * RATES[3] is d/dt CaPrFluo in component CaPrFluo (micromolar).
 */
void
initConsts(double* CONSTANTS, double* RATES, double *STATES)
{
STATES[0] = 0.05;
CONSTANTS[0] = 2.676E14;
CONSTANTS[1] = 137.0;
CONSTANTS[2] = 1.72E13;
CONSTANTS[3] = 32.9;
STATES[1] = 11.88;
STATES[2] = 0.01;
STATES[3] = 0.01;
STATES[4] = 88.12;
CONSTANTS[4] = 0.1149E14;
CONSTANTS[5] = 4216.0;
STATES[5] = 3000.0;
CONSTANTS[6] = 0.1149E14;
CONSTANTS[7] = 15777.0;
}
void
computeRates(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
RATES[0] = ( CONSTANTS[1]*STATES[2]+ CONSTANTS[3]*STATES[3]) - ( CONSTANTS[0]*STATES[0]*STATES[1]+ CONSTANTS[2]*STATES[0]*STATES[4]);
RATES[1] = ( CONSTANTS[5]*STATES[4]+ CONSTANTS[1]*STATES[2]) - ( CONSTANTS[4]*STATES[5]*STATES[1]+ CONSTANTS[0]*STATES[0]*STATES[1]);
RATES[5] = ( CONSTANTS[7]*STATES[3]+ CONSTANTS[5]*STATES[4]) - ( CONSTANTS[6]*STATES[5]*STATES[2]+ CONSTANTS[4]*STATES[5]*STATES[1]);
RATES[4] = ( CONSTANTS[4]*STATES[5]*STATES[1]+ CONSTANTS[3]*STATES[3]) - ( CONSTANTS[5]*STATES[4]+ CONSTANTS[2]*STATES[0]*STATES[4]);
RATES[2] = ( CONSTANTS[0]*STATES[0]*STATES[1]+ CONSTANTS[7]*STATES[3]) - ( CONSTANTS[1]*STATES[2]+ CONSTANTS[6]*STATES[5]*STATES[2]);
RATES[3] = ( CONSTANTS[6]*STATES[5]*STATES[2]+ CONSTANTS[2]*STATES[0]*STATES[4]) - ( CONSTANTS[7]*STATES[3]+ CONSTANTS[3]*STATES[3]);
}
void
computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
}