#include <cstdio>
#include <cstdlib>
#include <cmath>
#include <climits>
#include <cfloat>
#include <map>
#include <utility>
#include <ctime>
#include <set>
#include <iostream>
#include <memory>
#include <string>
#include <unordered_set>
#include <cstring>
#include <vector>
#include <algorithm>
#include <functional>
#include <fstream>
#include <sstream>
#include <complex>
#include <bitset>
#include <stack>
#include <queue>
#include <cstring>
#include <numeric>
#include <cassert>
using namespace std;
#define rep(i,n) for(int (i)=0;(i)<(n);(i)++)
#define rev(i,n) for(int i=(n)-1;(i)>=0;(i)--)
#define all(a) (a).begin(),(a).end()
#define pb(a) push_back(a)
#define bitcount(b) __builtin_popcount(b)
template<typename T, typename S> vector<T>& operator<<(vector<T>& a, S b) { a.push_back(b); return a; }
template<typename T> void operator>>(vector<T>& a, int b) {while(b--)if(!a.empty())a.pop_back();}
bool isprime(int n){ if(n<2)return false;  for(int i=2;i*i<=n;i++)if(n%i==0)return false;  return true;} 

int MOD = 1e9+7;

string s;
int dp[10100][3][8][2][2];

long long dfs(int x,int mod3,int mod8,int lim,int three){
	if( x == s.size() ) return (mod3 == 0 or three) and mod8 > 0;

	if( dp[x][mod3][mod8][lim][three] != -1 ) return  dp[x][mod3][mod8][lim][three];
	int ans = 0;
	for(int i = 0 ; i <= (lim?9:s[x]-'0') ; i++){
		ans += dfs(x+1,(mod3*10+i)%3,(mod8*10+i)%8,lim||(i<s[x]-'0'),three||(i==3));
		ans %= MOD;
	}

	return dp[x][mod3][mod8][lim][three] = ans % MOD;

}
long long f(string s_){
	memset(dp,-1,sizeof(dp));
	s = s_;
	return dfs(0,0,0,0,0);
}

int is_sol(string s){
	int mod3 = 0;
	int mod8 = 0;
	int three = 0;
	for( auto c : s ) if( c == '3') three = 1;
	
	for( auto c : s ) mod3 = (mod3*10+c-'0')%3;
	for( auto c : s ) mod8 = (mod8*10+c-'0')%8;
	return (three or mod3 == 0) and mod8 > 0;
}

int main(){
	string A,B;
	cin >> A >> B;
	while( A.size() < B.size() ) A = "0" + A;
	while( B.size() < A.size() ) B = "0" + B;
	cout << ((f(B) - f(A) + is_sol(A))%MOD+MOD)%MOD << endl;

}