1SLASQ6(1)           LAPACK auxiliary routine (version 3.1)           SLASQ6(1)
2
3
4

NAME

6       SLASQ6  -  one  dqd  (shift equal to zero) transform in ping-pong form,
7       with protection against underflow and overflow
8

SYNOPSIS

10       SUBROUTINE SLASQ6( I0, N0, Z, PP, DMIN, DMIN1, DMIN2, DN, DNM1, DNM2 )
11
12           INTEGER        I0, N0, PP
13
14           REAL           DMIN, DMIN1, DMIN2, DN, DNM1, DNM2
15
16           REAL           Z( * )
17

PURPOSE

19       SLASQ6 computes one dqd (shift equal to zero)  transform  in  ping-pong
20       form, with protection against underflow and overflow.
21
22

ARGUMENTS

24       I0    (input) INTEGER
25             First index.
26
27       N0    (input) INTEGER
28             Last index.
29
30       Z     (input) REAL array, dimension ( 4*N )
31             Z holds the qd array. EMIN is stored in Z(4*N0) to avoid an extra
32             argument.
33
34       PP    (input) INTEGER
35             PP=0 for ping, PP=1 for pong.
36
37       DMIN  (output) REAL
38             Minimum value of d.
39
40             DMIN1 (output) REAL Minimum value of d, excluding D( N0 ).
41
42             DMIN2 (output) REAL Minimum value of d, excluding D( N0 ) and  D(
43             N0-1 ).
44
45       DN    (output) REAL
46             d(N0), the last value of d.
47
48       DNM1  (output) REAL
49             d(N0-1).
50
51       DNM2  (output) REAL
52             d(N0-2).
53
54
55
56 LAPACK auxiliary routine (versionNo3v.e1m)ber 2006                       SLASQ6(1)