program TABLE;

{$APPTYPE CONSOLE}

var s,a1,a2,a3:int64;
f:array[1..1000] of int64;
max,j,n,m,i:integer;
begin
assign(input,'TABLE.dat');
reset(input);

assign(output,'TABLE.sol');
rewrite(output);

readln(n,m);
a1:=1;
a2:=1;

f[2]:=1;
if n>m then max:=n else max:=m;
for i:=3 to max do
begin
a3:=a1+a2;
a1:=a2;
a2:=a3;
f[i]:=a3;
writeln(i,' ',a3);
readln;
end;

s:=0;
for i:=2 to n do
begin s:=s+f[i]*f[m];end;


for i:=2 to m do
begin s:=s+f[i]*f[n];end;

writeln(s);
close(input);
close(output);

end.