FIX: Unary Minus and Mixed Complex*16 with Complex*8

MORE INFORMATION

FORTRAN PowerStation version 1.0 can be differentiated from the maintenance release version 1.0a by invoking the linker. Typing link32 | more from \F32\BIN directory will show version 2.8 for FORTRAN PowerStation version 1.0, and it will show version 1.0f for the maintenance release version 1.0a.

When the following sample code is run, the correct result will be displayed first:

Sample Code

C No compiler options required
        COMPLEX CVAR1,RESLT1,RESLT2
        COMPLEX*16 CVAR2
        CVAR1 = CMPLX(100,0)
        CVAR2 = DCMPLX(100,0)
        RESLT1 = 0 - CVAR1 * CVAR2   ! right result (binary -)
        RESLT2 =  - CVAR1 * CVAR2    ! wrong result (unary -)
        WRITE(*,*) RESLT1,RESLT2
        END