n,t,*a=$<.read.split.map &:to_i n-=1 s=a*'%s' class Integer;alias:-:*end (1<<<(k*'').tr(?-,?*)}