25 #if defined (HAVE_CONFIG_H)
45 if (len != a.
numel ())
61 if (r < 0 || r + a_len >
numel ())
62 (*current_liboctave_error_handler) (
"range error for insert");
96 if (r1 < 0 || r2 < 0 || r1 >= len || r2 >= len)
97 (*current_liboctave_error_handler) (
"range error for fill");
119 retval.insert (a, nr_insert);
132 return do_mx_unary_map<float, float, std::abs> (*this);
200 F77_XFCN (sgemv, SGEMV, (F77_CONST_CHAR_ARG2 (
"N", 1),
201 nr, nc, 1.0
f, m.
data (), nr,
202 a.
data (), 1, 0.0f,
y, 1
203 F77_CHAR_ARG_LEN (1)));
225 if (nr == 0 || nc == 0)
235 retval.
elem (
i) = 0.0;
250 float res =
elem (0);
266 float res =
elem (0);
280 os << a.
elem (
i) <<
"\n";
T elem(octave_idx_type r, octave_idx_type c) const
FloatColumnVector operator*(const FloatMatrix &m, const FloatColumnVector &a)
FloatColumnVector & fill(float val)
octave_idx_type numel(void) const
Number of elements in the array.
identity matrix If supplied two scalar respectively For allows like xample val
F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T F77_REAL F77_REAL &F77_RET_T F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE const F77_DBLE * f
void mx_inline_real(size_t n, T *r, const std::complex< T > *x)
void resize(octave_idx_type n, const float &rfv=0)
void clear(octave_idx_type n)
octave_idx_type rows(void) const
MArray< T > transpose(void) const
FloatColumnVector abs(void) const
bool operator==(const FloatColumnVector &a) const
T & elem(octave_idx_type n)
FloatColumnVector stack(const FloatColumnVector &a) const
#define F77_XFCN(f, F, args)
bool operator!=(const FloatColumnVector &a) const
octave_idx_type rows(void) const
void mx_inline_imag(size_t n, T *r, const std::complex< T > *x)
calling an anonymous function involves an overhead quite comparable to the overhead of an m file function Passing a handle to a built in function is because the interpreter is not involved in the internal loop For a
nd deftypefn *octave_map m
FloatColumnVector extract(octave_idx_type r1, octave_idx_type r2) const
const float * data(void) const
std::ostream & operator<<(std::ostream &os, const FloatColumnVector &a)
void err_nonconformant(const char *op, octave_idx_type op1_len, octave_idx_type op2_len)
FloatColumnVector & insert(const FloatColumnVector &a, octave_idx_type r)
FloatRowVector transpose(void) const
With real return the complex result
FloatColumnVector imag(const FloatComplexColumnVector &a)
float & xelem(octave_idx_type n)
octave_idx_type cols(void) const
=val(i)}if ode{val(i)}occurs in table i
FloatColumnVector real(const FloatComplexColumnVector &a)
the element is set to zero In other the statement xample y
std::istream & operator>>(std::istream &is, FloatColumnVector &a)
const T * fortran_vec(void) const
bool mx_inline_equal(size_t n, const T1 *x, const T2 *y)
octave_idx_type cols(void) const
write the output to stdout if nargout is
FloatColumnVector extract_n(octave_idx_type r1, octave_idx_type n) const