require "big" a = (1..26).map { read_line.to_big_i } if "dehrw".chars.any? { |c| a[c - 'a'] < 1 } || a['l' - 'a'] < 3 || a['o' - 'a'] < 2 puts 0 exit end puts "dehrw".chars.reduce(1.to_big_i) { |acc, c| acc * a[c - 'a'] } * (2.to_big_i...a['l' - 'a']).max_of { |cnt| cnt * (cnt - 1) // 2 * (a['l' - 'a'] - cnt) } * (1.to_big_i..a['o' - 'a']).max_of { |cnt| cnt * (a['o' - 'a'] - cnt) }