var f,g:text;
    ok:boolean;
    i,j,k,l,m,n,p:byte;
    s:longint;
    v:array[1..6] of longint;


begin
assign(f,'loto.in');
reset(f);
assign(g,'loto.out');
rewrite(g);
readln(f,n,s);
for i:=1 to n do read(f,v[i]);
ok:=false;

for i:=1 to n do
    for j:=1 to n do
        for k:=1 to n do
            for l:=1 to n do
                for m:=1 to n do
                    for p:=1 to n do

                        if v[i]+v[j]+v[k]+v[l]+v[m]+v[p]=s then begin
                                                           write(g,v[i],' ',v[j],' ',v[k],' ',v[l],' ',v[m],' ',v[p]);
                                                                i:=n;
                                                                j:=n;
                                                                k:=n;
                                                                l:=n;
                                                                m:=n;
                                                                p:=n;
                                                                ok:=true;
                                                                end;
if ok=false then writeln(g,-1);
close(f);
close(g);
end.