var N,s,s1:longint;
    nr:array[1..100] of longint;
    i1,i2,i3,i4,i5,i6: longint;
begin
  assign(input,'loto.in'); reset(input);
  assign(output,'loto.out'); rewrite(output);
  readln(n,s);
  for i1:=1 to N do read(nr[i1]); readln;
  for i1:=1 to N do
  for i2:=i1 to N do
  for i3:=i2 to N do
  for i4:=i3 to N do
  for i5:=i4 to N do
  for i6:=i5 to N do begin
    s1:=nr[i1]+nr[i2]+nr[i3]+nr[i4]+nr[i5]+nr[i6];
    if s1=s then begin
      writeln(nr[i1],' ',nr[i2],' ',nr[i3],' ',nr[i4],' ',nr[i5],' ',nr[i6]);
      close(input); close(output);
      exit;
    end;
    if s1>s then break;
  end;
  writeln(-1);
  close(input); close(output);
end.