Mercurial > hg > octave-lyh
comparison liboctave/dbleSVD.cc @ 1931:c91f81d5f72c
[project @ 1996-02-11 23:02:16 by jwe]
author | jwe |
---|---|
date | Sun, 11 Feb 1996 23:02:16 +0000 |
parents | d20ab06301e8 |
children | 1b57120c997b |
comparison
equal
deleted
inserted
replaced
1930:d20ab06301e8 | 1931:c91f81d5f72c |
---|---|
109 } | 109 } |
110 | 110 |
111 type_computed = svd_type; | 111 type_computed = svd_type; |
112 | 112 |
113 if (jobu != 'N') | 113 if (jobu != 'N') |
114 left_sm.resize (n, ncol_u); | 114 left_sm.resize (m, ncol_u); |
115 | 115 |
116 double *u = left_sm.fortran_vec (); | 116 double *u = left_sm.fortran_vec (); |
117 | 117 |
118 sigma.resize (nrow_s, ncol_s); | 118 sigma.resize (nrow_s, ncol_s); |
119 double *s_vec = sigma.fortran_vec (); | 119 double *s_vec = sigma.fortran_vec (); |