/* 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; }