#include <iostream>
#include <vector>
#include "data-conv.h"
#include "lo-ieee.h"
#include "lo-specfun.h"
#include "lo-mappers.h"
#include "mx-base.h"
#include "mach-info.h"
#include "oct-locbuf.h"
#include "gripes.h"
#include "oct-obj.h"
#include "oct-stream.h"
#include "ops.h"
#include "ov-base.h"
#include "ov-base-mat.h"
#include "ov-base-mat.cc"
#include "ov-complex.h"
#include "ov-flt-complex.h"
#include "ov-cx-mat.h"
#include "ov-flt-cx-mat.h"
#include "ov-re-mat.h"
#include "ov-flt-re-mat.h"
#include "ov-scalar.h"
#include "ov-float.h"
#include "pr-output.h"
#include "byte-swap.h"
#include "ls-oct-ascii.h"
#include "ls-hdf5.h"
#include "ls-utils.h"
Defines | |
#define | ARRAY_MAPPER(MAP, AMAP, FCN) |
#define | DARRAY_MAPPER(MAP, AMAP, FCN) |
#define | CD_ARRAY_MAPPER(MAP, RFCN, CFCN, L1, L2) |
Functions | |
DEFINE_OCTAVE_ALLOCATOR (octave_float_complex_matrix) | |
DEFINE_OV_TYPEID_FUNCTIONS_AND_DATA (octave_float_complex_matrix,"float complex matrix","single") |
#define ARRAY_MAPPER | ( | MAP, | |||
AMAP, | |||||
FCN | ) |
Value:
octave_value \ octave_float_complex_matrix::MAP (void) const \ { \ static AMAP cmap = FCN; \ return matrix.map (cmap); \ }
#define CD_ARRAY_MAPPER | ( | MAP, | |||
RFCN, | |||||
CFCN, | |||||
L1, | |||||
L2 | ) |
Value:
octave_value \ octave_float_complex_matrix::MAP (void) const \ { \ static FloatComplexNDArray::dmapper idmap = ximag; \ NDArray m = matrix.map (idmap); \ if (m.all_elements_are_zero ()) \ { \ static FloatComplexNDArray::dmapper rdmap = xreal; \ m = matrix.map (rdmap); \ static NDArray::dmapper dmap = RFCN; \ static NDArray::cmapper cmap = CFCN; \ return (any_element_less_than (m, L1) \ ? octave_value (m.map (cmap)) \ : (any_element_greater_than (m, L2) \ ? octave_value (m.map (cmap)) \ : octave_value (m.map (dmap)))); \ } \ else \ { \ /*error ("%s: not defined for complex arguments", #MAP); */ \ return octave_value (m); \ } \ }
#define DARRAY_MAPPER | ( | MAP, | |||
AMAP, | |||||
FCN | ) |
Value:
octave_value \ octave_float_complex_matrix::MAP (void) const \ { \ static FloatComplexNDArray::dmapper dmap = ximag; \ FloatNDArray m = matrix.map (dmap); \ if (m.all_elements_are_zero ()) \ { \ dmap = xreal; \ m = matrix.map (dmap); \ static AMAP cmap = FCN; \ return m.map (cmap); \ } \ else \ { \ error ("%s: not defined for complex arguments", #MAP); \ return octave_value (); \ } \ }
DEFINE_OCTAVE_ALLOCATOR | ( | octave_float_complex_matrix | ) |
DEFINE_OV_TYPEID_FUNCTIONS_AND_DATA | ( | octave_float_complex_matrix | , | |
"float complex matrix" | , | |||
"single" | ||||
) |