Complex Data

This data type has the same precision as default REAL.

• COMPLEX object declaration:

      COMPLEX :: z, j, za(1:100)

• symbolic constants are expressed in the same way:

      COMPLEX, PARAMETER :: i = (0.0,1.0)

• complex constants are represented as co-ordinate pairs: (1.0,1.0) or (3.141,1.0E-9).
• complex values can be constructed using the CMPLX function,

      z = CMPLX(x,y)

• complex expressions can be used in the same way as other types

     REAL :: x; COMPLEX :: a, b, c, 
      ...
     a = x*((b+c)*CMPLX(0.1,-0.1))
     b = 1

  The real value x will be promoted to the complex value CMPLX(x,0). b will be set to CMPLX(1.0,0).

For more information, click here