Mercurial > octave
diff src/DLD-FUNCTIONS/kron.cc @ 5275:23b37da9fd5b
[project @ 2005-04-08 16:07:35 by jwe]
author | jwe |
---|---|
date | Fri, 08 Apr 2005 16:07:37 +0000 |
parents | 6b96ce9f5743 |
children | 4c8a2e4e0717 |
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/kron.cc Thu Apr 07 21:51:37 2005 +0000 +++ b/src/DLD-FUNCTIONS/kron.cc Fri Apr 08 16:07:37 2005 +0000 @@ -48,14 +48,14 @@ { C.resize (A.rows () * B.rows (), A.columns () * B.columns ()); - int Ac, Ar, Cc, Cr; + octave_idx_type Ac, Ar, Cc, Cr; for (Ac = Cc = 0; Ac < A.columns (); Ac++, Cc += B.columns ()) for (Ar = Cr = 0; Ar < A.rows (); Ar++, Cr += B.rows ()) { const T v = A (Ar, Ac); - for (int Bc = 0; Bc < B.columns (); Bc++) - for (int Br = 0; Br < B.rows (); Br++) + for (octave_idx_type Bc = 0; Bc < B.columns (); Bc++) + for (octave_idx_type Br = 0; Br < B.rows (); Br++) { OCTAVE_QUIT; C.xelem (Cr+Br, Cc+Bc) = v * B.elem (Br, Bc);