array C_nextFree209 integer C_firstFree367 integer C_maxIndex973 array C_ang_rad_0742 array C_ang_rad_1148 integer C_firstFree367 = 0 integer C_maxIndex973 = 0 function initGlobals160() { } function main158() { local integer c161 initGlobals160(); c_161 = new_C885(); C_ang_rad_set196(c_161, 0, 4.); C_ang_rad_set196(c_161, 1, 2.); if ((C_ang_rad_get136(c_161, 0) == 4.) and (C_ang_rad_get136(c_161, 1) == 2.)) { testSuccess301(); } else { }; } function config263() { } IS_NATIVE function testSuccess301() { } function new_C885() returns integer { local integer this758 if (C_firstFree_367 == 0) { if (C_maxIndex_973 < 32768) { C_maxIndex_973 = (C_maxIndex_973 + 1); this_758 = C_maxIndex_973; } else { error924("Out of memory: Could not create C."); this_758 = 0; }; } else { C_firstFree_367 = (C_firstFree_367 - 1); this_758 = C_nextFree_209[C_firstFree_367]; }; return this_758; } function error924(string msg142) { $debugPrint918((msg_142 + (" " + #getStackTrace()))); } function C_ang_rad_set196(integer instanceId450, integer arrayIndex106, real value446) { if ((arrayIndex_106 < 0) or (arrayIndex_106 >= 2)) { error924("Index out of Bounds"); } else { if (arrayIndex_106 <= 0) { C_ang_rad_0_742[instanceId_450] = value_446; } else { C_ang_rad_1_148[instanceId_450] = value_446; }; }; } function C_ang_rad_get136(integer index1747, integer index2181) returns real { local real returnVal176 if ((index2_181 < 0) or (index2_181 >= 2)) { error924("Index out of Bounds"); } else { if (index2_181 <= 0) { returnVal_176 = C_ang_rad_0_742[index1_747]; } else { returnVal_176 = C_ang_rad_1_148[index1_747]; }; }; return returnVal_176; }