{
TASK:rtri
LANG:PASCAL
}

var
  n,m: Integer;
  i,j: Integer;


begin
  readln(n,m);
  n:= n+1; m:= m+1;

  writeln((n*m)*2 + (n-2)*(m-1) +(m-2)*(n-1)) ;
end.