Function components(Graph g) sets up componentOf[]
components(Graph g)
componentOf[]
componentOf[v]
v