ABS(3F)ABS(3F)NAME
abs, iabs, dabs, qabs, cabs, zabs, cqabs, iiabs, jiabs - FORTRAN absolute
value
SYNOPSIS
integer i1, i2
real r1, r2
double precision dp1, dp2
real*16 qp1, qp2
complex cx1, cx2
double complex dx1, dx2
complex*32 qx1, qx2
integer*2 ii1, ii2
integer*4 ji1, ji2
r2 = abs(r1)
i2 = iabs(i1)
i2 = abs(i1)
dp2 = dabs(dp1)
dp2 = abs(dp1)
qp2 = qabs(qp1)
qp2 = abs(qp1)
cx2 = cabs(cx1)
cx2 = abs(cx1)
dx2 = zabs(dx1)
dx2 = abs(dx1)
qx2 = cqabs(qx1)
qx2 = abs(qx1)
ii2 = iiabs(ii1)
ii2 = abs(ii1)
ji2 = jiabs(ji1)
ji2 = abs(ji1)DESCRIPTIONabs is the family of absolute value functions. iabs returns the integer
absolute value of its integer argument. It accepts either integer*2 or
integer*4 arguments and the result is the same type. dabs returns the
double-precision absolute value of its double-precision argument. qabs
returns the real*16 absolute value of its real*16 argument. cabs returns
the complex absolute value of its complex argument. zabs returns the
double-complex absolute value of its double-complex argument. cqabs
returns the complex*32 absolute value of its complex*32 argument. iiabs
returns the integer*2 absolute value of its integer*2 argument. jiabs
returns the integer*4 absolute value of its integer*4 argument. The
Page 1
ABS(3F)ABS(3F)
generic form abs returns the type of its argument.
SEE ALSOfloor(3M).
CAVEAT
In two's-complement integer (integer*2 or integer*4) representation the
absolute value of the negative integer with largest magnitude is
undefined. Some implementations trap this error, but others simply
ignore it.
Page 2