23 #if defined (HAVE_CONFIG_H)
41 "complex diagonal matrix",
"double");
106 if (! force_conversion)
120 if (! force_conversion)
185 os.write (reinterpret_cast<char *> (&r), 4);
186 os.write (reinterpret_cast<char *> (&c), 4);
194 warning (
"save: some values too large to save as floats --");
195 warning (
"save: saving as doubles instead");
202 double max_val, min_val;
208 write_doubles (os, reinterpret_cast<const double *> (mtmp), st,
220 if (! (is.read (reinterpret_cast<char *> (&r), 4)
221 && is.read (reinterpret_cast<char *> (&c), 4)
222 && is.read (reinterpret_cast<char *> (&tmp), 1)))
234 static_cast<save_type> (tmp), 2 * len, swap, fmt);
bool chk_valid_scalar(const octave_value &, Complex &) const
bool all_integers(double &max_val, double &min_val) const
octave_value to_dense(void) const
bool load_binary(std::istream &is, bool swap, octave::mach_info::float_format fmt)
FloatDiagMatrix float_diag_matrix_value(bool=false) const
type_conv_info numeric_conversion_function(void) const
const T * fortran_vec(void) const
octave_idx_type numel(void) const
Number of elements in the array.
identity matrix If supplied two scalar respectively For allows like xample val
save_type get_save_type(double, double)
ComplexColumnVector extract_diag(octave_idx_type k=0) const
bool is_complex_scalar(void) const
octave_idx_type rows(void) const
octave_value map(octave_base_value::unary_mapper_t umap) const
void write_doubles(std::ostream &os, const double *data, save_type type, octave_idx_type len)
#define DEFINE_OV_TYPEID_FUNCTIONS_AND_DATA(t, n, c)
bool save_binary(std::ostream &os, bool &save_as_floats)
DiagMatrix diag_matrix_value(bool=false) const
bool too_large_for_float(void) 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
std::string type_name(void) const
ComplexColumnVector conj(const ComplexColumnVector &a)
virtual octave_base_value * try_narrowing_conversion(void)
void swap_bytes< 4 >(void *ptr)
octave_value as_double(void) const
octave_idx_type nelem(void) const
bool is_real_scalar(void) const
type_conv_info numeric_demotion_function(void) const
Array< U > map(F fcn) const
Apply function fcn to each element of the Array.
void read_doubles(std::istream &is, double *data, save_type type, octave_idx_type len, bool swap, octave::mach_info::float_format fmt)
nd deftypefn *octave_map m
static octave_base_value * default_numeric_demotion_function(const octave_base_value &a)
const T * data(void) const
octave_base_value * try_narrowing_conversion(void)
ComplexMatrix complex_matrix_value(bool=false) const
octave_value map(unary_mapper_t umap) const
the sparsity preserving column transformation such that that defines the pivoting threshold can be given in which case it defines the c
void warning(const char *fmt,...)
octave_idx_type cols(void) const
ComplexDiagMatrix complex_diag_matrix_value(bool=false) const
Complex complex_value(bool frc_str_conv=false) const
void warn_implicit_conversion(const char *id, const char *from, const char *to)
octave_idx_type columns(void) const
FloatComplexDiagMatrix float_complex_diag_matrix_value(bool=false) const
static octave_base_value * default_numeric_conversion_function(const octave_base_value &a)
octave_value as_single(void) const
ColumnVector imag(const ComplexColumnVector &a)
static int static_type_id(void)
std::complex< double > Complex
ColumnVector real(const ComplexColumnVector &a)
write the output to stdout if nargout is
bool all_elements_are_real(void) const
static int static_type_id(void)
octave_idx_type length(void) const
DiagMatrix abs(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 * x