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 ();