($n,$k)=glob<>;
print$n<$k?-1:$k-1