Problem:
MathJax.Hub.Config({ tex2jax: { inlineMath: [["$","$"], ["\\(","\\)"]], processEscapes: true }});

Depth First Search

Depth-first search (DFS) follows the strategy to search ”deeper” in the graph whenever possible. In DFS, edges are recursively explored out of the most recently discovered vertex $v$ that still has unexplored edges leaving it. When all of $v$'s edges have been explored, the search ”backtracks” to explore edges leaving the vertex from which $v$ was discovered.

This process continues until all the vertices that are reachable from the original source vertex have been discovered. If any undiscovered vertices remain, then one of them is selected as a new source and the search is repeated from that source.

DFS timestamps each vertex as follows:

$d[v]$ records when $v$ is first discovered.

$f[v]$ records when the search finishes examining $v$’s adjacency list.

Write a program which reads a directed graph $G = (V, E)$ and demonstrates DFS on the graph based on the following rules:

$G$ is given in an adjacency-list. Vertices are identified by IDs $1, 2,... n$ respectively.

IDs in the adjacency list are arranged in ascending order.

The program should report the discover time and the finish time for each vertex.

When there are several candidates to visit during DFS, the algorithm should select the vertex with the smallest ID.

The timestamp starts with 1.

Input

In the first line, an integer $n$ denoting the number of vertices of $G$ is given. In the next $n$ lines, adjacency lists of $u$ are given in the following format:

$u$ $k$ $v_1$ $v_2$ ... $v_k$

$u$ is ID of the vertex and $k$ denotes its degree. $v_i$ are IDs of vertices adjacent to $u$.

Output

For each vertex, print $id$, $d$ and $f$ separated by a space character in a line. $id$ is ID of the vertex, $d$ and $f$ is the discover time and the finish time respectively. Print in order of vertex IDs.

Constraints

$1 \leq n \leq 100$

Sample Input 1

4
1 1 2
2 1 4
3 0
4 1 3

Sample Output 1

1 1 8
2 2 7
3 4 5
4 3 6

Sample Input 2

6
1 2 2 3
2 2 3 4
3 1 5
4 1 6
5 1 6
6 0

Sample Output 2

1 1 12
2 2 11
3 3 8
4 9 10
5 4 7
6 5 6

This is example for Sample Input 2 (discover/finish)

Reference

Introduction to Algorithms, Thomas H. Cormen, Charles E. Leiserson, Ronald L. Rivest, and Clifford Stein. The MIT Press.

Solution in Ruby (judge verdict: Wrong Answer)

class Node
  attr_accessor :id, :nexts, :parent_id, :is_reach

  def initialize id
    @id = id.to_i
    @nexts = []
    @parent_id = -1
    @is_reach = false
  end

  def setNexts next_id
    @nexts << next_id
  end

  def setReach
    is_reach = true
  end

  def isReach
    return is_reach
  end
end

$input_map = {}
n = 0
count = 0
line_count = 0
STDIN.each_line {|line|
  if count == 0
    count += 1
    n = line.to_i
    next
  end

  hoge = 0
  array = line.split " "
  id = array[0].to_i
  $input_map[id] = Node.new id
  array.each do |num|
    hoge += 1
    if hoge==1
      next
    elsif hoge==2
      next
    end

    $input_map[id].setNexts num.to_i
  end

  line_count += 1
}

$visited_list = Array.new n + 1
$visited_list.fill (false)
$discover_list = Array.new n + 1
$complete_list = Array.new n + 1
def PrintNode id, time
  $visited_list[id] = true
  $discover_list[id] = time

  if $input_map[id].nexts.empty?
    $complete_list[id] = time + 1
    return $complete_list[id]
  end

  result = 0
  $input_map[id].nexts.each do |child_id|
    if !$visited_list[child_id]
      time += 1
      result = PrintNode child_id, time
      time = time + (result - time)
    end
  end

  end_time = result == 0 ? time + 1 : result + 1

  $complete_list[id] = end_time
  return $complete_list[id]
end

index = 1
$visited_list.each do |i|
  if ($input_map.has_key? (index)) && (!$visited_list[index])
    PrintNode index, 1
  end
  index += 1
end

n.times do |i|
  print i + 1, " ", $discover_list[i + 1], " ", $complete_list[i + 1], "\n"
end