program task2;

{$APPTYPE CONSOLE}

  var n,s,i,j,k,l:integer;
  x,a:array[1..4] of integer;
  const f:string='task2';
var  r:boolean;

 function next:boolean;
 var k,j,temp:integer;
 	found:boolean;
 	begin
 i:=n;
 found:=false;
 while (not found)and(i>1)do
 begin
 found:=x[i-1]<x[i];
 if(not found)then i:=i-1 else k:=i-1;
 end;

 if found then begin
               i:=n;
                while x[i]<=x[k] do i:=i-1;
                 temp:=x[i];
                 x[i]:=x[k];
                 x[k]:=temp;

  i:=k+1;
  j:=n;
  while i<j do
  	begin
  temp:=x[j];
  x[j]:=x[i];
  x[i]:=temp;
  i:=i+1;
  j:=j-1;
  	end;
  end;
  next:=found;
  end;

  begin
assign(input,f+'.in');
reset(input);
assign(output,f+'.out');
rewrite(output);
r:=false;
readln(a[1],a[2],a[3],a[4]);
n:=4;
for i:=1 to n do x[i]:=i;
i:=x[1];
j:=x[2];
k:=x[3];
l:=x[4];
if a[l]=(a[i]+a[j]+a[k])then r:=true;
if a[l]=(a[i]+a[j]-a[k])then r:=true;
if a[l]=(a[i]+a[j]*a[k])then r:=true;
if a[l]=(a[i]*a[j]+a[k])then r:=true;
if a[l]=(a[i]*a[j]-a[k])then r:=true;
if a[l]=(a[i]*a[j]*a[k])then r:=true;
if a[l]=(a[i]-a[j]+a[k])then r:=true;
if a[l]=(a[i]-a[j]-a[k])then r:=true;
if a[l]=(a[i]-a[j]*a[k])then r:=true;


  while next do begin
i:=x[1];
j:=x[2];
k:=x[3];
l:=x[4];
if a[l]=(a[i]+a[j]+a[k])then r:=true;
if a[l]=(a[i]+a[j]-a[k])then r:=true;
if a[l]=(a[i]+a[j]*a[k])then r:=true;
if a[l]=(a[i]*a[j]+a[k])then r:=true;
if a[l]=(a[i]*a[j]-a[k])then r:=true;
if a[l]=(a[i]*a[j]*a[k])then r:=true;
if a[l]=(a[i]-a[j]+a[k])then r:=true;
if a[l]=(a[i]-a[j]-a[k])then r:=true;
if a[l]=(a[i]-a[j]*a[k])then r:=true;
end;
if r then writeln('YES') else writeln('NO');
close(input);
close(output);






end.