Problem: You are given a string s consisting of |s| small english letters.

In one move you can replace any character of this string to the next character in alphabetical order (a will be replaced with b, s will be replaced with t, etc.). You cannot replace letter z with any other letter.

Your target is to make some number of moves (not necessary minimal) to get string abcdefghijklmnopqrstuvwxyz (english alphabet) as a subsequence. Subsequence of the string is the string that is obtained by deleting characters at some positions. You need to print the string that will be obtained from the given string and will be contain english alphabet as a subsequence or say that it is impossible.

Input

The only one line of the input consisting of the string s consisting of |s| (1 ≤ |s| ≤ 105) small english letters.

Output

If you can get a string that can be obtained from the given string and will contain english alphabet as a subsequence, print it. Otherwise print «-1» (without quotes).

Examples

Input

aacceeggiikkmmooqqssuuwwyy


Output

abcdefghijklmnopqrstuvwxyz


Input

thereisnoanswer


Output

-1

Solution (in JAVA):

Solution:
import java.util.*;
public class cForLoop {
    public static void main(String[] args) {
		for (char stage = 0, arr[] = (new Scanner(System.in)).next().toCharArray(), n = (char) arr.length, blah = 0, i = 0, let = 0, k = 0, j = 0, good = (char) 1, oo = 10000, memo[] = new char[27], list[][] = new char[27][27]; stage < 100;  blah = stage == 0 ? (n < 26 ? (stage = (char) ((System.out.printf("-1") == null ? 0 : 0) + 100)) : (stage = 1)) : 0, blah = stage == 1 ? stage = (char) (2 + (i = 0)) : 0, blah = stage == 2 ? (i == 27 ? (stage = 3) : (memo[i++] = oo)) : 0, blah = stage == 3 ? stage = (char) (4 + (memo[0] = 0)) : 0, blah = stage == 4 ? stage = (char) (5 + (i = 0)) : 0, blah = stage == 5 ? (i == n ? (stage = 16) : (stage = 6)) : 0, blah = stage == 6 ? stage = (char) (7 + 0 * (let = 25)) : 0, blah = stage == 7 ? (let < (arr[i] - 'a') || let > 10000 ? (stage = 15) : (stage = 8)) : 0, blah = stage == 8 ? (let - (arr[i] - 'a') + memo[let] >= oo ? (stage = 14) : (stage = 9)) : 0, blah = stage == 9 ? (let - (arr[i] - 'a') + memo[let] >= memo[let + 1] ? (stage = 14) : (char) ((memo[let + 1] = (char) (let - (arr[i] - 'a') + memo[let])) + (stage = 10))) : 0, blah = stage == 10 ? stage = (char) (11 + (j = 0)) : 0, blah = stage == 11 ? (j >= let ? (stage = 13) : (stage = 12)) : 0, blah = stage == 12 ? (char) ((list[let + 1][j] = list[let][j]) + (j++) + (stage = 11)) : 0, blah = stage == 13 ? (char) ((list[let + 1][let] = i) + (stage = 14)) : 0, blah = stage == 14 ? (char) ((let--) + (stage = 7)) : 0, blah = stage == 15 ? (char) ((i++) + (stage = 5)) : 0, blah = stage == 16 ? (memo[26] == oo ? (char) ((System.out.printf("-1") == null ? 0 : 0) + (stage = 100)) : (stage = 17)) : 0, blah = stage == 17 ? (char) ((i = 0) + (stage = 18)) : 0, blah = stage == 18 ? (i >= 26 ? (stage = 20) : (stage = 19)) : 0, blah = stage == 19 ? (char) ((arr[list[26][i]] = (char) ('a' + i)) + (i++) + (stage = 18)) : 0, blah = stage == 20 ? (char) ((System.out.printf(new String(arr)) == null ? 0 : 0) + (stage = 100)) : 0);
    }
}