program horse;
var
a:array[-1..30,-1..100] of longint;
m,n,i,j:integer;
begin
assign(input,'horse.in');
assign(output,'horse.out');
reset(input);
rewrite(output);
read(m,n);
for i:=1 to n do
for j:=1 to m do
a[i,j]:=0;
a[1,1]:=1;
for i:=2 to n do
for j:=1 to m do
a[i,j]:=a[i-1,j-2]+a[i-2,j-1]+a[i-2,j+1]+a[i-1,j+2];
writeln(a[n,m]);
close(input);
close(output);
end.