1DLASQ6(1)LAPACK routine (version 3.2) DLASQ6(1)
2
3
4
6 DLASQ6 - computes one dqd (shift equal to zero) transform in ping-pong
7 form, with protection against underflow and overflow
8
10 SUBROUTINE DLASQ6( I0, N0, Z, PP, DMIN, DMIN1, DMIN2, DN, DNM1, DNM2 )
11
12 INTEGER I0, N0, PP
13
14 DOUBLE PRECISION DMIN, DMIN1, DMIN2, DN, DNM1, DNM2
15
16 DOUBLE PRECISION Z( * )
17
19 DLASQ6 computes one dqd (shift equal to zero) transform in ping-pong
20 form, with protection against underflow and overflow.
21
23 I0 (input) INTEGER
24 First index.
25
26 N0 (input) INTEGER
27 Last index.
28
29 Z (input) DOUBLE PRECISION array, dimension ( 4*N )
30 Z holds the qd array. EMIN is stored in Z(4*N0) to avoid an extra
31 argument.
32
33 PP (input) INTEGER
34 PP=0 for ping, PP=1 for pong.
35
36 DMIN (output) DOUBLE PRECISION
37 Minimum value of d. DMIN1 (output) DOUBLE PRECISION Minimum
38 value of d, excluding D( N0 ). DMIN2 (output) DOUBLE PRECISION
39 Minimum value of d, excluding D( N0 ) and D( N0-1 ).
40
41 DN (output) DOUBLE PRECISION
42 d(N0), the last value of d.
43
44 DNM1 (output) DOUBLE PRECISION
45 d(N0-1).
46
47 DNM2 (output) DOUBLE PRECISION
48 d(N0-2).
49
50
51
52 LAPACK routine (version 3.2) November 2008 DLASQ6(1)