import Data.List main = getContents >>= print . (\x -> if x == [] then 0 else maximum x) . map length . filter (elem 'o') . group . concat . lines