Take imaginary part of imat_result data values.
r1=imag(r)
This function replaces all data values of r with their imaginary parts.
imat_result/real, imat_result/conj