for(l=n=0;/\*\*/g(l)?++n:l=readline();)'-'<l&&n?n=print(n)|0:0