#!/usr/bin/ruby
A=gets.split.map{|e|
	a=[]
	s=0
	e.bytes{|b|
		n=b-48
		nxt=[0]*[9+a.size,n+s].max
		(0..9).each{|i|
			(0...a.size).each{|j|
				nxt[j+i]=nxt[j+i]+a[j]
			}
		}
		(0...n).each{|j|
			nxt[j+s]+=1
		}
		a=nxt
		s+=n
	}
	a[s]+=1
	a
}
r=0
1.upto([A[0].size,A[1].size].min-1){|i|
	r=(r+A[0][i]*A[1][i])%1000000009
}
p r