#!/usr/bin/ruby

def countLine(line)
	#~ return line.match(/^(unsigned)? [char|short|int]/)
	base = 0
	sum = 0
	line.split(/[\s,]/).each do |part|
		
		#~ puts "part:" + part
		case part
			when "unsigned"
				next
			when "char"
				base = 1
			when "short"
				base = 2
			when "int"
				base = 4
			else
				prod = 1
				part.scan(/\[(\d+)\]/).each do |size|
					#~ puts "size:" + size.to_s
					prod *= size.first.to_i
				end	
				sum += prod		
		end
	end
	return base * sum
end

$stdin.each do |line|
	puts countLine(line.chomp)
end