1SLASD0(1) LAPACK auxiliary routine (version 3.1) SLASD0(1)
2
3
4
6 SLASD0 - divide and conquer approach, SLASD0 computes the singular
7 value decomposition (SVD) of a real upper bidiagonal N-by-M matrix B
8 with diagonal D and offdiagonal E, where M = N + SQRE
9
11 SUBROUTINE SLASD0( N, SQRE, D, E, U, LDU, VT, LDVT, SMLSIZ, IWORK,
12 WORK, INFO )
13
14 INTEGER INFO, LDU, LDVT, N, SMLSIZ, SQRE
15
16 INTEGER IWORK( * )
17
18 REAL D( * ), E( * ), U( LDU, * ), VT( LDVT, * ), WORK( *
19 )
20
22 Using a divide and conquer approach, SLASD0 computes the singular value
23 decomposition (SVD) of a real upper bidiagonal N-by-M matrix B with
24 diagonal D and offdiagonal E, where M = N + SQRE. The algorithm com‐
25 putes orthogonal matrices U and VT such that B = U * S * VT. The singu‐
26 lar values S are overwritten on D.
27
28 A related subroutine, SLASDA, computes only the singular values, and
29 optionally, the singular vectors in compact form.
30
31
33 N (input) INTEGER
34 On entry, the row dimension of the upper bidiagonal matrix.
35 This is also the dimension of the main diagonal array D.
36
37 SQRE (input) INTEGER
38 Specifies the column dimension of the bidiagonal matrix. = 0:
39 The bidiagonal matrix has column dimension M = N;
40 = 1: The bidiagonal matrix has column dimension M = N+1;
41
42 D (input/output) REAL array, dimension (N)
43 On entry D contains the main diagonal of the bidiagonal matrix.
44 On exit D, if INFO = 0, contains its singular values.
45
46 E (input) REAL array, dimension (M-1)
47 Contains the subdiagonal entries of the bidiagonal matrix. On
48 exit, E has been destroyed.
49
50 U (output) REAL array, dimension at least (LDQ, N)
51 On exit, U contains the left singular vectors.
52
53 LDU (input) INTEGER
54 On entry, leading dimension of U.
55
56 VT (output) REAL array, dimension at least (LDVT, M)
57 On exit, VT' contains the right singular vectors.
58
59 LDVT (input) INTEGER
60 On entry, leading dimension of VT.
61
62 SMLSIZ (input) INTEGER On entry, maximum size of the subproblems
63 at the bottom of the computation tree.
64
65 IWORK (workspace) INTEGER array, dimension (8*N)
66
67 WORK (workspace) REAL array, dimension (3*M**2+2*M)
68
69 INFO (output) INTEGER
70 = 0: successful exit.
71 < 0: if INFO = -i, the i-th argument had an illegal value.
72 > 0: if INFO = 1, an singular value did not converge
73
75 Based on contributions by
76 Ming Gu and Huan Ren, Computer Science Division, University of
77 California at Berkeley, USA
78
79
80
81
82 LAPACK auxiliary routine (versionNo3v.e1m)ber 2006 SLASD0(1)