Go to the source code of this file.
double precision function dcabs1 |
( |
complex*16 |
Z | ) |
|
DCABS1
- Purpose:
DCABS1 computes absolute value of a double complex number
- Author
- Univ. of Tennessee
-
Univ. of California Berkeley
-
Univ. of Colorado Denver
-
NAG Ltd.
- Date
- November 2011
Definition at line 41 of file dcabs1.f.
54 INTRINSIC abs,dble,dimag
56 dcabs1 = abs(dble(z)) + abs(dimag(z))
double precision function dcabs1(Z)
DCABS1