05 October 2018 08:39:24 PM CLAPACK_TEST C version Test the CLAPACK library. DGBTRF_TEST Demonstrate the use of DGBTRF to factor a banded matrix and DGBTRS to solve an associated linear system using double precision real arithmetic. Coefficient matrix: 2 -1 0 0 -1 2 -1 0 0 -1 2 -1 0 0 -1 2 Right hand side: 0 0 0 5 Computed solution: 1 2 3 4 DGESV_TEST Demonstrate the use of DGESV to solve a linear system using double precision real arithmetic. Coefficient matrix A: Col: 0 1 2 3 Row 0: 1.000000 -1.000000 2.000000 -1.000000 1: 2.000000 -2.000000 3.000000 -3.000000 2: 1.000000 1.000000 1.000000 0.000000 3: 1.000000 -1.000000 4.000000 3.000000 Right hand side B: 0: -8.000000 1: -20.000000 2: -2.000000 3: 4.000000 Return value of error flag INFO = 0 Computed solution X: 0: -7.000000 1: 3.000000 2: 2.000000 3: 2.000000 DGESVD_TEST Demonstrate the use of DGESVD to compute the singular value decomposition A = U * S * V', using double precision real arithmetic. Coefficient matrix A: Col: 0 1 2 3 Row 0: 16.000000 2.000000 3.000000 13.000000 1: 5.000000 11.000000 10.000000 8.000000 2: 9.000000 7.000000 6.000000 12.000000 3: 4.000000 14.000000 15.000000 1.000000 Error flag INFO = 0 Singular values: 0: 34.000000 1: 17.888544 2: 4.472136 3: 0.000000 DGETRF_TEST Demonstrate the use of: DGETRF to factor a general matrix A, DGETRS to solve A*x=b after A has been factored, using double precision real arithmetic. Coefficient matrix A: Col: 0 1 2 3 Row 0: 1.000000 -1.000000 2.000000 -1.000000 1: 2.000000 -2.000000 3.000000 -3.000000 2: 1.000000 1.000000 1.000000 0.000000 3: 1.000000 -1.000000 4.000000 3.000000 Return value of DGETRF error flag INFO = 0 Right hand side B: 0: -8.000000 1: -20.000000 2: -2.000000 3: 4.000000 Return value of DGETRS error flag INFO = 0 Computed solution X: 0: -7.000000 1: 3.000000 2: 2.000000 3: 2.000000 DGETRI_TEST For a double precision real matrix (D) in general storage mode (GE): DGETRF factors a general matrix; DGETRI computes the inverse. The matrix A: Col: 0 1 2 Row 0: 1.000000 2.000000 3.000000 1: 4.000000 5.000000 6.000000 2: 7.000000 8.000000 0.000000 The inverse matrix: Col: 0 1 2 Row 0: -1.777778 0.888889 -0.111111 1: 1.555556 -0.777778 0.222222 2: -0.111111 0.222222 -0.111111 DNRM2_TEST DNRM2 computes the Euclidean norm. For a double precision real vector (D) The vector X: 0: 1.000000 1: 2.000000 2: 3.000000 VALUE = 3.741657 DSYEV_TEST For a double precision real matrix (D) in symmetric storage mode (SY): For a symmetric matrix in general storage, DSYEV computes eigenvalues and eigenvectors; The matrix A: Col: 0 1 2 3 4 Row 0: 0.000000 2.449490 0.000000 0.000000 0.000000 1: 2.449490 0.000000 3.162278 0.000000 0.000000 2: 0.000000 3.162278 0.000000 3.464102 0.000000 3: 0.000000 0.000000 3.464102 0.000000 3.464102 4: 0.000000 0.000000 0.000000 3.464102 0.000000 5: 0.000000 0.000000 0.000000 0.000000 3.162278 6: 0.000000 0.000000 0.000000 0.000000 0.000000 Col: 5 6 Row 0: 0.000000 0.000000 1: 0.000000 0.000000 2: 0.000000 0.000000 3: 0.000000 0.000000 4: 3.162278 0.000000 5: 0.000000 2.449490 6: 2.449490 0.000000 The eigenvalues: 0: -6.000000 1: -4.000000 2: -2.000000 3: -0.000000 4: 2.000000 5: 4.000000 6: 6.000000 The eigenvector matrix: Col: 0 1 2 3 4 Row 0: -0.125000 0.306186 0.484123 -0.559017 -0.484123 1: 0.306186 -0.500000 -0.395285 -0.000000 -0.395285 2: -0.484123 0.395285 -0.125000 0.433013 0.125000 3: 0.559017 0.000000 0.433013 -0.000000 0.433013 4: -0.484123 -0.395285 -0.125000 -0.433013 0.125000 5: 0.306186 0.500000 -0.395285 0.000000 -0.395285 6: -0.125000 -0.306186 0.484123 0.559017 -0.484123 Col: 5 6 Row 0: -0.306186 0.125000 1: -0.500000 0.306186 2: -0.395285 0.484123 3: 0.000000 0.559017 4: 0.395285 0.484123 5: 0.500000 0.306186 6: 0.306186 0.125000 ZGESV_TEST Demonstrate the use of ZGESV to solve a linear system using double precision complex arithmetic. Coefficient matrix A: -0.707107 + 0.587785i -0.707107 + 0.951057i -0.000000 + 0.587785i -0.000000 + 0.951057i Right hand side B: 1.000000 + 1.000000i 2.000000 + 3.000000i Return value of error flag INFO = 0 Computed solution X: -4.555832 + 12.910446i 5.970046 + -10.082019i CLAPACK_TEST: Normal end of execution. 05 October 2018 08:39:24 PM