let S = stdin.ReadLine().Trim()

let mutable t = 0
let mutable max = 0

for i in 0 .. S.Length-1 do
    if S.[i] = '…' then
        t <- t + 1
        if max < t then max <- t
    else
        t <- 0

printfn "%d" max