S = gets.chomp
MOD = 10**9 + 7

d0, d1 = Array.new(13, 0), Array.new(13, 0)
d0[0] = 1
a = 10.times.flat_map{|i| 13.times.map{|j| [(10*j + i) % 13, j]}}
S.chars do |c|
  d1.fill(0)
  (c == '?' ? a : a[13*c.to_i, 13]).each{|i, j| d1[i] = (d1[i] + d0[j]) % MOD}
  d0 = d1.dup
end
puts d0[5]