Problem: There are n cities in Berland, each of them has a unique id — an integer from 1 to n, the capital is the one with id 1. Now there is a serious problem in Berland with roads — there are no roads.

That is why there was a decision to build n - 1 roads so that there will be exactly one simple path between each pair of cities.

In the construction plan t integers a1, a2, ..., at were stated, where t equals to the distance from the capital to the most distant city, concerning new roads. ai equals the number of cities which should be at the distance i from the capital. The distance between two cities is the number of roads one has to pass on the way from one city to another. 

Also, it was decided that among all the cities except the capital there should be exactly k cities with exactly one road going from each of them. Such cities are dead-ends and can't be economically attractive. In calculation of these cities the capital is not taken into consideration regardless of the number of roads from it. 

Your task is to offer a plan of road's construction which satisfies all the described conditions or to inform that it is impossible.

Input

The first line contains three positive numbers n, t and k (2 ≤ n ≤ 2·105, 1 ≤ t, k < n) — the distance to the most distant city from the capital and the number of cities which should be dead-ends (the capital in this number is not taken into consideration). 

The second line contains a sequence of t integers a1, a2, ..., at (1 ≤ ai < n), the i-th number is the number of cities which should be at the distance i from the capital. It is guaranteed that the sum of all the values ai equals n - 1.

Output

If it is impossible to built roads which satisfy all conditions, print -1.

Otherwise, in the first line print one integer n — the number of cities in Berland. In the each of the next n - 1 line print two integers — the ids of cities that are connected by a road. Each road should be printed exactly once. You can print the roads and the cities connected by a road in any order.

If there are multiple answers, print any of them. Remember that the capital has id 1.

Examples

Input

7 3 3
2 3 1


Output

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


Input

14 5 6
4 4 2 2 1


Output

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


Input

3 1 1
2


Output

-1

Solution (in JAVA):

Solution:
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStreamReader;
import java.util.*;

/**
 * Created by Firеfly on 12/18/2016.
 */
public class code {
    public static void main(String[] args) throws IOException {
        Woorker worker = new Woorker();
    }
}
class Woorker {

    Woorker() throws IOException {
        FastScannerqq fs = new FastScannerqq(new InputStreamReader(System.in));
        int n = fs.nextInt();
        int t = fs.nextInt();
        int k = fs.nextInt();
        int[] mas = new int[t];
        for (int i = 0; i<t; i++)
            mas[i] = fs.nextInt(); //количество говно на каждом уровне, 0 == 1
        ArrayList<Integer> ways[] =new ArrayList[n];
        for (int i = 0; i<n; i++)
            ways[i] = new ArrayList<>(); // - дороги из i+1 в k-ую вершину
        for (int i = 2; i<= 1+mas[0]; i++)
            ways[0].add(i); // добавляем пути первого уровня к столице
        int pos = 1;
        int avail = 0; // вообще может быть листьями
        int mustB = 0; //априори листия
        for (int i = 0; i<mas.length-1; i++)
        {
            avail += mas[i]-1;
            mustB += mas[i]-mas[i+1] >0 ? mas[i]-mas[i+1] : 0;
        }
        mustB+=mas[mas.length-1];
        avail+=mas[mas.length-1];
        if (mustB >k || avail<k)
            System.out.println(-1); // если жопа
        else {
            int possible = k-mustB; // нужно сделать листьев
            int currPoint = 1; // указатель на ways
            int currAdd = 1+mas[0]+1; // указатель на номер вставки
            for (int i = 0; i<mas.length-1; i++) { // до последних вставок
                int able = 0; // able?
                if (mas[i]-mas[i+1]>=0) { // если нашли должностные листья
                    currPoint += mas[i] - mas[i + 1]; // тут норм, вроде!
                    able = mas[i + 1] - 1; // возможно вставить на i-том ряду листьев
                } else {
                    able = mas[i] - 1; //dsit
                }
                if (possible>0) { // если всё ещё требуется вставить
                    currPoint+= Math.min(able, possible); // вставляем минимум
                    possible-= Math.min(able, possible);
                }
                int j; // j
                int whoAdd = currAdd; // kopiya?
                for (j =currPoint; j<currAdd-2; j++) // остались лишь требуемые ветки и подветки, нужно распределить все оставшиеся ветки-1
                {
                    ways[j].add(whoAdd++);
                }
                currPoint = j; // перенос currPoint'a
                for (int q = whoAdd; q<= currAdd+mas[i+1]-1; q++) // 4e? korrectno, vrode!
                    ways[currPoint].add(q); //впихиваем последнему оставшиеся подветки
                currPoint++; // переводим на след ряд
                currAdd+=mas[i+1];// ок
            }
            System.out.println(n);
            for (int i = 0; i<ways.length; i++)
                if (ways[i].size()!=0)
                    for (int x : ways[i])
                        System.out.println(i+1 + " " + x);
        }
    }


}


class FastScannerqq {
    BufferedReader br;
    StringTokenizer stok;

    FastScannerqq(InputStreamReader fr) {
        br = new BufferedReader(fr);
    }

    String nextToken() throws IOException {
        while (stok == null || !stok.hasMoreTokens()) {
            String s = br.readLine();
            if (s == null)
                return null;
            stok = new StringTokenizer(s);
        }
        return stok.nextToken();
    }

    int nextInt() throws IOException {
        return Integer.parseInt(nextToken());
    }

    long nextLong() throws IOException {
        return Long.parseLong(nextToken());
    }

    double nextDouble() throws IOException {
        return Double.parseDouble(nextToken());
    }

    char nextChar() throws IOException {
        return (char) br.read();
    }

    String nextLine() throws IOException {
        return br.readLine();
    }
}