array C_nextFree137 integer C_firstFree601 integer C_maxIndex198 array C_v_x_0142 array C_v_x_1134 array C_v_x_2116 array C_v_x_3973 array C_v_x_4349 array C_v_y_0137 array C_v_y_1541 array C_v_y_2121 array C_v_y_3167 array C_v_y_4194 array C_v_z_0134 array C_v_z_1113 array C_v_z_2836 array C_v_z_3211 array C_v_z_4159 integer C_firstFree601 = 0 integer C_maxIndex198 = 0 function initGlobals193() { } function main191() { initGlobals193(); init_test601(); } function config716() { } function init_test601() { local integer c178 local real tuple_temp984 local real tuple_temp173 local real tuple_temp496 c_178 = new_C177(); tuple_temp_984 = 1.; tuple_temp_173 = 2.; tuple_temp_496 = 3.; C_v_x_set113(c_178, 0, tuple_temp_984); C_v_y_set924(c_178, 0, tuple_temp_173); C_v_z_set173(c_178, 0, tuple_temp_496); C_v_x_set113(c_178, 1, 5.); C_v_y_set924(c_178, 1, 6.); C_v_z_set173(c_178, 1, 7.); println140(R2S899(C_v_x_get105(c_178, 0))); println140(R2S899(C_v_z_get192(c_178, 0))); println140(R2S899(C_v_y_get187(c_178, 1))); if (((C_v_x_get105(c_178, 0) == 1.) and (C_v_z_get192(c_178, 0) == 3.)) and (C_v_y_get187(c_178, 1) == 6.)) { testSuccess208(); } else { }; } IS_NATIVE IS_EXTERN @extern function R2S899(real r692) returns string { } IS_NATIVE function println140(string s188) { } IS_NATIVE function testSuccess208() { } function new_C177() returns integer { local integer this341 local integer this197 if (C_firstFree_601 == 0) { if (C_maxIndex_198 < 32768) { C_maxIndex_198 = (C_maxIndex_198 + 1); this_197 = C_maxIndex_198; } else { error202("Out of memory: Could not create C."); this_197 = 0; }; } else { C_firstFree_601 = (C_firstFree_601 - 1); this_197 = C_nextFree_137[C_firstFree_601]; }; this_341 = this_197; return this_341; } function error202(string msg208) { $debugPrint107((msg_208 + (" " + #getStackTrace()))); } function C_v_x_set113(integer instanceId113, integer arrayIndex108, real value357) { if ((arrayIndex_108 < 0) or (arrayIndex_108 >= 5)) { error202("Index out of Bounds"); } else { if (arrayIndex_108 <= 2) { if (arrayIndex_108 <= 1) { if (arrayIndex_108 <= 0) { C_v_x_0_142[instanceId_113] = value_357; } else { C_v_x_1_134[instanceId_113] = value_357; }; } else { C_v_x_2_116[instanceId_113] = value_357; }; } else { if (arrayIndex_108 <= 3) { C_v_x_3_973[instanceId_113] = value_357; } else { C_v_x_4_349[instanceId_113] = value_357; }; }; }; } function C_v_x_get105(integer index1117, integer index2119) returns real { local real returnVal141 if ((index2_119 < 0) or (index2_119 >= 5)) { error202("Index out of Bounds"); } else { if (index2_119 <= 2) { if (index2_119 <= 1) { if (index2_119 <= 0) { returnVal_141 = C_v_x_0_142[index1_117]; } else { returnVal_141 = C_v_x_1_134[index1_117]; }; } else { returnVal_141 = C_v_x_2_116[index1_117]; }; } else { if (index2_119 <= 3) { returnVal_141 = C_v_x_3_973[index1_117]; } else { returnVal_141 = C_v_x_4_349[index1_117]; }; }; }; return returnVal_141; } function C_v_y_set924(integer instanceId189, integer arrayIndex114, real value675) { if ((arrayIndex_114 < 0) or (arrayIndex_114 >= 5)) { error202("Index out of Bounds"); } else { if (arrayIndex_114 <= 2) { if (arrayIndex_114 <= 1) { if (arrayIndex_114 <= 0) { C_v_y_0_137[instanceId_189] = value_675; } else { C_v_y_1_541[instanceId_189] = value_675; }; } else { C_v_y_2_121[instanceId_189] = value_675; }; } else { if (arrayIndex_114 <= 3) { C_v_y_3_167[instanceId_189] = value_675; } else { C_v_y_4_194[instanceId_189] = value_675; }; }; }; } function C_v_y_get187(integer index1952, integer index2723) returns real { local real returnVal107 if ((index2_723 < 0) or (index2_723 >= 5)) { error202("Index out of Bounds"); } else { if (index2_723 <= 2) { if (index2_723 <= 1) { if (index2_723 <= 0) { returnVal_107 = C_v_y_0_137[index1_952]; } else { returnVal_107 = C_v_y_1_541[index1_952]; }; } else { returnVal_107 = C_v_y_2_121[index1_952]; }; } else { if (index2_723 <= 3) { returnVal_107 = C_v_y_3_167[index1_952]; } else { returnVal_107 = C_v_y_4_194[index1_952]; }; }; }; return returnVal_107; } function C_v_z_set173(integer instanceId191, integer arrayIndex901, real value646) { if ((arrayIndex_901 < 0) or (arrayIndex_901 >= 5)) { error202("Index out of Bounds"); } else { if (arrayIndex_901 <= 2) { if (arrayIndex_901 <= 1) { if (arrayIndex_901 <= 0) { C_v_z_0_134[instanceId_191] = value_646; } else { C_v_z_1_113[instanceId_191] = value_646; }; } else { C_v_z_2_836[instanceId_191] = value_646; }; } else { if (arrayIndex_901 <= 3) { C_v_z_3_211[instanceId_191] = value_646; } else { C_v_z_4_159[instanceId_191] = value_646; }; }; }; } function C_v_z_get192(integer index1828, integer index2120) returns real { local real returnVal154 if ((index2_120 < 0) or (index2_120 >= 5)) { error202("Index out of Bounds"); } else { if (index2_120 <= 2) { if (index2_120 <= 1) { if (index2_120 <= 0) { returnVal_154 = C_v_z_0_134[index1_828]; } else { returnVal_154 = C_v_z_1_113[index1_828]; }; } else { returnVal_154 = C_v_z_2_836[index1_828]; }; } else { if (index2_120 <= 3) { returnVal_154 = C_v_z_3_211[index1_828]; } else { returnVal_154 = C_v_z_4_159[index1_828]; }; }; }; return returnVal_154; }