program loto;
uses crt;
var i,n,j,m,p,r,o:byte;
    v:array[1..100]of longint;
    h,g:text;
    f:boolean;
    sp,s:longint;
begin
     assign(g,'loto.in');
     reset(g);
     assign(h,'loto.out');
     rewrite(h);
     readln(g,n,sp);
     f:=false;
     for i:=1 to n do
         read(g,v[i]);
    for i:=1 to n do
      if not f then
        for j:=1 to n do
           if not f then
            for m:=1 to n do
              if not f then
                for p:=1 to n do
                  if not f then
                    for r:=1 to n do
                      if not f then
                        for o:=1 to n do
                          if not f then
                            if  v[i]+v[j]+v[m]+v[p]+v[r]+v[o]=sp then
                                begin
                                        writeln(h,v[i],' ',v[j],' ',v[m],' ',v[p],' ',v[r],' ',v[o]);
                                        f:=true;
                                end;
    if not f then
       write(h,-1);
    close(g);
    close(h);
end.