var a, b, c : array [1..100] of integer;
    n, m, i, j, ind : integer;
begin
    ind := 1;

    read(n);
    for i := 1 to n do
        read(a[i]);

    read(m);
    for i := 1 to m do
        read(b[i]);

    for j := 1 to n do
    begin
        for i := 1 to m do
        begin
            if a[j] = b[i] then
            begin
                c[ind] := a[j];
                ind := ind + 1;
            end;
        end;
    end;

    for i := 1 to ind - 1 do
        write(c[i], ' ');
end.