Take real part of shape coefficients.
s1=real(s)
This function replaces all shape coefficients of s with their real parts.