program loto;

var f : text;
    n,i,a,b,c,d,e,g : byte;
    s,aux : longint;
    v : array[0..101] of longint;
begin
    assign(f,'loto.in'); reset(f);
    readln(f,n,s);
    for i := 1 to n do
        read(f,v[i]);
    close(f);

    v[n+1] := 600000002;

    assign(f,'loto.out'); rewrite(f);

    for a := 1 to n do
        if (v[a]*6 <= s) and (v[a+1]*6 > s) then aux := v[a];

        for b := 1 to n do
            for c := 1 to n do
                for d := 1 to n do
                    for e := 1 to n do
                        for g := 1 to n do
                            if aux+v[b]+v[c]+v[d]+v[e]+v[g] = s then begin
                                write(f,aux,' ',v[b],' ',v[c],' ',v[d],' ',v[e],' ',v[g]);
                                close(f);
                                exit;
                                end;
    write(f,-1);
    close(f);

end.