-/** Type promotion for a matrix and a scalar. */
-template<typename E, class AT, typename BO, typename L, typename S>
-struct MatrixPromote<cml::matrix<E,AT,BO,L>, S>
-{
- /* The deduced matrix result type (the array type is the same): */
- typedef cml::matrix<typename ScalarPromote<E,S>::type, AT, BO, L> type;
-
- /* The deduced temporary type: */
- typedef typename type::temporary_type temporary_type;
-};
-
-/** Type promotion for a scalar and a matrix. */
-template<typename S, typename E, class AT, typename BO, typename L>
-struct MatrixPromote<S, cml::matrix<E,AT,BO,L> >
-{
- /* The deduced matrix result type (the array type is the same): */
- typedef cml::matrix<typename ScalarPromote<S,E>::type, AT, BO, L> type;
-
- /* The deduced temporary type: */
- typedef typename type::temporary_type temporary_type;
-};
-
-/** Type promotion for outer product. */
-template<typename E1, class AT1, typename E2, class AT2>
-struct MatrixPromote< cml::vector<E1,AT1>, cml::vector<E2,AT2> >
-{
- typedef cml::vector<E1,AT1> left_type;
- typedef cml::vector<E2,AT2> right_type;
- typedef CML_DEFAULT_BASIS_ORIENTATION basis_orient;
-
- /* Get matrix size: */
- enum {
- array_rows = left_type::array_size,
- array_cols = right_type::array_size
- };
-
- /* Deduce the corresponding matrix types for the vectors: */
- typedef CML_DEFAULT_ARRAY_LAYOUT layout;
- typedef typename select_if<
- array_rows == -1, dynamic<>, fixed<array_rows,1>
- >::result left_storage;
- typedef cml::matrix<E1,left_storage,basis_orient,layout> left_matrix;
-
- typedef typename select_if<
- array_cols == -1, dynamic<>, fixed<1,array_cols>
- >::result right_storage;
- typedef cml::matrix<E2,right_storage,basis_orient,layout> right_matrix;
-
- /* Finally, promote the matrix types to get the result: */
- typedef typename et::MatrixPromote<left_matrix,right_matrix>::type type;
- typedef typename type::temporary_type temporary_type;
-};
-