var ret []string
	for _, a := range g.arcs {
		ret = append(ret, a.from+" -> "+a.to)

	ret := make([]string, len(g.arcs))
	for i, a := range g.arcs {
		ret[i] = a.from + " -> " + a.to

	ret := &Graph{}
	for _, node := range g.nodes {
		ret.nodes = append(ret.nodes, node)

	ret := &Graph{
		nodes: make([]string, len(g.nodes)),
		arcs:  make([]myArc, len(g.arcs)),
	}
	for i, node := range g.nodes {
		ret.nodes[i] = node

	route := make(chan string, 1)
	for _, a := range g.arcs {

	route := ""
	for i, a := range g.arcs {

			route <- a.from

			route = a.from

		ret.arcs = append(ret.arcs, a)

		ret.arcs[i] = a

	for {
		select {
		case elem := <-route:
			if elem == oldRoot {
				break
			}
			for i, a := range g.arcs {
				if a.to == elem {
					route <- a.from
					a.to, a.from = a.from, a.to
					ret.arcs[i] = a
				}

	for route != oldRoot && route != "" {
		for i, a := range g.arcs {
			if a.to == route {
				route = a.from
				a.to, a.from = a.from, a.to
				ret.arcs[i] = a

		default:
			return ret

	return ret