logical function is_Complex(z)
complex z

is_Complex =imag(z) /=0.

end
