function C = abstar(A,B)
%
%  function C = abstar(A,B)
%
%  C = A*B_* , A,B polynomials.
C = conv(A,conj(B(length(B):-1:1)));