At Mark 22: | m was made optional |
On entry, | or . |
On entry, | . |
On entry, | . |
On entry, | . |
On entry, | . |
On entry, | , |
or | . |
Open in the MATLAB editor: f01zd_example
function f01zd_example fprintf('f01zd example results\n\n'); job = 'Pack'; kl = int64(1); ku = int64(1); a = [ 1.1 - 1.1i, 1.2 - 1.2i, 0 + 0i, 0 + 0i, 0 + 0i; 2.1 - 2.1i, 2.2 - 2.2i, 2.3 - 2.3i, 0 + 0i, 0 + 0i; 0 + 0i, 3.2 - 3.2i, 3.3 - 3.3i, 3.4 - 3.4i, 0 + 0i; 0 + 0i, 0 + 0i, 4.3 - 4.3i, 4.4 - 4.4i, 4.5 - 4.5i; 0 + 0i, 0 + 0i, 0 + 0i, 5.4 - 5.4i, 5.5 - 5.5i]; n = size(a,1); b = complex(zeros(kl+ku+1,n)); [A, ab, ifail] = f01zd(job, kl, ku, a, b); matrix = 'General'; diag = ' '; title1 = 'Unpacked Matrix A:'; [ifail] = x04da(matrix, diag, A, title1); fprintf('\n'); title1 = 'Packed Matrix AB:'; [ifail] = x04da(matrix, diag, ab, title1);
f01zd example results Unpacked Matrix A: 1 2 3 4 5 1 1.1000 1.2000 0.0000 0.0000 0.0000 -1.1000 -1.2000 0.0000 0.0000 0.0000 2 2.1000 2.2000 2.3000 0.0000 0.0000 -2.1000 -2.2000 -2.3000 0.0000 0.0000 3 0.0000 3.2000 3.3000 3.4000 0.0000 0.0000 -3.2000 -3.3000 -3.4000 0.0000 4 0.0000 0.0000 4.3000 4.4000 4.5000 0.0000 0.0000 -4.3000 -4.4000 -4.5000 5 0.0000 0.0000 0.0000 5.4000 5.5000 0.0000 0.0000 0.0000 -5.4000 -5.5000 Packed Matrix AB: 1 2 3 4 5 1 0.0000 1.2000 2.3000 3.4000 4.5000 0.0000 -1.2000 -2.3000 -3.4000 -4.5000 2 1.1000 2.2000 3.3000 4.4000 5.5000 -1.1000 -2.2000 -3.3000 -4.4000 -5.5000 3 2.1000 3.2000 4.3000 5.4000 0.0000 -2.1000 -3.2000 -4.3000 -5.4000 0.0000