Section 11,27: DIMAG

 DIMAG (imaginary)

 A function that returns the imaginary part of a complex number.
 The argument must be a COMPLEX*16 data type.  The result is a
 REAL*8 data type.