25 #if defined (HAVE_CONFIG_H)
49 if (len != a.
numel ())
67 if (r < 0 || r + a_len >
numel ())
68 (*current_liboctave_error_handler) (
"range error for insert");
87 if (r < 0 || r + a_len >
numel ())
88 (*current_liboctave_error_handler) (
"range error for insert");
139 if (r1 < 0 || r2 < 0 || r1 >= len || r2 >= len)
140 (*current_liboctave_error_handler) (
"range error for fill");
161 if (r1 < 0 || r2 < 0 || r1 >= len || r2 >= len)
162 (*current_liboctave_error_handler) (
"range error for fill");
184 retval.insert (a, nr_insert);
195 retval.insert (a, nr_insert);
214 return do_mx_unary_map<float, FloatComplex, std::abs> (*this);
220 return do_mx_unary_map<FloatComplex, FloatComplex, std::conj<float> > (
a);
324 F77_XFCN (cgemv, CGEMV, (F77_CONST_CHAR_ARG2 (
"N", 1),
327 F77_CHAR_ARG_LEN (1)));
356 if (nc == 0 || nr == 0)
365 result.
elem (
i) = 0.0;
381 if (nc == 0 || nr == 0)
390 result.
elem (
i) = 0.0;
406 if (nc == 0 || nr == 0)
415 result.
elem (
i) = 0.0;
469 os << a.
elem (
i) <<
"\n";
void mx_inline_add2(size_t n, R *r, const X *x)
FloatComplexColumnVector operator*(const FloatComplexMatrix &m, const FloatColumnVector &a)
void mx_inline_sub2(size_t n, R *r, const X *x)
FloatComplexRowVector transpose(void) const
T elem(octave_idx_type r, octave_idx_type c) const
bool operator!=(const FloatComplexColumnVector &a) const
FloatComplexColumnVector & operator-=(const FloatColumnVector &a)
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
octave_idx_type rows(void) const
MArray< T > transpose(void) const
FloatColumnVector abs(void) const
std::istream & operator>>(std::istream &is, FloatComplexColumnVector &a)
FloatComplex min(void) const
T & elem(octave_idx_type n)
Template for N-dimensional array classes with like-type math operators.
FloatComplexColumnVector conj(const FloatComplexColumnVector &a)
bool operator==(const FloatComplexColumnVector &a) const
#define F77_XFCN(f, F, args)
FloatComplex max(void) const
octave_idx_type rows(void) const
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 F77_DBLE * d
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
FloatComplexColumnVector & operator+=(const FloatColumnVector &a)
nd deftypefn *octave_map m
const FloatComplex * data(void) const
void err_nonconformant(const char *op, octave_idx_type op1_len, octave_idx_type op2_len)
MArray< T > hermitian(T(*fcn)(const T &)=0) const
With real return the complex result
FloatComplexColumnVector stack(const FloatColumnVector &a) const
FloatComplexColumnVector(void)
FloatComplexRowVector hermitian(void) const
FloatComplex & xelem(octave_idx_type n)
void clear(octave_idx_type n)
octave_idx_type cols(void) const
=val(i)}if ode{val(i)}occurs in table i
OCTAVE_EXPORT octave_value_list return the value of the option it must match the dimension of the state and the relative tolerance must also be a vector of the same length tem it must match the dimension of the state and the absolute tolerance must also be a vector of the same length The local error test applied at each integration step is xample roup abs(local error in x(i))<
FloatComplexColumnVector extract_n(octave_idx_type r1, octave_idx_type n) const
the element is set to zero In other the statement xample y
#define F77_CONST_CMPLX_ARG(x)
FloatComplexColumnVector & fill(float val)
std::ostream & operator<<(std::ostream &os, const FloatComplexColumnVector &a)
FloatComplexColumnVector & insert(const FloatColumnVector &a, octave_idx_type r)
std::complex< float > FloatComplex
const FloatComplex * fortran_vec(void) const
FloatComplexColumnVector extract(octave_idx_type r1, octave_idx_type r2) 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