k=gets.split[l=-1].to_i
x,y=$<.map{|a|c=1,*t=[i=x=0]*1024
a.split{c[x^=_1.to_i]+=1}
t.map{t[0]+=(q=c[i])*~-q/2;(0...i).map{t[_1^i]+=q*c[_1]};i+=1}
t}
p x.sum{_1*y[k^l+=1]}.%10**9+7