Mercurial > octave-nkf

comparison src/ov-intx.h @ 4938:703d97b89507

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-08-09 20:21:59 by jwe]
author jwe
date Mon, 09 Aug 2004 20:21:59 +0000
parents c638c144d4da
children 44046bbaa52c
comparison
equal deleted inserted replaced
4937:4cf211c83158 4938:703d97b89507
69 for (int i = 0; i < nel; i++) 69 for (int i = 0; i < nel; i++)
70 retval (i) = double (matrix(i)); 70 retval (i) = double (matrix(i));
71 return retval; 71 return retval;
72 } 72 }
73 73
74 idx_vector index_vector (void) const { return idx_vector (matrix); }
75
74 private: 76 private:
75 77
76 DECLARE_OCTAVE_ALLOCATOR 78 DECLARE_OCTAVE_ALLOCATOR
77 79
78 DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA 80 DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA
117 NDArray retval (dim_vector (1,1)); 119 NDArray retval (dim_vector (1,1));
118 retval (0) = double (scalar); 120 retval (0) = double (scalar);
119 return retval; 121 return retval;
120 } 122 }
121 123
124 idx_vector index_vector (void) const { return idx_vector (scalar); }
125
122 private: 126 private:
123 127
124 DECLARE_OCTAVE_ALLOCATOR 128 DECLARE_OCTAVE_ALLOCATOR
125 129
126 DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA 130 DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA