Mercurial > octave-nkf

comparison src/xnorm.cc @ 11586:12df7854fa7c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
strip trailing whitespace from source files
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:24:59 -0500
parents fd0a3ac60b0e
children 72c96de7a403
comparison
equal deleted inserted replaced
11585:1473d0cf86d2 11586:12df7854fa7c
57 retval = xnorm (x.float_column_vector_value (), 57 retval = xnorm (x.float_column_vector_value (),
58 p.float_value ()); 58 p.float_value ());
59 else if (iscomplex) 59 else if (iscomplex)
60 retval = xnorm (x.complex_column_vector_value (), 60 retval = xnorm (x.complex_column_vector_value (),
61 p.double_value ()); 61 p.double_value ());
62 else 62 else
63 retval = xnorm (x.column_vector_value (), 63 retval = xnorm (x.column_vector_value (),
64 p.double_value ()); 64 p.double_value ());
65 } 65 }
66 else if (issparse) 66 else if (issparse)
67 { 67 {
68 if (iscomplex) 68 if (iscomplex)
69 retval = xnorm (x.sparse_complex_matrix_value (), 69 retval = xnorm (x.sparse_complex_matrix_value (),
70 p.double_value ()); 70 p.double_value ());
71 else 71 else
72 retval = xnorm (x.sparse_matrix_value (), 72 retval = xnorm (x.sparse_matrix_value (),
73 p.double_value ()); 73 p.double_value ());
74 } 74 }
75 else 75 else
76 { 76 {
81 retval = xnorm (x.float_matrix_value (), 81 retval = xnorm (x.float_matrix_value (),
82 p.float_value ()); 82 p.float_value ());
83 else if (iscomplex) 83 else if (iscomplex)
84 retval = xnorm (x.complex_matrix_value (), 84 retval = xnorm (x.complex_matrix_value (),
85 p.double_value ()); 85 p.double_value ());
86 else 86 else
87 retval = xnorm (x.matrix_value (), 87 retval = xnorm (x.matrix_value (),
88 p.double_value ()); 88 p.double_value ());
89 } 89 }
90 } 90 }
91 else 91 else
107 if (issparse) 107 if (issparse)
108 { 108 {
109 if (iscomplex) 109 if (iscomplex)
110 retval = xcolnorms (x.sparse_complex_matrix_value (), 110 retval = xcolnorms (x.sparse_complex_matrix_value (),
111 p.double_value ()); 111 p.double_value ());
112 else 112 else
113 retval = xcolnorms (x.sparse_matrix_value (), 113 retval = xcolnorms (x.sparse_matrix_value (),
114 p.double_value ()); 114 p.double_value ());
115 } 115 }
116 else 116 else
117 { 117 {
122 retval = xcolnorms (x.float_matrix_value (), 122 retval = xcolnorms (x.float_matrix_value (),
123 p.float_value ()); 123 p.float_value ());
124 else if (iscomplex) 124 else if (iscomplex)
125 retval = xcolnorms (x.complex_matrix_value (), 125 retval = xcolnorms (x.complex_matrix_value (),
126 p.double_value ()); 126 p.double_value ());
127 else 127 else
128 retval = xcolnorms (x.matrix_value (), 128 retval = xcolnorms (x.matrix_value (),
129 p.double_value ()); 129 p.double_value ());
130 } 130 }
131 } 131 }
132 else 132 else
148 if (issparse) 148 if (issparse)
149 { 149 {
150 if (iscomplex) 150 if (iscomplex)
151 retval = xrownorms (x.sparse_complex_matrix_value (), 151 retval = xrownorms (x.sparse_complex_matrix_value (),
152 p.double_value ()); 152 p.double_value ());
153 else 153 else
154 retval = xrownorms (x.sparse_matrix_value (), 154 retval = xrownorms (x.sparse_matrix_value (),
155 p.double_value ()); 155 p.double_value ());
156 } 156 }
157 else 157 else
158 { 158 {
163 retval = xrownorms (x.float_matrix_value (), 163 retval = xrownorms (x.float_matrix_value (),
164 p.float_value ()); 164 p.float_value ());
165 else if (iscomplex) 165 else if (iscomplex)
166 retval = xrownorms (x.complex_matrix_value (), 166 retval = xrownorms (x.complex_matrix_value (),
167 p.double_value ()); 167 p.double_value ());
168 else 168 else
169 retval = xrownorms (x.matrix_value (), 169 retval = xrownorms (x.matrix_value (),
170 p.double_value ()); 170 p.double_value ());
171 } 171 }
172 } 172 }
173 else 173 else
188 { 188 {
189 if (issparse) 189 if (issparse)
190 { 190 {
191 if (iscomplex) 191 if (iscomplex)
192 retval = xfrobnorm (x.sparse_complex_matrix_value ()); 192 retval = xfrobnorm (x.sparse_complex_matrix_value ());
193 else 193 else
194 retval = xfrobnorm (x.sparse_matrix_value ()); 194 retval = xfrobnorm (x.sparse_matrix_value ());
195 } 195 }
196 else 196 else
197 { 197 {
198 if (isfloat & iscomplex) 198 if (isfloat & iscomplex)
199 retval = xfrobnorm (x.float_complex_matrix_value ()); 199 retval = xfrobnorm (x.float_complex_matrix_value ());
200 else if (isfloat) 200 else if (isfloat)
201 retval = xfrobnorm (x.float_matrix_value ()); 201 retval = xfrobnorm (x.float_matrix_value ());
202 else if (iscomplex) 202 else if (iscomplex)
203 retval = xfrobnorm (x.complex_matrix_value ()); 203 retval = xfrobnorm (x.complex_matrix_value ());
204 else 204 else
205 retval = xfrobnorm (x.matrix_value ()); 205 retval = xfrobnorm (x.matrix_value ());
206 } 206 }
207 } 207 }
208 else 208 else
209 gripe_wrong_type_arg ("xfrobnorm", x, true); 209 gripe_wrong_type_arg ("xfrobnorm", x, true);