func main()
	var ans: int :: 1
	for(1, 3)
		var s: []char :: cui@input()
		if(s = "NONE")
			do ans :* 16 ^ 2
		else
			do ans :* (16 - ^s.split(",")) ^ 2
		end if
	end for
	do cui@print("\{ans}\n")
end func