var a,b,c,d,e,a1,b1,c1,d1:integer;
begin
read(a,b,c,d);
a1:=a;
b1:=b;
c1:=c;
d1:=d;
if a1>b1 then begin
e:=a1;
a1:=b1;
b1:=e;
end;
if a1>c1 then begin
e:=a1;
a1:=c1;
c1:=e;
end;
if b1>c1 then begin
e:=b1;
b1:=c1;
c1:=e;
end;
if (d1>a1) and (d1>b1) then begin d:=d1; c:=c1; b:=b1; a:=a1; end;
if (d1>c1) and (d1<b1) then begin d:=c1; c:=b1; b:=d1; a:=a1; end;
if (d1<a1) and (d1>b1) then begin d:=c1; c:=d1; b:=b1; a:=a1; end;
if (d1<c1) and (d1<b1) then begin d:=c1; c:=b1; b:=a1; a:=d1; end;
write(a,' ',b,' ',c,' ',d);
end.