41 "complex diagonal matrix",
"double");
65 (v.float_complex_diag_matrix_value ());
104 if (! force_conversion)
118 if (! force_conversion)
171 os.write (reinterpret_cast<char *> (&r), 4);
172 os.write (reinterpret_cast<char *> (&c), 4);
180 warning (
"save: some values too large to save as floats --");
181 warning (
"save: saving as doubles instead");
188 double max_val, min_val;
194 write_doubles (os, reinterpret_cast<const double *> (mtmp), st,
206 if (! (is.read (reinterpret_cast<char *> (&r), 4)
207 && is.read (reinterpret_cast<char *> (&c), 4)
208 && is.read (reinterpret_cast<char *> (&tmp), 1)))
220 static_cast<save_type> (tmp), 2 * len, swap, fmt);
bool chk_valid_scalar(const octave_value &, Complex &) const
void gripe_implicit_conversion(const char *id, const char *from, const char *to)
bool all_integers(double &max_val, double &min_val) const
octave_value to_dense(void) const
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.
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 load_binary(std::istream &is, bool swap, oct_mach_info::float_format fmt)
bool too_large_for_float(void) const
ComplexColumnVector conj(const ComplexColumnVector &a)
virtual octave_base_value * try_narrowing_conversion(void)
void swap_bytes< 4 >(void *ptr)
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.
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)
OCTAVE_EMPTY_CPP_ARG std::string type_name(void) const
octave_value map(unary_mapper_t umap) const
void read_doubles(std::istream &is, double *data, save_type type, octave_idx_type len, bool swap, oct_mach_info::float_format fmt)
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
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)
ColumnVector imag(const ComplexColumnVector &a)
static int static_type_id(void)
std::complex< double > Complex
ColumnVector real(const ComplexColumnVector &a)
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 const double * x