(Обхід)
begin v := ПОЧАТОК; w := ПОПЕР[v]; f := false ;
while (НАСТУП[v]

ПОЧАТОК or f = false)
do
begin if (НАСТУП[v]=w) then f := false;
if (три точки v, НАСТУП[v], НАСТУП[НАСТУП[v]] утворюють "лівий поворот") then v := НАСТУП[v]
else begin ВИЛУЧИТЬ НАСТУП[v];
v := ПОПЕР[v];
end;
end;
end.