co🔗e: A Linked List Solution

{"payload":{"meta":{"Graph":{"@Type":"81297157","@Value":{"Guid":"(Guid)10df3673-b2c4-4b19-ba81-9386087cacb9","ParentGuid":"(Guid)36c406f7-c52d-41f4-be7e-30400bfd34bd","Name":"(string)InsertElem","Properties":{"@Type":"2c41fa04:IDictionary","@Value":{}},"TypeGuid":"(Guid)f8a58466-d7f6-439f-bbb8-d4600e41d099","EmbeddedTypeGuids":{"@Type":"[Guid]","@Value":["(Guid)a9ed5b7e-75c5-4651-af16-d2c27e98cb94","(Guid)3b83b776-fb25-43b8-99f2-3c507c9143fc"]}}},"TypeInfos":{"2c41fa04":"{2c41fa04-1834-41c1-816e-303c7aa2c05b}","81297157":"{81297157-7ec9-45ce-845e-84cab2b88ade}","Guid":"System.Guid","string":"System.String"}},"object":{"Graph":{"@Type":"f8a58466","@Value":{"Implementation":{"@Type":"3b83b776","@Value":{"TextDocument":{"@Type":"f3878285","@Value":{"TextLines":{"@Type":"[a5de0b0b]","@Value":[{"@Type":"a5de0b0b","@Value":{"Id":"(long)370","Tag":null,"Text":"(string)IF itfElement <> 0 THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)371","Tag":null,"Text":"(string)    // itfElement is valid"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)372","Tag":null,"Text":"(string)    itfList := itfElement.List;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)373","Tag":null,"Text":"(string)    IF itfList = 0 THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)374","Tag":null,"Text":"(string)        // itfElement is not linked."}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)375","Tag":null,"Text":"(string)        IF itfPrecursor <> 0 THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)376","Tag":null,"Text":"(string)            // itfPrecursor is valid"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)377","Tag":null,"Text":"(string)            itfList := itfPrecursor.List;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)378","Tag":null,"Text":"(string)            itfThis := THIS^;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)379","Tag":null,"Text":"(string)            IF itfList = itfThis THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)380","Tag":null,"Text":"(string)                // itfPrecursor is member of this List"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)381","Tag":null,"Text":"(string)                itfNext               := itfPrecursor.NextElem;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)382","Tag":null,"Text":"(string)                itfElement.NextElem   := itfNext;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)383","Tag":null,"Text":"(string)                itfPrecursor.NextElem := itfElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)384","Tag":null,"Text":"(string)                itfElement.PrevElem   := itfPrecursor;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)385","Tag":null,"Text":"(string)                IF itfNext <> 0 THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)386","Tag":null,"Text":"(string)                    itfNext.PrevElem := itfElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)387","Tag":null,"Text":"(string)                END_IF"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)388","Tag":null,"Text":"(string)"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)389","Tag":null,"Text":"(string)                xInsert := TRUE;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)390","Tag":null,"Text":"(string)            END_IF"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)391","Tag":null,"Text":"(string)        ELSE"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)392","Tag":null,"Text":"(string)            // Insert works like Push"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)393","Tag":null,"Text":"(string)            IF _itfHead <> 0 THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)394","Tag":null,"Text":"(string)                _itfHead.PrevElem := itfElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)395","Tag":null,"Text":"(string)            END_IF"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)396","Tag":null,"Text":"(string)"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)397","Tag":null,"Text":"(string)            itfElement.NextElem := _itfHead;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)398","Tag":null,"Text":"(string)            _itfHead            := itfElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)399","Tag":null,"Text":"(string)            IF _itfTail = 0 THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)400","Tag":null,"Text":"(string)                _itfTail := itfElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)401","Tag":null,"Text":"(string)            END_IF"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)402","Tag":null,"Text":"(string)"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)403","Tag":null,"Text":"(string)            xInsert := TRUE;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)404","Tag":null,"Text":"(string)        END_IF"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)405","Tag":null,"Text":"(string)    END_IF"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)406","Tag":null,"Text":"(string)"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)407","Tag":null,"Text":"(string)    IF xInsert THEN"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)408","Tag":null,"Text":"(string)        _ctSize         := _ctSize + 1;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)409","Tag":null,"Text":"(string)        itfElement.List := THIS^;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)410","Tag":null,"Text":"(string)        InsertElem      := itfElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)411","Tag":null,"Text":"(string)    END_IF"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)7","Tag":null,"Text":"(string)END_IF"}}]}}}}},"Interface":{"@Type":"a9ed5b7e","@Value":{"TextDocument":{"@Type":"f3878285","@Value":{"TextLines":{"@Type":"[a5de0b0b]","@Value":[{"@Type":"a5de0b0b","@Value":{"Id":"(long)360","Tag":null,"Text":"(string)METHOD InsertElem : IElement"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)361","Tag":null,"Text":"(string)VAR_INPUT"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)362","Tag":null,"Text":"(string)    itfElement   : IElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)363","Tag":null,"Text":"(string)    itfPrecursor : IElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)364","Tag":null,"Text":"(string)END_VAR"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)365","Tag":null,"Text":"(string)VAR"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)366","Tag":null,"Text":"(string)    itfNext : IElement;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)367","Tag":null,"Text":"(string)    itfList : IList;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)368","Tag":null,"Text":"(string)    itfThis : IList;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)369","Tag":null,"Text":"(string)    xInsert : BOOL;"}},{"@Type":"a5de0b0b","@Value":{"Id":"(long)1","Tag":null,"Text":"(string)END_VAR"}}]}}}}}}},"TypeInfos":{"3b83b776":"{3b83b776-fb25-43b8-99f2-3c507c9143fc}","a5de0b0b":"{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}","a9ed5b7e":"{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}","f3878285":"{f3878285-8e4f-490b-bb1b-9acbb7eb04db}","f8a58466":"{f8a58466-d7f6-439f-bbb8-d4600e41d099}","long":"System.Int64","string":"System.String"}}},"FormatVersion":"1.0"}