Mercurial > octave-nkf

comparison src/OPERATORS/op-sbm-sbm.cc @ 7004:45d6cc5a0359

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-10-10 18:51:45 by jwe]
author jwe
date Wed, 10 Oct 2007 18:51:46 +0000
parents 4c8a2e4e0717
children 93c65f2a5668
comparison
equal deleted inserted replaced
7003:2980cb35270c 7004:45d6cc5a0359
72 sparse_matrix, concat) 72 sparse_matrix, concat)
73 73
74 DEFASSIGNOP_FN (assign, sparse_bool_matrix, sparse_bool_matrix, 74 DEFASSIGNOP_FN (assign, sparse_bool_matrix, sparse_bool_matrix,
75 assign) 75 assign)
76 76
77 CONVDECL (bool_matrix_to_double_matrix)
78 {
79 CAST_CONV_ARG (const octave_sparse_bool_matrix&);
80
81 return new octave_sparse_matrix (SparseMatrix (v.sparse_bool_matrix_value ()));
82 }
83
84 DEFDBLCONVFN (, sparse_bool_matrix, bool_array)
85
77 void 86 void
78 install_sbm_sbm_ops (void) 87 install_sbm_sbm_ops (void)
79 { 88 {
80 INSTALL_UNOP (op_not, octave_sparse_bool_matrix, not); 89 INSTALL_UNOP (op_not, octave_sparse_bool_matrix, not);
81 INSTALL_UNOP (op_uplus, octave_sparse_bool_matrix, uplus); 90 INSTALL_UNOP (op_uplus, octave_sparse_bool_matrix, uplus);
97 sbm_sbm); 106 sbm_sbm);
98 INSTALL_CATOP (octave_sparse_bool_matrix, octave_sparse_matrix, sbm_sm); 107 INSTALL_CATOP (octave_sparse_bool_matrix, octave_sparse_matrix, sbm_sm);
99 INSTALL_CATOP (octave_sparse_matrix, octave_sparse_bool_matrix, sm_sbm); 108 INSTALL_CATOP (octave_sparse_matrix, octave_sparse_bool_matrix, sm_sbm);
100 109
101 INSTALL_ASSIGNOP (op_asn_eq, octave_sparse_bool_matrix, 110 INSTALL_ASSIGNOP (op_asn_eq, octave_sparse_bool_matrix,
102 octave_sparse_bool_matrix, assign); 111 octave_sparse_bool_matrix, assign);
112
113 INSTALL_CONVOP (octave_sparse_bool_matrix, octave_sparse_matrix,
114 bool_matrix_to_double_matrix);
103 } 115 }
104 116
105 /* 117 /*
106 ;;; Local Variables: *** 118 ;;; Local Variables: ***
107 ;;; mode: C++ *** 119 ;;; mode: C++ ***