SCABS1
- Purpose:
SCABS1 computes |Re(.)| + |Im(.)| of a complex number
- Author
- Univ. of Tennessee
-
Univ. of California Berkeley
-
Univ. of Colorado Denver
-
NAG Ltd.
- Date
- November 2015
Definition at line 40 of file scabs1.f.
53 INTRINSIC abs,aimag,real
55 scabs1 = abs(
REAL(z)) + abs(aimag(z))
real function scabs1(Z)
SCABS1