Problem:
MathJax.Hub.Config({ tex2jax: { inlineMath: [["$","$"], ["\\(","\\)"]], processEscapes: true }});

Areas on the Cross-Section Diagram

Your task is to simulate a flood damage.

For a given cross-section diagram, reports areas of flooded sections.

Assume that rain is falling endlessly in the region and the water overflowing from the region is falling in the sea at the both sides.
For example, for the above cross-section diagram, the rain will create floods which have areas of 4, 2, 1, 19 and 9 respectively.

Input

A string, which represents slopes and flatlands by '/', '\' and '_' respectively, is given in a line. For example, the region of the above example is given by a string "\\///\_/\/\\\\/_/\\///__\\\_\\/_\/_/\".

output

Report the areas of floods in the following format:

$A$

$k$ $L_1$ $L_2$ ... $L_k$

In the first line, print the total area $A$ of created floods.

In the second line, print the number of floods $k$ and areas $L_i (i = 1, 2, ..., k)$ for each flood from the left side of the cross-section diagram. Print a space character before $L_i$.

Constraints

$1 \leq$ length of the string $\leq 20,000$

Sample Input 1

\\//

Sample Output 1

4
1 4

Sample Input 2

\\///\_/\/\\\\/_/\\///__\\\_\\/_\/_/\

Sample Output 2

35
5 4 2 1 19 9

Solution in Ruby (judge verdict: Memory Limit Exceeded)

#!/usr/bin/ruby
# -*- coding: utf-8 -*-
=begin
"\\///\_/\/\\\\/_/\\///__\\\_\\/_\/_/\"

=end
class Main
  def initialize()

    #fh = open("/home/muz/Downloads/ALDS1_3_D_in9.txt")
    fh = STDIN
    s = fh.gets.chomp
    t = s.gsub(/\\/,"D").gsub(/\//,"U").gsub(/_/,"F")
    u=t.split(//)
    xsize = t.length
    matsize = [t.gsub(/[^D]/,"").length, t.gsub(/[^U]/,"").length].max*2+1
    #matsize=6000
    #puts "u size=#{u.length}"
    #puts "xsize=#{xsize}"
    #puts "matsize=#{matsize}"
#    exit
    start=matsize/2
    mt = Array.new(xsize).map{Array.new(2*matsize+1, " ")}

    v= u.dup
    x=0
    y=start
    while c = v.shift do
      if c=="D" then
        mt[x][y]="D"
        y = y + 1
      elsif c=="F" then
        mt[x][y]="F"
        y = y
      elsif c=="U" then
        y = y - 1
        mt[x][y]="U"
      else
        abort("Unknown:#{c}")
      end
      x = x + 1
    end

    p = []
    0.upto(mt[0].length-1){|y|
      st = false
      x0=-9999
      0.upto(xsize-1){|x|
        if (not st) and mt[x][y] == "D" then
          st=true
          x0=x
        elsif st and mt[x][y] == "U" then
          p.push([x0, (x-x0)])
          st = false
        end
      }
    }

    if p.length ==0 then
      puts 0 
      puts 0
    else
      rst=[]
      q = p.sort{|a,b| a[0]<=>b[0]}
      st=false
      x1=q[0][0] + q[0][1]
      v=q[0][1]
      1.upto(q.length-1){|i|
        if q[i][0]<=x1 then
          st=true
          v += q[i][1]
        else
          st=false
          rst.push(v)
          x1=q[i][0]+ q[i][1]
          v=q[i][1]
        end
      }
      rst.push(v)
      puts rst.inject(0){|acc,x| acc+x}
      print rst.length
      print " "
      puts rst.map{|x| x.to_s}.join(" ")
    end
  end
end

if $0==__FILE__ then
  Main.new()
end