-- | Changes the index.
--
-- This is used only during the building of the data structures.
setIdx :: Node -> T.Ndx -> Node
setIdx t i = t {idx = i}
setIdx :: Node -> T.Ndx -> Node
setIdx t i = t {idx = i}
setIdx t i = t {idx = i}