array<integer> F_nextFree141
integer F_firstFree224
integer F_maxIndex140
array<integer> F_typeId125
array<integer> Cell_nextFree173
integer Cell_firstFree140
integer Cell_maxIndex403
array<integer> Cell_typeId211
array<any> Cell_elem110


integer F_firstFree224 = 0
integer F_maxIndex140 = 0
integer Cell_firstFree140 = 0
integer Cell_maxIndex403 = 0


function initGlobals129() { 
}


function main172() { 
    initGlobals129();
    init_test119();
}


function config208() { 
}


function init_test119() { 
    local integer a467
    local integer this210
    local real this136
    a_467 = new_Cell129(5);
    if (F_firstFree_224 == 0) {
        if (F_maxIndex_140 < 32768) {
            F_maxIndex_140 = (F_maxIndex_140 + 1);
            this_210 = F_maxIndex_140;
            F_typeId_125[this_210] = 3;
        } else {
            error894("Out of memory: Could not create F_map_test.");
            this_210 = 0;
        };
    } else {
        F_firstFree_224 = (F_firstFree_224 - 1);
        this_210 = F_nextFree_141[F_firstFree_224];
        F_typeId_125[this_210] = 3;
    };
    if (Cell_typeId_211[a_467] == 0) {
        if (a_467 == 0) {
            error894("Nullpointer exception when calling Cell.map");
        } else {
            error894("Called Cell.map on invalid object.");
        };
    } else {
    };
    a_467 = new_Cell129(dispatch_F_test_F_apply833(this_210, Cell_elem_110[a_467]));
    if (Cell_typeId_211[a_467] == 0) {
        if (a_467 == 0) {
            error894("Nullpointer exception when calling Cell.get");
        } else {
            error894("Called Cell.get on invalid object.");
        };
    } else {
    };
    this_136 = (Cell_elem_110[a_467] / 1000.);
    if (this_136 == 50.) {
        testSuccess947();
    } else {
        println109(R2S143(this_136));
    };
}


IS_NATIVE IS_EXTERN @extern function R2I474(real r577) returns integer { 
}


IS_NATIVE function testSuccess947() { 
}


IS_NATIVE IS_EXTERN @extern function R2S143(real r100) returns string { 
}


IS_NATIVE function println109(string s149) { 
}


function new_Cell129(any t143) returns integer { 
    local integer this177
    if (Cell_firstFree_140 == 0) {
        if (Cell_maxIndex_403 < 32768) {
            Cell_maxIndex_403 = (Cell_maxIndex_403 + 1);
            this_177 = Cell_maxIndex_403;
            Cell_typeId_211[this_177] = 1;
        } else {
            error894("Out of memory: Could not create Cell.");
            this_177 = 0;
        };
    } else {
        Cell_firstFree_140 = (Cell_firstFree_140 - 1);
        this_177 = Cell_nextFree_173[Cell_firstFree_140];
        Cell_typeId_211[this_177] = 1;
    };
    Cell_elem_110[this_177] = t_143;
    return this_177;
}


function error894(string msg983) { 
    $debugPrint172((msg_983 + ("
" + #getStackTrace())));
}


function dispatch_F_test_F_apply833(integer this195, any a976) returns any { 
    if (F_typeId_125[this_195] == 0) {
        if (this_195 == 0) {
            error894("Nullpointer exception when calling F.apply");
        } else {
            error894("Called F.apply on invalid object.");
        };
    } else {
    };
    return R2I474(((a_976 * 10.) * 1000.));
}