#9772: da an


lsyyw2002 (袁祎炜)


var
a,b:longint;
begin
while not eof do begin
readln(a,b);
writeln(a*2+b*2);
end;
end.