Intel® Fortran Compiler 18.0 Developer Guide and Reference
Portability Functions: Return a BIT-WISE complement or logical .NOT. of the argument.
USE IFPORT
result = COMPLINT (intval)
result = COMPREAL (realval)
result = COMPLLOG (logval)
intval |
(Input) INTEGER(4). |
realval |
(Input) REAL(4). |
logval |
(Input) LOGICAL(4). |
The result is INTEGER(4) for COMPLINT, REAL(4) for COMPLREAL and LOGICAL(4) for COMPLLOG with a value that is the bitwise complement of the argument.