ABS — Absolute value#

ABS(A)#

ABS(A) computes the absolute value of A.

Parameters: A – The type of the argument shall be an INTEGER, REAL, or COMPLEX.
Returns: The return value is of the same type and kind as the argument except the return value is REAL for a COMPLEX argument.

Standard:

Fortran 77 and later, has overloads that are GNU extensions

Class:

Elemental function

Syntax:

RESULT = ABS(A)

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
`BABS(A)`	`INTEGER(1) A`	`INTEGER(1)`	GNU extension
`IIABS(A)`	`INTEGER(2) A`	`INTEGER(2)`	GNU extension
`JIABS(A)`	`INTEGER(4) A`	`INTEGER(4)`	GNU extension
`KIABS(A)`	`INTEGER(8) A`	`INTEGER(8)`	GNU extension
`ZABS(A)`	`COMPLEX(8) A`	`REAL(8)`	GNU extension
`CDABS(A)`	`COMPLEX(8) A`	`REAL(8)`	GNU extension