8.3 ABS — Absolute value

Description:

ABS(A) computes the absolute value of A.

Standard:

Fortran 77 and later, has overloads that are GNU extensions

Class:

Elemental function

Syntax:

RESULT = ABS(A)

Arguments:

A	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
ABS(A)	REAL(4) A	REAL(4)	Fortran 77 and later
CABS(A)	COMPLEX(4) A	REAL(4)	Fortran 77 and later
DABS(A)	REAL(8) A	REAL(8)	Fortran 77 and later
IABS(A)	INTEGER(4) A	INTEGER(4)	Fortran 77 and later
ZABS(A)	COMPLEX(8) A	COMPLEX(8)	GNU extension
CDABS(A)	COMPLEX(8) A	COMPLEX(8)	GNU extension