array C_nextFree117 integer C_firstFree169 integer C_maxIndex649 array C_v_x_0870 array C_v_x_1144 array C_v_x_2537 array C_v_x_3141 array C_v_x_4149 array C_v_y_0137 array C_v_y_1188 array C_v_y_2139 array C_v_y_3101 array C_v_y_4351 array C_v_z_0144 array C_v_z_1177 array C_v_z_2516 array C_v_z_3154 array C_v_z_4684 integer C_firstFree169 = 0 integer C_maxIndex649 = 0 function initGlobals190() { C_firstFree_169 = 0; C_maxIndex_649 = 0; } function main374() { initGlobals190(); init_test690(); } function config840() { } function init_test690() { local integer c182 local real tuple_temp363 local real tuple_temp506 local real tuple_temp583 c_182 = new_C752(); tuple_temp_363 = 1.; tuple_temp_506 = 2.; tuple_temp_583 = 3.; C_v_x_set145(c_182, 0, tuple_temp_363); C_v_y_set157(c_182, 0, tuple_temp_506); C_v_z_set734(c_182, 0, tuple_temp_583); C_v_x_set145(c_182, 1, 5.); C_v_y_set157(c_182, 1, 6.); C_v_z_set734(c_182, 1, 7.); println155(R2S100(C_v_x_get908(c_182, 0))); println155(R2S100(C_v_z_get168(c_182, 0))); println155(R2S100(C_v_y_get138(c_182, 1))); if (((C_v_x_get908(c_182, 0) == 1.) and (C_v_z_get168(c_182, 0) == 3.)) and (C_v_y_get138(c_182, 1) == 6.)) { testSuccess247(); } else { }; } IS_NATIVE IS_EXTERN @extern function R2S100(real r131) returns string { } IS_NATIVE function println155(string s117) { } IS_NATIVE function testSuccess247() { } function C_init144(integer this133) { } function new_C752() returns integer { local integer this149 this_149 = alloc_C177(); construct_C104(this_149); return this_149; } function construct_C104(integer this558) { C_init144(this_558); } function alloc_C177() returns integer { local integer this772 if (C_firstFree_169 == 0) { if (C_maxIndex_649 < 32768) { C_maxIndex_649 = (C_maxIndex_649 + 1); this_772 = C_maxIndex_649; } else { error159("Out of memory: Could not create C."); this_772 = 0; }; } else { C_firstFree_169 = (C_firstFree_169 - 1); this_772 = C_nextFree_117[C_firstFree_169]; }; return this_772; } function error159(string msg620) { $debugPrint238((msg_620 + (" " + #getStackTrace()))); } function C_v_x_set145(integer instanceId106, integer arrayIndex197, real value250) { if ((arrayIndex_197 < 0) or (arrayIndex_197 >= 5)) { error159("Index out of Bounds"); } else { if (arrayIndex_197 <= 2) { if (arrayIndex_197 <= 1) { if (arrayIndex_197 <= 0) { C_v_x_0_870[instanceId_106] = value_250; } else { C_v_x_1_144[instanceId_106] = value_250; }; } else { C_v_x_2_537[instanceId_106] = value_250; }; } else { if (arrayIndex_197 <= 3) { C_v_x_3_141[instanceId_106] = value_250; } else { C_v_x_4_149[instanceId_106] = value_250; }; }; }; } function C_v_x_get908(integer index1321, integer index2614) returns real { local real returnVal117 if ((index2_614 < 0) or (index2_614 >= 5)) { error159("Index out of Bounds"); } else { if (index2_614 <= 2) { if (index2_614 <= 1) { if (index2_614 <= 0) { returnVal_117 = C_v_x_0_870[index1_321]; } else { returnVal_117 = C_v_x_1_144[index1_321]; }; } else { returnVal_117 = C_v_x_2_537[index1_321]; }; } else { if (index2_614 <= 3) { returnVal_117 = C_v_x_3_141[index1_321]; } else { returnVal_117 = C_v_x_4_149[index1_321]; }; }; }; return returnVal_117; } function C_v_y_set157(integer instanceId104, integer arrayIndex195, real value104) { if ((arrayIndex_195 < 0) or (arrayIndex_195 >= 5)) { error159("Index out of Bounds"); } else { if (arrayIndex_195 <= 2) { if (arrayIndex_195 <= 1) { if (arrayIndex_195 <= 0) { C_v_y_0_137[instanceId_104] = value_104; } else { C_v_y_1_188[instanceId_104] = value_104; }; } else { C_v_y_2_139[instanceId_104] = value_104; }; } else { if (arrayIndex_195 <= 3) { C_v_y_3_101[instanceId_104] = value_104; } else { C_v_y_4_351[instanceId_104] = value_104; }; }; }; } function C_v_y_get138(integer index1656, integer index2441) returns real { local real returnVal155 if ((index2_441 < 0) or (index2_441 >= 5)) { error159("Index out of Bounds"); } else { if (index2_441 <= 2) { if (index2_441 <= 1) { if (index2_441 <= 0) { returnVal_155 = C_v_y_0_137[index1_656]; } else { returnVal_155 = C_v_y_1_188[index1_656]; }; } else { returnVal_155 = C_v_y_2_139[index1_656]; }; } else { if (index2_441 <= 3) { returnVal_155 = C_v_y_3_101[index1_656]; } else { returnVal_155 = C_v_y_4_351[index1_656]; }; }; }; return returnVal_155; } function C_v_z_set734(integer instanceId900, integer arrayIndex139, real value499) { if ((arrayIndex_139 < 0) or (arrayIndex_139 >= 5)) { error159("Index out of Bounds"); } else { if (arrayIndex_139 <= 2) { if (arrayIndex_139 <= 1) { if (arrayIndex_139 <= 0) { C_v_z_0_144[instanceId_900] = value_499; } else { C_v_z_1_177[instanceId_900] = value_499; }; } else { C_v_z_2_516[instanceId_900] = value_499; }; } else { if (arrayIndex_139 <= 3) { C_v_z_3_154[instanceId_900] = value_499; } else { C_v_z_4_684[instanceId_900] = value_499; }; }; }; } function C_v_z_get168(integer index1980, integer index2102) returns real { local real returnVal198 if ((index2_102 < 0) or (index2_102 >= 5)) { error159("Index out of Bounds"); } else { if (index2_102 <= 2) { if (index2_102 <= 1) { if (index2_102 <= 0) { returnVal_198 = C_v_z_0_144[index1_980]; } else { returnVal_198 = C_v_z_1_177[index1_980]; }; } else { returnVal_198 = C_v_z_2_516[index1_980]; }; } else { if (index2_102 <= 3) { returnVal_198 = C_v_z_3_154[index1_980]; } else { returnVal_198 = C_v_z_4_684[index1_980]; }; }; }; return returnVal_198; }