6.3 ABS — Absolute value

Description:

ABS(X) computes the absolute value of X.

Standard:

F77 and later, has overloads that are GNU extensions

Class:

Elemental function

Syntax:

RESULT = ABS(X)

Arguments:

X	The type of the argument shall be an INTEGER(*), REAL(*), or COMPLEX(*).

Return value:

The return value is of the same type and kind as the argument except the return value is REAL(*) for a COMPLEX(*) argument.

Example:

          program test_abs
            integer :: i = -1
            real :: x = -1.e0
            complex :: z = (-1.e0,0.e0)
            i = abs(i)
            x = abs(x)
            x = abs(z)
          end program test_abs
     

Specific names:

Name	Argument	Return type	Standard
CABS(Z)	COMPLEX(4) Z	REAL(4)	F77 and later
DABS(X)	REAL(8) X	REAL(8)	F77 and later
IABS(I)	INTEGER(4) I	INTEGER(4)	F77 and later
ZABS(Z)	COMPLEX(8) Z	COMPLEX(8)	GNU extension
CDABS(Z)	COMPLEX(8) Z	COMPLEX(8)	GNU extension