s=$<.map(&:chop).join z=0 (0..13).map{|i|(i..13).map{|j|(i..j).all?{|k|s[i]==s[k]}&&z