Mercurial > octave-nkf

comparison liboctave/sparse-base-lu.h @ 5322:22994a5730f9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-04-29 13:04:24 by dbateman]
author dbateman
date Fri, 29 Apr 2005 13:04:25 +0000
parents 4c8a2e4e0717
children 93c65f2a5668
comparison
equal deleted inserted replaced
5321:84b72a402b86 5322:22994a5730f9
58 58
59 p_type Pc (void) const; 59 p_type Pc (void) const;
60 60
61 p_type Pr (void) const; 61 p_type Pr (void) const;
62 62
63 MArray<int> row_perm (void) const { return P; } 63 const octave_idx_type * row_perm (void) const { return P.fortran_vec (); }
64 64
65 MArray<int> col_perm (void) const { return Q; } 65 const octave_idx_type * col_perm (void) const { return Q.fortran_vec (); }
66 66
67 double rcond (void) const { return cond; } 67 double rcond (void) const { return cond; }
68 68
69 protected: 69 protected:
70 70
71 lu_type Lfact; 71 lu_type Lfact;
72 lu_type Ufact; 72 lu_type Ufact;
73 73
74 double cond; 74 double cond;
75 75
76 MArray<int> P; 76 MArray<octave_idx_type> P;
77 MArray<int> Q; 77 MArray<octave_idx_type> Q;
78 }; 78 };
79 79
80 #endif 80 #endif
81 81
82 /* 82 /*