/*
   There are a total of 15 entries in the algebraic variable array.
   There are a total of 1 entries in each of the rate and state variable arrays.
   There are a total of 18 entries in the constant variable array.
 */
/*
 * VOI is time in component environment (second).
 * CONSTANTS[0] is C_ext_Na in component Concentrations (mM).
 * CONSTANTS[1] is C_ext_H in component Concentrations (mM).
 * CONSTANTS[2] is C_ext_NH4 in component Concentrations (mM).
 * CONSTANTS[3] is C_int_Na in component Concentrations (mM).
 * ALGEBRAIC[0] is C_int_H in component Concentrations (mM).
 * CONSTANTS[4] is C_int_NH4 in component Concentrations (mM).
 * STATES[0] is pH_int in component Concentrations (dimensionless).
 * CONSTANTS[5] is XTxP0_NHE3_Na in component NHE3_Parameters (nmol_per_s_per_cm2).
 * CONSTANTS[6] is XTxP0_NHE3_H in component NHE3_Parameters (nmol_per_s_per_cm2).
 * CONSTANTS[7] is XTxP0_NHE3_NH4 in component NHE3_Parameters (nmol_per_s_per_cm2).
 * CONSTANTS[8] is K_NHE3_Na in component NHE3_Parameters (mM).
 * CONSTANTS[9] is K_NHE3_H in component NHE3_Parameters (mM).
 * CONSTANTS[10] is K_NHE3_NH4 in component NHE3_Parameters (mM).
 * ALGEBRAIC[2] is XTxP_NHE3_Na in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[3] is XTxP_NHE3_H in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[4] is XTxP_NHE3_NH4 in component NHE3 (nmol_per_s_per_cm2).
 * CONSTANTS[11] is alpha_ext_Na in component NHE3 (dimensionless).
 * CONSTANTS[12] is beta_ext_H in component NHE3 (dimensionless).
 * CONSTANTS[13] is gamma_ext_NH4 in component NHE3 (dimensionless).
 * CONSTANTS[14] is alpha_int_Na in component NHE3 (dimensionless).
 * ALGEBRAIC[1] is beta_int_H in component NHE3 (dimensionless).
 * CONSTANTS[15] is gamma_int_NH4 in component NHE3 (dimensionless).
 * ALGEBRAIC[5] is sum_NHE3 in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[6] is J_NHE3_Na in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[7] is J_NHE3_H in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[8] is J_NHE3_NH4 in component NHE3 (nmol_per_s_per_cm2).
 * CONSTANTS[16] is J_NHE3_Na_Max in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[9] is plot in component NHE3 (dimensionless).
 * ALGEBRAIC[11] is J_NHE3_Na2 in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[12] is J_NHE3_H2 in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[13] is J_NHE3_NH42 in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[10] is sum0_NHE3 in component NHE3 (nmol_per_s_per_cm2).
 * ALGEBRAIC[14] is plot2 in component NHE3 (dimensionless).
 * RATES[0] is d/dt pH_int in component Concentrations (dimensionless).
 * There are a total of 0 condition variables.
 */
