_==0 "exec" "gawk" "-f" "$0"
function f(a,k) { return (k in a)?a[k]:0 }
NR==2{ for(i=1;i<=NF;i++)a[$i]+=1 }
NR==3{ r=f(a,$1);for(i=2;i<=NF;i++)r=r" "f(a,$i);print r }