Mercurial > octave-nkf

comparison src/OPERATORS/op-range.cc @ 7789:82be108cc558

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First attempt at single precision tyeps * * * corrections to qrupdate single precision routines * * * prefer demotion to single over promotion to double * * * Add single precision support to log2 function * * * Trivial PROJECT file update * * * Cache optimized hermitian/transpose methods * * * Add tests for tranpose/hermitian and ChangeLog entry for new transpose code
author David Bateman <dbateman@free.fr>
date Sun, 27 Apr 2008 22:34:17 +0200
parents a1dbe9d80eee
children 283989f2da9b
comparison
equal deleted inserted replaced
7788:45f5faba05a2 7789:82be108cc558
30 #include "ov.h" 30 #include "ov.h"
31 #include "ov-range.h" 31 #include "ov-range.h"
32 #include "ov-ch-mat.h" 32 #include "ov-ch-mat.h"
33 #include "ov-scalar.h" 33 #include "ov-scalar.h"
34 #include "ov-re-mat.h" 34 #include "ov-re-mat.h"
35 #include "ov-flt-re-mat.h"
35 #include "ov-complex.h" 36 #include "ov-complex.h"
36 #include "ov-cx-mat.h" 37 #include "ov-cx-mat.h"
37 #include "ov-bool.h" 38 #include "ov-bool.h"
38 #include "ov-bool-mat.h" 39 #include "ov-bool-mat.h"
39 #include "ov-typeinfo.h" 40 #include "ov-typeinfo.h"
72 DEFNDCATOP_FN (cm_r, complex_matrix, range, complex_array, array, concat) 73 DEFNDCATOP_FN (cm_r, complex_matrix, range, complex_array, array, concat)
73 DEFNDCATOP_FN (b_r, bool, range, array, array, concat) 74 DEFNDCATOP_FN (b_r, bool, range, array, array, concat)
74 DEFNDCATOP_FN (bm_r, bool_matrix, range, array, array, concat) 75 DEFNDCATOP_FN (bm_r, bool_matrix, range, array, array, concat)
75 DEFNDCATOP_FN (chm_r, char_matrix, range, char_array, array, concat) 76 DEFNDCATOP_FN (chm_r, char_matrix, range, char_array, array, concat)
76 77
78 CONVDECL (range_to_float_matrix)
79 {
80 CAST_CONV_ARG (const octave_range&);
81
82 return new octave_float_matrix (FloatNDArray (v.array_value ()));
83 }
84
77 void 85 void
78 install_range_ops (void) 86 install_range_ops (void)
79 { 87 {
80 INSTALL_UNOP (op_not, octave_range, not); 88 INSTALL_UNOP (op_not, octave_range, not);
81 INSTALL_UNOP (op_uplus, octave_range, uplus); 89 INSTALL_UNOP (op_uplus, octave_range, uplus);
96 INSTALL_CATOP (octave_complex, octave_range, cs_r); 104 INSTALL_CATOP (octave_complex, octave_range, cs_r);
97 INSTALL_CATOP (octave_complex_matrix, octave_range, cm_r); 105 INSTALL_CATOP (octave_complex_matrix, octave_range, cm_r);
98 INSTALL_CATOP (octave_bool, octave_range, b_r); 106 INSTALL_CATOP (octave_bool, octave_range, b_r);
99 INSTALL_CATOP (octave_bool_matrix, octave_range, bm_r); 107 INSTALL_CATOP (octave_bool_matrix, octave_range, bm_r);
100 INSTALL_CATOP (octave_char_matrix, octave_range, chm_r); 108 INSTALL_CATOP (octave_char_matrix, octave_range, chm_r);
109
110 INSTALL_CONVOP (octave_range, octave_float_matrix, range_to_float_matrix);
101 } 111 }
102 112
103 /* 113 /*
104 ;;; Local Variables: *** 114 ;;; Local Variables: ***
105 ;;; mode: C++ *** 115 ;;; mode: C++ ***