LAPACK 3.11.0
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches

◆ dcabs1()

double precision function dcabs1 ( complex*16  Z)

DCABS1

Purpose:
 DCABS1 computes |Re(.)| + |Im(.)| of a double complex number
Parameters
[in]Z
          Z is COMPLEX*16
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.

Definition at line 46 of file dcabs1.f.

47*
48* -- Reference BLAS level1 routine --
49* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
50* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
51*
52* .. Scalar Arguments ..
53 COMPLEX*16 Z
54* ..
55* ..
56* =====================================================================
57*
58* .. Intrinsic Functions ..
59 INTRINSIC abs,dble,dimag
60*
61 dcabs1 = abs(dble(z)) + abs(dimag(z))
62 RETURN
63*
64* End of DCABS1
65*
double precision function dcabs1(Z)
DCABS1
Definition: dcabs1.f:47
Here is the call graph for this function:
Here is the caller graph for this function: