1
2
3
4
5
6
function AddNeighborToObject (current, neighbor)
k ← oid[current]
o[k].b[o[k].bno] ← neighbor
o[k].bno ← o[k].bno + 1
oid[neighbor] ← k
end function