#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

char*mmap();

#define WTHI(v) {long _z=v,_n=0,_d=0;while(++_n,_d=_d<<8|0x30|_z%10,_z/=10);*(long*)wp=_d;wp+=_n;}
#define WTLO(v) {long _z=v,_n=8,_d=0;while(_d=_d<<8|0x30|_z%10,_z/=10,--_n);*(long*)wp=_d;wp+=8;}
#define WT(v) if(z>=100000000){WTHI(z/100000000);WTLO(z);}else{WTHI(z);}

main(){
	char*rp=mmap(0l,11l*200002,1,2,0,0ll);
	while(*rp++!=10);
	long z=1;
	while(*rp){
		int a=*rp++;
		if(a>51||*rp++>=48){ while(*rp++>=48); goto l_over; }
		if(a==50){ z*=4; if(z>1000000008) goto l_over; }
		if(a==51){ z*=729; if(z>1000000008) goto l_over; }
		if(a==48){ goto l_zero; }
	}
	z=1000000007%z;
	char wbuf[16];
	char*wp=wbuf;
	WT(z);
	write(1,wbuf,wp-wbuf);
	_exit(0);

	l_over:;
	while(*rp){
		int a=*rp++;
		if(a==48){ goto l_zero; }
		while(*rp++>=48);
	}
	write(1,"1000000007",10);
	_exit(0);

	l_zero:;
	write(1,"-1",2);
	_exit(0);


}