Question: Convert 1 + 0.I to 1

What is the proper method for converting an extended numeric with a zero imaginary component to a real? It should leave the complex part alone if it is not zero. That is, somefunc(1.0 + 0.*I); 1.0 somefunc(1.0 + 1.*I); 1.0 + 1.*I I can write my own procedure, but there must be standard way (somefunc) to do this. Searching the help browser didn't help. Thanks.
Please Wait...