void
initConsts(double* CONSTANTS, double* RATES, double *STATES)
{
CONSTANTS[0] = 1;
CONSTANTS[1] = 5.4954e-5;
CONSTANTS[2] = 0;
CONSTANTS[3] = 0;
CONSTANTS[4] = 0;
STATES[0] = 4;
CONSTANTS[5] = 1.6e-3;
CONSTANTS[6] = 0.48e-3;
CONSTANTS[7] = 1.6e-3;
CONSTANTS[8] = 30;
CONSTANTS[9] = 72e-6;
CONSTANTS[10] = 0.027e3;
CONSTANTS[11] = CONSTANTS[0]/CONSTANTS[8];
CONSTANTS[17] = 5.00000;
CONSTANTS[12] = CONSTANTS[1]/CONSTANTS[9];
CONSTANTS[13] = CONSTANTS[2]/CONSTANTS[10];
CONSTANTS[14] = CONSTANTS[3]/CONSTANTS[8];
CONSTANTS[15] = CONSTANTS[4]/CONSTANTS[10];
CONSTANTS[16] = ( CONSTANTS[5]*CONSTANTS[6])/(CONSTANTS[5]+CONSTANTS[6]);
}
void
computeResiduals(double VOI, double* CONSTANTS, double* RATES, double* OLDRATES, double* STATES,
                 double* OLDSTATES, double* ALGEBRAIC, double* CONDVARS)
{
resid[0] = RATES[0] - CONSTANTS[17];
}
void
computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
ALGEBRAIC[0] =  1000.00*pow(10.0000, - STATES[0]);
ALGEBRAIC[1] = ALGEBRAIC[0]/CONSTANTS[9];
ALGEBRAIC[2] = ( CONSTANTS[5]*2.00000*ALGEBRAIC[0])/(ALGEBRAIC[0]+0.00100000);
ALGEBRAIC[3] = ( CONSTANTS[6]*2.00000*ALGEBRAIC[0])/(ALGEBRAIC[0]+0.00100000);
ALGEBRAIC[4] = ( CONSTANTS[7]*2.00000*ALGEBRAIC[0])/(ALGEBRAIC[0]+0.00100000);
ALGEBRAIC[5] =  (1.00000+CONSTANTS[11]+CONSTANTS[12]+CONSTANTS[13])*( ALGEBRAIC[2]*CONSTANTS[14]+ ALGEBRAIC[3]*ALGEBRAIC[1]+ ALGEBRAIC[4]*CONSTANTS[15])+ (1.00000+CONSTANTS[14]+ALGEBRAIC[1]+CONSTANTS[15])*( ALGEBRAIC[2]*CONSTANTS[11]+ ALGEBRAIC[3]*CONSTANTS[12]+ ALGEBRAIC[4]*CONSTANTS[13]);
ALGEBRAIC[6] =  (( ALGEBRAIC[2]*ALGEBRAIC[3])/ALGEBRAIC[5])*( CONSTANTS[11]*ALGEBRAIC[1] -  CONSTANTS[14]*CONSTANTS[12])+ (( ALGEBRAIC[2]*ALGEBRAIC[4])/ALGEBRAIC[5])*( CONSTANTS[11]*CONSTANTS[15] -  CONSTANTS[14]*CONSTANTS[13]);
ALGEBRAIC[7] =  (( ALGEBRAIC[2]*ALGEBRAIC[3])/ALGEBRAIC[5])*( CONSTANTS[14]*CONSTANTS[12] -  CONSTANTS[11]*ALGEBRAIC[1])+ (( ALGEBRAIC[3]*ALGEBRAIC[4])/ALGEBRAIC[5])*( CONSTANTS[12]*CONSTANTS[15] -  ALGEBRAIC[1]*CONSTANTS[13]);
ALGEBRAIC[8] =  (( ALGEBRAIC[2]*ALGEBRAIC[4])/ALGEBRAIC[5])*( CONSTANTS[14]*CONSTANTS[13] -  CONSTANTS[11]*CONSTANTS[15])+ (( ALGEBRAIC[3]*ALGEBRAIC[4])/ALGEBRAIC[5])*( CONSTANTS[13]*ALGEBRAIC[1] -  CONSTANTS[12]*CONSTANTS[15]);
ALGEBRAIC[9] = ALGEBRAIC[6]/CONSTANTS[16];
ALGEBRAIC[10] =  (1.00000+CONSTANTS[11]+CONSTANTS[12]+CONSTANTS[13])*( CONSTANTS[5]*CONSTANTS[14]+ CONSTANTS[6]*ALGEBRAIC[1]+ CONSTANTS[7]*CONSTANTS[15])+ (1.00000+CONSTANTS[14]+ALGEBRAIC[1]+CONSTANTS[15])*( CONSTANTS[5]*CONSTANTS[11]+ CONSTANTS[6]*CONSTANTS[12]+ CONSTANTS[7]*CONSTANTS[13]);
ALGEBRAIC[11] =  (( CONSTANTS[5]*CONSTANTS[6])/ALGEBRAIC[10])*( CONSTANTS[11]*ALGEBRAIC[1] -  CONSTANTS[14]*CONSTANTS[12])+ (( CONSTANTS[5]*CONSTANTS[7])/ALGEBRAIC[5])*( CONSTANTS[11]*CONSTANTS[15] -  CONSTANTS[14]*CONSTANTS[13]);
ALGEBRAIC[12] =  (( CONSTANTS[5]*CONSTANTS[6])/ALGEBRAIC[10])*( CONSTANTS[14]*CONSTANTS[12] -  CONSTANTS[11]*ALGEBRAIC[1])+ (( CONSTANTS[6]*CONSTANTS[7])/ALGEBRAIC[5])*( CONSTANTS[12]*CONSTANTS[15] -  ALGEBRAIC[1]*CONSTANTS[13]);
ALGEBRAIC[13] =  (( CONSTANTS[5]*CONSTANTS[7])/ALGEBRAIC[10])*( CONSTANTS[14]*CONSTANTS[13] -  CONSTANTS[11]*CONSTANTS[15])+ (( CONSTANTS[6]*CONSTANTS[7])/ALGEBRAIC[5])*( CONSTANTS[13]*ALGEBRAIC[1] -  CONSTANTS[12]*CONSTANTS[15]);
ALGEBRAIC[14] = ALGEBRAIC[11]/CONSTANTS[16];
}
void
computeEssentialVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC)
{
}
void
getStateInformation(double* SI)
{
SI[0] = 1.0;
}
void
computeRoots(double VOI, double* CONSTANTS, double* RATES, double* OLDRATES, double* STATES,
             double* OLDSTATES, double* ALGEBRAIC, double* CONDVARS)
{
}