Generated Code
The following is c_ida code generated by the CellML API from this CellML file. (Back to language selection)
The raw code is available.
/*
There are a total of 10 entries in the algebraic variable array.
There are a total of 7 entries in each of the rate and state variable arrays.
There are a total of 34 entries in the constant variable array.
*/
/*
* VOI is time in component environment (day).
* STATES[0] is phi_I in component phi_I (cells_per_mm3).
* ALGEBRAIC[9] is alpha in component model_parameters (dimensionless).
* CONSTANTS[0] is k1 in component model_parameters (dimensionless).
* CONSTANTS[1] is k2 in component model_parameters (per_day).
* CONSTANTS[2] is k3 in component model_parameters (mm3_per_cells).
* CONSTANTS[3] is k5 in component model_parameters (mm3_per_cells).
* CONSTANTS[4] is k6 in component model_parameters (mm3_per_microg).
* CONSTANTS[5] is d1 in component model_parameters (per_day).
* STATES[1] is phi_R in component phi_R (cells_per_mm3).
* ALGEBRAIC[5] is K_T in component K_T (cells_per_mm3_per_day).
* STATES[2] is F in component F (cells_per_mm3).
* STATES[3] is C in component C (microg_per_mm3).
* STATES[4] is T in component T (pg_per_mm3).
* ALGEBRAIC[0] is Apligraf in component T (pg_per_mm3_per_day).
* CONSTANTS[6] is k4 in component model_parameters (pg_per_cells_per_day).
* CONSTANTS[7] is k7 in component model_parameters (pg_per_cells_per_day).
* CONSTANTS[8] is d2 in component model_parameters (per_day).
* STATES[5] is P in component P (pg_per_mm3).
* ALGEBRAIC[1] is Apligraf in component P (pg_per_mm3_per_day).
* CONSTANTS[9] is k8 in component model_parameters (pg_per_cells_per_day).
* CONSTANTS[10] is k9 in component model_parameters (pg_per_cells_per_day).
* CONSTANTS[11] is d3 in component model_parameters (per_day).
* ALGEBRAIC[2] is Apligraf in component F (cells_per_mm3_per_day).
* CONSTANTS[12] is k10 in component model_parameters (per_day).
* CONSTANTS[13] is d4 in component model_parameters (per_day).
* ALGEBRAIC[6] is M_P in component M_P (cells_per_mm3_per_day).
* ALGEBRAIC[3] is Apligraf in component C (microg_per_mm3_per_day).
* CONSTANTS[14] is k11 in component model_parameters (microg_per_cells_per_day).
* ALGEBRAIC[7] is f_T in component f_T (dimensionless).
* ALGEBRAIC[8] is g_C in component g_C (dimensionless).
* CONSTANTS[15] is d5 in component model_parameters (mm3_per_cells_per_day).
* STATES[6] is H in component H (microg_per_mm3).
* ALGEBRAIC[4] is Apligraf in component H (microg_per_mm3_per_day).
* CONSTANTS[16] is k12 in component model_parameters (microg_per_cells_per_day).
* CONSTANTS[17] is d6 in component model_parameters (per_day).
* CONSTANTS[18] is tau1 in component K_T (mm6_cells_per_pg3_day).
* CONSTANTS[19] is tau2 in component K_T (mm3_cells_per_pg2_day).
* CONSTANTS[20] is tau3 in component K_T (cells_per_pg_per_day).
* CONSTANTS[21] is tau4 in component K_T (cells_per_mm3_per_day).
* CONSTANTS[22] is tau1 in component M_P (mm6_cells_per_pg3_day).
* CONSTANTS[23] is tau2 in component M_P (mm3_cells_per_pg2_day).
* CONSTANTS[24] is tau3 in component M_P (cells_per_pg_per_day).
* CONSTANTS[25] is tau4 in component M_P (cells_per_mm3_per_day).
* CONSTANTS[26] is tau1 in component f_T (mm9_per_pg3).
* CONSTANTS[27] is tau2 in component f_T (mm6_per_pg2).
* CONSTANTS[28] is tau3 in component f_T (mm3_per_pg).
* CONSTANTS[29] is tau4 in component f_T (dimensionless).
* CONSTANTS[30] is tau1 in component g_C (mm9_per_microg3).
* CONSTANTS[31] is tau2 in component g_C (mm6_per_microg2).
* CONSTANTS[32] is tau3 in component g_C (mm3_per_microg).
* CONSTANTS[33] is tau4 in component g_C (dimensionless).
* RATES[0] is d/dt phi_I in component phi_I (cells_per_mm3).
* RATES[1] is d/dt phi_R in component phi_R (cells_per_mm3).
* RATES[4] is d/dt T in component T (pg_per_mm3).
* RATES[5] is d/dt P in component P (pg_per_mm3).
* RATES[2] is d/dt F in component F (cells_per_mm3).
* RATES[3] is d/dt C in component C (microg_per_mm3).
* RATES[6] is d/dt H in component H (microg_per_mm3).
* There are a total of 160 condition variables.
*/
void
initConsts(double* CONSTANTS, double* RATES, double *STATES)
{
STATES[0] = 200.0;
CONSTANTS[0] = 0.05;
CONSTANTS[1] = 0.693;
CONSTANTS[2] = 0.002;
CONSTANTS[3] = 0.0025;
CONSTANTS[4] = 0.0004;
CONSTANTS[5] = 0.2;
STATES[1] = 200.0;
STATES[2] = 50.0;
STATES[3] = 10.0;
STATES[4] = 6.0;
CONSTANTS[6] = 0.07;
CONSTANTS[7] = 0.004;
CONSTANTS[8] = 9.1;
STATES[5] = 2.0;
CONSTANTS[9] = 0.015;
CONSTANTS[10] = 0.0015;
CONSTANTS[11] = 4.0;
CONSTANTS[12] = 0.924;
CONSTANTS[13] = 2.5;
CONSTANTS[14] = 5.0;
CONSTANTS[15] = 1.5E-5;
STATES[6] = 0.01;
CONSTANTS[16] = 0.001;
CONSTANTS[17] = 0.7;
CONSTANTS[18] = -2.47;
CONSTANTS[19] = 21.94;
CONSTANTS[20] = 6.41;
CONSTANTS[21] = 1.75;
CONSTANTS[22] = 15.333;
CONSTANTS[23] = -167.21;
CONSTANTS[24] = 452.38;
CONSTANTS[25] = 2.6593;
CONSTANTS[26] = 0.0092;
CONSTANTS[27] = -0.1552;
CONSTANTS[28] = 0.6279;
CONSTANTS[29] = 0.2527;
CONSTANTS[30] = -4.33E-10;
CONSTANTS[31] = 0.0000009;
CONSTANTS[32] = -0.00055;
CONSTANTS[33] = 0.13;
RATES[0] = 0.1001;
RATES[1] = 0.1001;
RATES[4] = 0.1001;
RATES[5] = 0.1001;
RATES[2] = 0.1001;
RATES[3] = 0.1001;
RATES[6] = 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[9]*ALGEBRAIC[5]+ CONSTANTS[0]*CONSTANTS[1]*STATES[0]*(1.00000 - ( CONSTANTS[2]*(STATES[0]+STATES[1])+ CONSTANTS[3]*STATES[2]+ CONSTANTS[4]*STATES[3]))) - CONSTANTS[5]*STATES[0];
resid[1] = RATES[1] - ( (1.00000 - ALGEBRAIC[9])*ALGEBRAIC[5]+ CONSTANTS[0]*CONSTANTS[1]*STATES[1]*(1.00000 - ( CONSTANTS[2]*(STATES[0]+STATES[1])+ CONSTANTS[3]*STATES[2]+ CONSTANTS[4]*STATES[3]))) - CONSTANTS[5]*STATES[1];
resid[2] = RATES[4] - ( CONSTANTS[6]*STATES[0]+ CONSTANTS[7]*STATES[2]+ALGEBRAIC[0]) - CONSTANTS[8]*STATES[4];
resid[3] = RATES[5] - ( CONSTANTS[9]*(STATES[0]+STATES[1])+ CONSTANTS[10]*STATES[2]+ALGEBRAIC[1]) - CONSTANTS[11]*STATES[5];
resid[4] = RATES[2] - (ALGEBRAIC[6]+ CONSTANTS[12]*STATES[2]*(1.00000 - ( CONSTANTS[2]*(STATES[0]+STATES[1])+ CONSTANTS[3]*STATES[2]+ CONSTANTS[4]*STATES[3]))+ALGEBRAIC[2]) - CONSTANTS[13]*STATES[2];
resid[5] = RATES[3] - ( CONSTANTS[14]*STATES[2]*ALGEBRAIC[7]*ALGEBRAIC[8]+ALGEBRAIC[3]) - CONSTANTS[15]*STATES[2]*STATES[3];
resid[6] = RATES[6] - ( CONSTANTS[16]*STATES[2]+ALGEBRAIC[4]) - CONSTANTS[17]*STATES[6];
}
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] = (CONDVAR[0]>=0.00000&&CONDVAR[1]<0.00000 ? 0.00000 : CONDVAR[2]>=0.00000&&CONDVAR[3]<0.00000 ? 0.400000 : CONDVAR[4]>=0.00000&&CONDVAR[5]<0.00000 ? 0.00000 : CONDVAR[6]>=0.00000&&CONDVAR[7]<0.00000 ? 0.400000 : CONDVAR[8]>=0.00000&&CONDVAR[9]<0.00000 ? 0.00000 : CONDVAR[10]>=0.00000&&CONDVAR[11]<0.00000 ? 0.400000 : CONDVAR[12]>=0.00000&&CONDVAR[13]<0.00000 ? 0.00000 : CONDVAR[14]>=0.00000&&CONDVAR[15]<0.00000 ? 0.400000 : CONDVAR[16]>=0.00000&&CONDVAR[17]<0.00000 ? 0.00000 : CONDVAR[18]>=0.00000&&CONDVAR[19]<0.00000 ? 0.400000 : CONDVAR[20]>=0.00000&&CONDVAR[21]<0.00000 ? 0.00000 : CONDVAR[22]>=0.00000&&CONDVAR[23]<0.00000 ? 0.400000 : CONDVAR[24]>=0.00000&&CONDVAR[25]<0.00000 ? 0.00000 : CONDVAR[26]>=0.00000&&CONDVAR[27]<0.00000 ? 0.400000 : CONDVAR[28]>=0.00000&&CONDVAR[29]<0.00000 ? 0.00000 : CONDVAR[30]>=0.00000&&CONDVAR[31]<0.00000 ? 0.400000 : 0.00000);
ALGEBRAIC[1] = (CONDVAR[32]>=0.00000&&CONDVAR[33]<0.00000 ? 0.00000 : CONDVAR[34]>=0.00000&&CONDVAR[35]<0.00000 ? 1.00000 : CONDVAR[36]>=0.00000&&CONDVAR[37]<0.00000 ? 0.00000 : CONDVAR[38]>=0.00000&&CONDVAR[39]<0.00000 ? 1.00000 : CONDVAR[40]>=0.00000&&CONDVAR[41]<0.00000 ? 0.00000 : CONDVAR[42]>=0.00000&&CONDVAR[43]<0.00000 ? 1.00000 : CONDVAR[44]>=0.00000&&CONDVAR[45]<0.00000 ? 0.00000 : CONDVAR[46]>=0.00000&&CONDVAR[47]<0.00000 ? 1.00000 : CONDVAR[48]>=0.00000&&CONDVAR[49]<0.00000 ? 0.00000 : CONDVAR[50]>=0.00000&&CONDVAR[51]<0.00000 ? 1.00000 : CONDVAR[52]>=0.00000&&CONDVAR[53]<0.00000 ? 0.00000 : CONDVAR[54]>=0.00000&&CONDVAR[55]<0.00000 ? 1.00000 : CONDVAR[56]>=0.00000&&CONDVAR[57]<0.00000 ? 0.00000 : CONDVAR[58]>=0.00000&&CONDVAR[59]<0.00000 ? 1.00000 : CONDVAR[60]>=0.00000&&CONDVAR[61]<0.00000 ? 0.00000 : CONDVAR[62]>=0.00000&&CONDVAR[63]<0.00000 ? 1.00000 : 0.00000);
ALGEBRAIC[2] = (CONDVAR[64]>=0.00000&&CONDVAR[65]<0.00000 ? 0.00000 : CONDVAR[66]>=0.00000&&CONDVAR[67]<0.00000 ? 8000.00 : CONDVAR[68]>=0.00000&&CONDVAR[69]<0.00000 ? 0.00000 : CONDVAR[70]>=0.00000&&CONDVAR[71]<0.00000 ? 8000.00 : CONDVAR[72]>=0.00000&&CONDVAR[73]<0.00000 ? 0.00000 : CONDVAR[74]>=0.00000&&CONDVAR[75]<0.00000 ? 8000.00 : CONDVAR[76]>=0.00000&&CONDVAR[77]<0.00000 ? 0.00000 : CONDVAR[78]>=0.00000&&CONDVAR[79]<0.00000 ? 8000.00 : CONDVAR[80]>=0.00000&&CONDVAR[81]<0.00000 ? 0.00000 : CONDVAR[82]>=0.00000&&CONDVAR[83]<0.00000 ? 8000.00 : CONDVAR[84]>=0.00000&&CONDVAR[85]<0.00000 ? 0.00000 : CONDVAR[86]>=0.00000&&CONDVAR[87]<0.00000 ? 8000.00 : CONDVAR[88]>=0.00000&&CONDVAR[89]<0.00000 ? 0.00000 : CONDVAR[90]>=0.00000&&CONDVAR[91]<0.00000 ? 8000.00 : CONDVAR[92]>=0.00000&&CONDVAR[93]<0.00000 ? 0.00000 : CONDVAR[94]>=0.00000&&CONDVAR[95]<0.00000 ? 8000.00 : 0.00000);
ALGEBRAIC[3] = (CONDVAR[96]>=0.00000&&CONDVAR[97]<0.00000 ? 0.00000 : CONDVAR[98]>=0.00000&&CONDVAR[99]<0.00000 ? 18.7500 : CONDVAR[100]>=0.00000&&CONDVAR[101]<0.00000 ? 0.00000 : CONDVAR[102]>=0.00000&&CONDVAR[103]<0.00000 ? 18.7500 : CONDVAR[104]>=0.00000&&CONDVAR[105]<0.00000 ? 0.00000 : CONDVAR[106]>=0.00000&&CONDVAR[107]<0.00000 ? 18.7500 : CONDVAR[108]>=0.00000&&CONDVAR[109]<0.00000 ? 0.00000 : CONDVAR[110]>=0.00000&&CONDVAR[111]<0.00000 ? 18.7500 : CONDVAR[112]>=0.00000&&CONDVAR[113]<0.00000 ? 0.00000 : CONDVAR[114]>=0.00000&&CONDVAR[115]<0.00000 ? 18.7500 : CONDVAR[116]>=0.00000&&CONDVAR[117]<0.00000 ? 0.00000 : CONDVAR[118]>=0.00000&&CONDVAR[119]<0.00000 ? 18.7500 : CONDVAR[120]>=0.00000&&CONDVAR[121]<0.00000 ? 0.00000 : CONDVAR[122]>=0.00000&&CONDVAR[123]<0.00000 ? 18.7500 : CONDVAR[124]>=0.00000&&CONDVAR[125]<0.00000 ? 0.00000 : CONDVAR[126]>=0.00000&&CONDVAR[127]<0.00000 ? 18.7500 : 0.00000);
ALGEBRAIC[4] = (CONDVAR[128]>=0.00000&&CONDVAR[129]<0.00000 ? 0.00000 : CONDVAR[130]>=0.00000&&CONDVAR[131]<0.00000 ? 80.0000 : CONDVAR[132]>=0.00000&&CONDVAR[133]<0.00000 ? 0.00000 : CONDVAR[134]>=0.00000&&CONDVAR[135]<0.00000 ? 80.0000 : CONDVAR[136]>=0.00000&&CONDVAR[137]<0.00000 ? 0.00000 : CONDVAR[138]>=0.00000&&CONDVAR[139]<0.00000 ? 80.0000 : CONDVAR[140]>=0.00000&&CONDVAR[141]<0.00000 ? 0.00000 : CONDVAR[142]>=0.00000&&CONDVAR[143]<0.00000 ? 80.0000 : CONDVAR[144]>=0.00000&&CONDVAR[145]<0.00000 ? 0.00000 : CONDVAR[146]>=0.00000&&CONDVAR[147]<0.00000 ? 80.0000 : CONDVAR[148]>=0.00000&&CONDVAR[149]<0.00000 ? 0.00000 : CONDVAR[150]>=0.00000&&CONDVAR[151]<0.00000 ? 80.0000 : CONDVAR[152]>=0.00000&&CONDVAR[153]<0.00000 ? 0.00000 : CONDVAR[154]>=0.00000&&CONDVAR[155]<0.00000 ? 80.0000 : CONDVAR[156]>=0.00000&&CONDVAR[157]<0.00000 ? 0.00000 : CONDVAR[158]>=0.00000&&CONDVAR[159]<0.00000 ? 80.0000 : 0.00000);
ALGEBRAIC[5] = CONSTANTS[18]*pow(STATES[4], 3.00000)+ CONSTANTS[19]*pow(STATES[4], 2.00000)+ CONSTANTS[20]*STATES[4]+CONSTANTS[21];
ALGEBRAIC[6] = CONSTANTS[22]*pow(STATES[5], 3.00000)+ CONSTANTS[23]*pow(STATES[5], 2.00000)+ CONSTANTS[24]*STATES[5]+CONSTANTS[25];
ALGEBRAIC[7] = CONSTANTS[26]*pow(STATES[4], 3.00000)+ CONSTANTS[27]*pow(STATES[4], 2.00000)+ CONSTANTS[28]*STATES[4]+CONSTANTS[29];
ALGEBRAIC[8] = CONSTANTS[30]*pow(STATES[3], 3.00000)+ CONSTANTS[31]*pow(STATES[3], 2.00000)+ CONSTANTS[32]*STATES[3]+CONSTANTS[33];
ALGEBRAIC[9] = - ( 0.197000*arbitrary_log(STATES[6], 10))+0.440700;
}
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;
}
void
computeRoots(double VOI, double* CONSTANTS, double* RATES, double* OLDRATES, double* STATES,
double* OLDSTATES, double* ALGEBRAIC, double* CONDVARS)
{
CONDVAR[0] = VOI - 0.00000;
CONDVAR[1] = VOI - 28.0000;
CONDVAR[2] = VOI - 28.0000;
CONDVAR[3] = VOI - 29.0000;
CONDVAR[4] = VOI - 29.0000;
CONDVAR[5] = VOI - 35.0000;
CONDVAR[6] = VOI - 35.0000;
CONDVAR[7] = VOI - 36.0000;
CONDVAR[8] = VOI - 36.0000;
CONDVAR[9] = VOI - 42.0000;
CONDVAR[10] = VOI - 42.0000;
CONDVAR[11] = VOI - 43.0000;
CONDVAR[12] = VOI - 43.0000;
CONDVAR[13] = VOI - 49.0000;
CONDVAR[14] = VOI - 49.0000;
CONDVAR[15] = VOI - 50.0000;
CONDVAR[16] = VOI - 50.0000;
CONDVAR[17] = VOI - 56.0000;
CONDVAR[18] = VOI - 56.0000;
CONDVAR[19] = VOI - 57.0000;
CONDVAR[20] = VOI - 57.0000;
CONDVAR[21] = VOI - 63.0000;
CONDVAR[22] = VOI - 63.0000;
CONDVAR[23] = VOI - 64.0000;
CONDVAR[24] = VOI - 64.0000;
CONDVAR[25] = VOI - 70.0000;
CONDVAR[26] = VOI - 70.0000;
CONDVAR[27] = VOI - 71.0000;
CONDVAR[28] = VOI - 71.0000;
CONDVAR[29] = VOI - 77.0000;
CONDVAR[30] = VOI - 77.0000;
CONDVAR[31] = VOI - 78.0000;
CONDVAR[32] = VOI - 0.00000;
CONDVAR[33] = VOI - 28.0000;
CONDVAR[34] = VOI - 28.0000;
CONDVAR[35] = VOI - 29.0000;
CONDVAR[36] = VOI - 29.0000;
CONDVAR[37] = VOI - 35.0000;
CONDVAR[38] = VOI - 35.0000;
CONDVAR[39] = VOI - 36.0000;
CONDVAR[40] = VOI - 36.0000;
CONDVAR[41] = VOI - 42.0000;
CONDVAR[42] = VOI - 42.0000;
CONDVAR[43] = VOI - 43.0000;
CONDVAR[44] = VOI - 43.0000;
CONDVAR[45] = VOI - 49.0000;
CONDVAR[46] = VOI - 49.0000;
CONDVAR[47] = VOI - 50.0000;
CONDVAR[48] = VOI - 50.0000;
CONDVAR[49] = VOI - 56.0000;
CONDVAR[50] = VOI - 56.0000;
CONDVAR[51] = VOI - 57.0000;
CONDVAR[52] = VOI - 57.0000;
CONDVAR[53] = VOI - 63.0000;
CONDVAR[54] = VOI - 63.0000;
CONDVAR[55] = VOI - 64.0000;
CONDVAR[56] = VOI - 64.0000;
CONDVAR[57] = VOI - 70.0000;
CONDVAR[58] = VOI - 70.0000;
CONDVAR[59] = VOI - 71.0000;
CONDVAR[60] = VOI - 71.0000;
CONDVAR[61] = VOI - 77.0000;
CONDVAR[62] = VOI - 77.0000;
CONDVAR[63] = VOI - 78.0000;
CONDVAR[64] = VOI - 0.00000;
CONDVAR[65] = VOI - 28.0000;
CONDVAR[66] = VOI - 28.0000;
CONDVAR[67] = VOI - 29.0000;
CONDVAR[68] = VOI - 29.0000;
CONDVAR[69] = VOI - 35.0000;
CONDVAR[70] = VOI - 35.0000;
CONDVAR[71] = VOI - 36.0000;
CONDVAR[72] = VOI - 36.0000;
CONDVAR[73] = VOI - 42.0000;
CONDVAR[74] = VOI - 42.0000;
CONDVAR[75] = VOI - 43.0000;
CONDVAR[76] = VOI - 43.0000;
CONDVAR[77] = VOI - 49.0000;
CONDVAR[78] = VOI - 49.0000;
CONDVAR[79] = VOI - 50.0000;
CONDVAR[80] = VOI - 50.0000;
CONDVAR[81] = VOI - 56.0000;
CONDVAR[82] = VOI - 56.0000;
CONDVAR[83] = VOI - 57.0000;
CONDVAR[84] = VOI - 57.0000;
CONDVAR[85] = VOI - 63.0000;
CONDVAR[86] = VOI - 63.0000;
CONDVAR[87] = VOI - 64.0000;
CONDVAR[88] = VOI - 64.0000;
CONDVAR[89] = VOI - 70.0000;
CONDVAR[90] = VOI - 70.0000;
CONDVAR[91] = VOI - 71.0000;
CONDVAR[92] = VOI - 71.0000;
CONDVAR[93] = VOI - 77.0000;
CONDVAR[94] = VOI - 77.0000;
CONDVAR[95] = VOI - 78.0000;
CONDVAR[96] = VOI - 0.00000;
CONDVAR[97] = VOI - 28.0000;
CONDVAR[98] = VOI - 28.0000;
CONDVAR[99] = VOI - 29.0000;
CONDVAR[100] = VOI - 29.0000;
CONDVAR[101] = VOI - 35.0000;
CONDVAR[102] = VOI - 35.0000;
CONDVAR[103] = VOI - 36.0000;
CONDVAR[104] = VOI - 36.0000;
CONDVAR[105] = VOI - 42.0000;
CONDVAR[106] = VOI - 42.0000;
CONDVAR[107] = VOI - 43.0000;
CONDVAR[108] = VOI - 43.0000;
CONDVAR[109] = VOI - 49.0000;
CONDVAR[110] = VOI - 49.0000;
CONDVAR[111] = VOI - 50.0000;
CONDVAR[112] = VOI - 50.0000;
CONDVAR[113] = VOI - 56.0000;
CONDVAR[114] = VOI - 56.0000;
CONDVAR[115] = VOI - 57.0000;
CONDVAR[116] = VOI - 57.0000;
CONDVAR[117] = VOI - 63.0000;
CONDVAR[118] = VOI - 63.0000;
CONDVAR[119] = VOI - 64.0000;
CONDVAR[120] = VOI - 64.0000;
CONDVAR[121] = VOI - 70.0000;
CONDVAR[122] = VOI - 70.0000;
CONDVAR[123] = VOI - 71.0000;
CONDVAR[124] = VOI - 71.0000;
CONDVAR[125] = VOI - 77.0000;
CONDVAR[126] = VOI - 77.0000;
CONDVAR[127] = VOI - 78.0000;
CONDVAR[128] = VOI - 0.00000;
CONDVAR[129] = VOI - 28.0000;
CONDVAR[130] = VOI - 28.0000;
CONDVAR[131] = VOI - 29.0000;
CONDVAR[132] = VOI - 29.0000;
CONDVAR[133] = VOI - 35.0000;
CONDVAR[134] = VOI - 35.0000;
CONDVAR[135] = VOI - 36.0000;
CONDVAR[136] = VOI - 36.0000;
CONDVAR[137] = VOI - 42.0000;
CONDVAR[138] = VOI - 42.0000;
CONDVAR[139] = VOI - 43.0000;
CONDVAR[140] = VOI - 43.0000;
CONDVAR[141] = VOI - 49.0000;
CONDVAR[142] = VOI - 49.0000;
CONDVAR[143] = VOI - 50.0000;
CONDVAR[144] = VOI - 50.0000;
CONDVAR[145] = VOI - 56.0000;
CONDVAR[146] = VOI - 56.0000;
CONDVAR[147] = VOI - 57.0000;
CONDVAR[148] = VOI - 57.0000;
CONDVAR[149] = VOI - 63.0000;
CONDVAR[150] = VOI - 63.0000;
CONDVAR[151] = VOI - 64.0000;
CONDVAR[152] = VOI - 64.0000;
CONDVAR[153] = VOI - 70.0000;
CONDVAR[154] = VOI - 70.0000;
CONDVAR[155] = VOI - 71.0000;
CONDVAR[156] = VOI - 71.0000;
CONDVAR[157] = VOI - 77.0000;
CONDVAR[158] = VOI - 77.0000;
CONDVAR[159] = VOI - 78.0000;
}