23 #if defined (HAVE_CONFIG_H) 43 if (len !=
a.numel ())
59 if (c < 0 || c + a_len >
numel ())
60 (*current_liboctave_error_handler) (
"range error for insert");
94 if (c1 < 0 || c2 < 0 || c1 >= len || c2 >= len)
95 (*current_liboctave_error_handler) (
"range error for fill");
189 double *
y =
retval.fortran_vec ();
191 F77_XFCN (dgemv, DGEMV, (F77_CONST_CHAR_ARG2 (
"T", 1),
193 ld, v.
data (), 1, 0.0,
y, 1
194 F77_CHAR_ARG_LEN (1)));
209 double res =
elem (0);
225 double res =
elem (0);
240 os <<
' ' <<
a.elem (
i);
278 double delta = (x2 - x1) / (n - 1);
296 F77_INT a_len = octave::to_f77_int (
a.numel ());
RowVector linspace(double x1, double x2, octave_idx_type n)
RowVector real(const ComplexRowVector &a)
subroutine xddot(n, dx, incx, dy, incy, retval)
const double * data(void) const
RowVector operator*(const RowVector &v, const Matrix &a)
RowVector append(const RowVector &a) const
identity matrix If supplied two scalar respectively For allows like xample val
void mx_inline_real(size_t n, T *r, const std::complex< T > *x)
ColumnVector transpose(void) const
double & elem(octave_idx_type n)
nd example oindent opens the file binary numeric values will be read assuming they are stored in IEEE format with the least significant bit and then converted to the native representation Opening a file that is already open simply opens it again and returns a separate file id It is not an error to open a file several though writing to the same file through several different file ids may produce unexpected results The possible values of text mode reading and writing automatically converts linefeeds to the appropriate line end character for the you may append a you must also open the file in binary mode The parameter conversions are currently only supported for and permissions will be set to and then everything is written in a single operation This is very efficient and improves performance c
MArray< T > transpose(void) const
#define F77_XFCN(f, F, args)
RowVector extract(octave_idx_type c1, octave_idx_type c2) const
void mx_inline_imag(size_t n, T *r, const std::complex< T > *x)
std::ostream & operator<<(std::ostream &os, const RowVector &a)
octave_value resize(const dim_vector &dv, bool fill=false) const
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
bool operator!=(const RowVector &a) const
void err_nonconformant(const char *op, octave_idx_type op1_len, octave_idx_type op2_len)
F77_RET_T F77_FUNC(xerbla, XERBLA)
With real return the complex result
double & xelem(octave_idx_type n)
This is a simple wrapper template that will subclass an Array<T> type or any later type derived from ...
octave_f77_int_type F77_INT
the element is set to zero In other the statement xample y
RowVector extract_n(octave_idx_type c1, octave_idx_type n) const
std::complex< double > Complex
RowVector & insert(const RowVector &a, octave_idx_type c)
octave_idx_type numel(void) const
Number of elements in the array.
bool mx_inline_equal(size_t n, const T1 *x, const T2 *y)
write the output to stdout if nargout is
std::istream & operator>>(std::istream &is, RowVector &a)
bool operator==(const RowVector &a) const
RowVector & fill(double val)
RowVector imag(const ComplexRowVector &a)