Problem:
Score : 600 points

Problem Statement

We have a tree with N vertices. The vertices are numbered 1 to N, and the i-th edge connects Vertex a_i and Vertex b_i.

Takahashi loves the number 3. He is seeking a permutation p_1, p_2, \ldots , p_N of integers from 1 to N satisfying the following condition:

For every pair of vertices (i, j), if the distance between Vertex i and Vertex j is 3, the sum or product of p_i and p_j is a multiple of 3.

Here the distance between Vertex i and Vertex j is the number of edges contained in the shortest path from Vertex i to Vertex j.

Help Takahashi by finding a permutation that satisfies the condition.

Constraints

2\leq N\leq 2\times 10^5

1\leq a_i, b_i \leq N

The given graph is a tree.

Input

Input is given from Standard Input in the following format:

N
a_1 b_1
a_2 b_2
\vdots
a_{N-1} b_{N-1}

Output

If no permutation satisfies the condition, print -1.

Otherwise, print a permutation satisfying the condition, with space in between.
If there are multiple solutions, you can print any of them.

Sample Input 1

5
1 2
1 3
3 4
3 5

Sample Output 1

1 2 5 4 3

The distance between two vertices is 3 for the two pairs (2, 4) and (2, 5).

p_2 + p_4 = 6

p_2\times p_5 = 6

Thus, this permutation satisfies the condition.

Solution in Java8 (OpenJDK 1.8.0) (judge verdict: Wrong Answer)

import java.awt.*;
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStreamReader;
import java.io.PrintWriter;
import java.util.List;
import java.util.*;
import java.util.function.IntUnaryOperator;
import java.util.function.LongUnaryOperator;

class Main {
    static In in = new In();
    static Out out = new Out();
    static long mod = 1000000007;
    static long inf = 0xfffffffffffffffL;

    int m1, m2;
    List<List<Integer>> edges;
    int[] ans;
    void solve() {
        int n = in.nextInt();
        edges = new ArrayList<>();
        for (int i = 0; i < n; i++) {
            edges.add(new ArrayList<>());
        }
        for (int i = 0; i < n - 1; i++) {
            int a = in.nextInt() - 1;
            int b = in.nextInt() - 1;
            edges.get(a).add(b);
            edges.get(b).add(a);
        }
        Point count = dfs(0, 0, true);
        if (count.x > count.y) {
            m1 = (n + 2) / 3;
            m2 = (n + 1) / 3;
        } else {
            m1 = (n + 1) / 3;
            m2 = (n + 2) / 3;
        }
        int a = Math.min(count.x, count.y);
        int b = Math.max(count.x, count.y);
        if (a <= n / 3) {
        } else {
            ans = new int[n];
            Deque<State> deque = new ArrayDeque<>();
            deque.addLast(new State(0, 0, true));
            int c1 = 0, c2 = 0;
            while (!deque.isEmpty()) {
                State p = deque.poll();
                if (p.dist == count.x <= count.y) {
                    ans[p.node] = 3;
                } else {
                    if (c1 == m1) {
                        ans[p.node] = 2;
                        c1++;
                    } else {
                        ans[p.node] = 1;
                        c2++;
                    }
                }
                for (Integer v : edges.get(p.node)) {
                    if (v != p.parent) {
                        deque.addLast(new State(v, p.node, !p.dist));
                    }
                }
            }
            int a1 = 0, a2 = 0, a3 = 0;
            for (int i = 0; i < n; i++) {
                if (ans[i] == 1) {
                    ans[i] = a1 * 3 + ans[i];
                    a1++;
                } else if (ans[i] == 2) {
                    ans[i] = a2 * 3 + ans[i];
                    a2++;
                } else {
                    ans[i] = a3 * 3 + ans[i];
                    a3++;
                }
            }
            out.println(ans);
        }
    }

    static class State {
        int node, parent;
        boolean dist;

        public State(int node, int parent, boolean dist) {
            this.node = node;
            this.parent = parent;
            this.dist = dist;
        }
    }

    Point dfs(int node, int parent, boolean dist) {
        Point result = new Point();
        if (dist) {
            result.x++;
        } else {
            result.y++;
        }
        for (Integer v : edges.get(node)) {
            if (v != parent) {
                Point r = dfs(v, node, !dist);
                result.x += r.x;
                result.y += r.y;
            }
        }
        return result;
    }

    public static void main(String[]$) {
        new Main().solve();
        out.flush();
    }
}

class In {
    private BufferedReader reader = new BufferedReader(new InputStreamReader(System.in), 0x10000);
    private StringTokenizer tokenizer;

    String next() {
        try {
            while (tokenizer == null || !tokenizer.hasMoreTokens()) {
                tokenizer = new StringTokenizer(reader.readLine());
            }
        } catch (IOException ignored) {
        }
        return tokenizer.nextToken();
    }

    int nextInt() {
        return Integer.parseInt(next());
    }

    long nextLong() {
        return Long.parseLong(next());
    }

    char[][] nextCharArray(int n, int m) {
        char[][] a = new char[n][m];
        for (int i = 0; i < n; i++) {
            a[i] = next().toCharArray();
        }
        return a;
    }

    int[] nextIntArray(int n) {
        int[] a = new int[n];
        for (int i = 0; i < n; i++) {
            a[i] = nextInt();
        }
        return a;
    }

    int[] nextIntArray(int n, IntUnaryOperator op) {
        int[] a = new int[n];
        for (int i = 0; i < n; i++) {
            a[i] = op.applyAsInt(nextInt());
        }
        return a;
    }

    long[] nextLongArray(int n) {
        long[] a = new long[n];
        for (int i = 0; i < n; i++) {
            a[i] = nextLong();
        }
        return a;
    }

    long[] nextLongArray(int n, LongUnaryOperator op) {
        long[] a = new long[n];
        for (int i = 0; i < n; i++) {
            a[i] = op.applyAsLong(nextLong());
        }
        return a;
    }
}

class Out {
    private PrintWriter out = new PrintWriter(System.out);
    boolean autoFlush = false;

    void println(Object... a) {
        StringJoiner joiner = new StringJoiner(" ");
        for (Object obj : a) {
            joiner.add(String.valueOf(obj));
        }
        out.println(joiner);
        if (autoFlush) {
            out.flush();
        }
    }

    void println(int[] a) {
        StringJoiner joiner = new StringJoiner(" ");
        for (int i : a) {
            joiner.add(Integer.toString(i));
        }
        out.println(joiner);
        if (autoFlush) {
            out.flush();
        }
    }

    void println(long[] a) {
        StringJoiner joiner = new StringJoiner(" ");
        for (long i : a) {
            joiner.add(Long.toString(i));
        }
        out.println(joiner);
        if (autoFlush) {
            out.flush();
        }
    }

    void flush() {
        out.flush();
    }
}