p$<.map{|e|16-e.sub("NONE\n","").split(?,).size}.inject(:*)**2