n=gets.to_i
b=gets.split.map &:to_i

a=[]
m=n
m.times{|i|
    b.reverse.each_with_index{|e,j|
        if e==n-j
            a<<e
            b.delete_at(n-j-1)
            n-=1
            break
        end
    }
}

if a.size!=m
    p -1
else
    a.reverse_each{|e|p e}
end