<>;$_=<>;s/\d+/$d|=$c[$b=$&]++if$b-$&/ger;print$d?$d>1|$b-$_?-1:1:0