13 #ifndef EIGEN_PRODUCTEVALUATORS_H 14 #define EIGEN_PRODUCTEVALUATORS_H 28 template<
typename Lhs,
typename Rhs,
int Options>
29 struct evaluator<Product<Lhs, Rhs, Options> >
30 :
public product_evaluator<Product<Lhs, Rhs, Options> >
32 typedef Product<Lhs, Rhs, Options> XprType;
33 typedef product_evaluator<XprType> Base;
35 EIGEN_DEVICE_FUNC
explicit evaluator(
const XprType& xpr) : Base(xpr) {}
40 template<
typename Lhs,
typename Rhs,
typename Scalar>
41 struct evaluator_assume_aliasing<CwiseUnaryOp<
internal::scalar_multiple_op<Scalar>, const Product<Lhs, Rhs, DefaultProduct> > >
43 static const bool value =
true;
45 template<
typename Lhs,
typename Rhs,
typename Scalar>
46 struct evaluator<CwiseUnaryOp<
internal::scalar_multiple_op<Scalar>, const Product<Lhs, Rhs, DefaultProduct> > >
47 :
public evaluator<Product<CwiseUnaryOp<internal::scalar_multiple_op<Scalar>,const Lhs>, Rhs, DefaultProduct> >
49 typedef CwiseUnaryOp<internal::scalar_multiple_op<Scalar>,
const Product<Lhs, Rhs, DefaultProduct> > XprType;
50 typedef evaluator<Product<CwiseUnaryOp<internal::scalar_multiple_op<Scalar>,
const Lhs>, Rhs, DefaultProduct> > Base;
52 EIGEN_DEVICE_FUNC
explicit evaluator(
const XprType& xpr)
53 : Base(xpr.functor().m_other * xpr.nestedExpression().lhs() * xpr.nestedExpression().rhs())
58 template<
typename Lhs,
typename Rhs,
int DiagIndex>
59 struct evaluator<Diagonal<const Product<Lhs, Rhs, DefaultProduct>, DiagIndex> >
60 :
public evaluator<Diagonal<const Product<Lhs, Rhs, LazyProduct>, DiagIndex> >
62 typedef Diagonal<const Product<Lhs, Rhs, DefaultProduct>, DiagIndex> XprType;
63 typedef evaluator<Diagonal<const Product<Lhs, Rhs, LazyProduct>, DiagIndex> > Base;
65 EIGEN_DEVICE_FUNC
explicit evaluator(
const XprType& xpr)
66 : Base(Diagonal<const Product<Lhs, Rhs, LazyProduct>, DiagIndex>(
67 Product<Lhs, Rhs, LazyProduct>(xpr.nestedExpression().lhs(), xpr.nestedExpression().rhs()),
76 template<
typename Lhs,
typename Rhs,
77 typename LhsShape =
typename evaluator_traits<Lhs>::Shape,
78 typename RhsShape =
typename evaluator_traits<Rhs>::Shape,
79 int ProductType = internal::product_type<Lhs,Rhs>::value>
80 struct generic_product_impl;
82 template<
typename Lhs,
typename Rhs>
83 struct evaluator_assume_aliasing<Product<Lhs, Rhs, DefaultProduct> > {
84 static const bool value =
true;
89 template<
typename Lhs,
typename Rhs,
int Options,
int ProductTag,
typename LhsShape,
typename RhsShape>
90 struct product_evaluator<Product<Lhs, Rhs, Options>, ProductTag, LhsShape, RhsShape>
91 :
public evaluator<typename Product<Lhs, Rhs, Options>::PlainObject>
93 typedef Product<Lhs, Rhs, Options> XprType;
94 typedef typename XprType::PlainObject PlainObject;
95 typedef evaluator<PlainObject> Base;
100 EIGEN_DEVICE_FUNC
explicit product_evaluator(
const XprType& xpr)
101 : m_result(xpr.rows(), xpr.cols())
103 ::new (static_cast<Base*>(
this)) Base(m_result);
117 generic_product_impl<Lhs, Rhs, LhsShape, RhsShape, ProductTag>::evalTo(m_result, xpr.lhs(), xpr.rhs());
121 PlainObject m_result;
125 template< typename DstXprType, typename Lhs, typename Rhs,
int Options, typename Scalar>
126 struct Assignment<DstXprType, Product<Lhs,Rhs,Options>,
internal::assign_op<Scalar>, Dense2Dense,
127 typename enable_if<(Options==DefaultProduct || Options==AliasFreeProduct),Scalar>::type>
129 typedef Product<Lhs,Rhs,Options> SrcXprType;
130 static void run(DstXprType &dst,
const SrcXprType &src,
const internal::assign_op<Scalar> &)
133 generic_product_impl<Lhs, Rhs>::evalTo(dst, src.lhs(), src.rhs());
138 template<
typename DstXprType,
typename Lhs,
typename Rhs,
int Options,
typename Scalar>
139 struct Assignment<DstXprType, Product<Lhs,Rhs,Options>,
internal::add_assign_op<Scalar>, Dense2Dense,
140 typename enable_if<(Options==DefaultProduct || Options==AliasFreeProduct),Scalar>::type>
142 typedef Product<Lhs,Rhs,Options> SrcXprType;
143 static void run(DstXprType &dst,
const SrcXprType &src,
const internal::add_assign_op<Scalar> &)
146 generic_product_impl<Lhs, Rhs>::addTo(dst, src.lhs(), src.rhs());
151 template<
typename DstXprType,
typename Lhs,
typename Rhs,
int Options,
typename Scalar>
152 struct Assignment<DstXprType, Product<Lhs,Rhs,Options>,
internal::sub_assign_op<Scalar>, Dense2Dense,
153 typename enable_if<(Options==DefaultProduct || Options==AliasFreeProduct),Scalar>::type>
155 typedef Product<Lhs,Rhs,Options> SrcXprType;
156 static void run(DstXprType &dst,
const SrcXprType &src,
const internal::sub_assign_op<Scalar> &)
159 generic_product_impl<Lhs, Rhs>::subTo(dst, src.lhs(), src.rhs());
167 template<
typename DstXprType,
typename Lhs,
typename Rhs,
typename AssignFunc,
typename Scalar,
typename ScalarBis>
168 struct Assignment<DstXprType, CwiseUnaryOp<
internal::scalar_multiple_op<ScalarBis>,
169 const Product<Lhs,Rhs,DefaultProduct> >, AssignFunc, Dense2Dense, Scalar>
171 typedef CwiseUnaryOp<internal::scalar_multiple_op<ScalarBis>,
172 const Product<Lhs,Rhs,DefaultProduct> > SrcXprType;
173 static void run(DstXprType &dst,
const SrcXprType &src,
const AssignFunc& func)
175 call_assignment_no_alias(dst, (src.functor().m_other * src.nestedExpression().lhs())*src.nestedExpression().rhs(), func);
184 template<
typename OtherXpr,
typename Lhs,
typename Rhs>
185 struct evaluator_assume_aliasing<CwiseBinaryOp<
internal::scalar_sum_op<typename OtherXpr::Scalar>, const OtherXpr,
186 const Product<Lhs,Rhs,DefaultProduct> >, DenseShape > {
187 static const bool value =
true;
190 template<
typename DstXprType,
typename OtherXpr,
typename ProductType,
typename Scalar,
typename Func1,
typename Func2>
191 struct assignment_from_xpr_plus_product
193 typedef CwiseBinaryOp<internal::scalar_sum_op<Scalar>,
const OtherXpr,
const ProductType> SrcXprType;
194 static void run(DstXprType &dst,
const SrcXprType &src,
const Func1& func)
196 call_assignment_no_alias(dst, src.lhs(), func);
197 call_assignment_no_alias(dst, src.rhs(), Func2());
201 template<
typename DstXprType,
typename OtherXpr,
typename Lhs,
typename Rhs,
typename Scalar>
202 struct Assignment<DstXprType, CwiseBinaryOp<
internal::scalar_sum_op<Scalar>, const OtherXpr,
203 const Product<Lhs,Rhs,DefaultProduct> >, internal::assign_op<Scalar>, Dense2Dense>
204 : assignment_from_xpr_plus_product<DstXprType, OtherXpr, Product<Lhs,Rhs,DefaultProduct>, Scalar, internal::assign_op<Scalar>, internal::add_assign_op<Scalar> >
206 template<
typename DstXprType,
typename OtherXpr,
typename Lhs,
typename Rhs,
typename Scalar>
207 struct Assignment<DstXprType, CwiseBinaryOp<internal::scalar_sum_op<Scalar>, const OtherXpr,
208 const Product<Lhs,Rhs,DefaultProduct> >, internal::add_assign_op<Scalar>, Dense2Dense>
209 : assignment_from_xpr_plus_product<DstXprType, OtherXpr, Product<Lhs,Rhs,DefaultProduct>, Scalar, internal::add_assign_op<Scalar>, internal::add_assign_op<Scalar> >
211 template<
typename DstXprType,
typename OtherXpr,
typename Lhs,
typename Rhs,
typename Scalar>
212 struct Assignment<DstXprType, CwiseBinaryOp<internal::scalar_sum_op<Scalar>, const OtherXpr,
213 const Product<Lhs,Rhs,DefaultProduct> >, internal::sub_assign_op<Scalar>, Dense2Dense>
214 : assignment_from_xpr_plus_product<DstXprType, OtherXpr, Product<Lhs,Rhs,DefaultProduct>, Scalar, internal::sub_assign_op<Scalar>, internal::sub_assign_op<Scalar> >
218 template<
typename Lhs,
typename Rhs>
219 struct generic_product_impl<Lhs,Rhs,DenseShape,DenseShape,InnerProduct>
221 template<
typename Dst>
222 static inline void evalTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
224 dst.coeffRef(0,0) = (lhs.transpose().cwiseProduct(rhs)).sum();
227 template<
typename Dst>
228 static inline void addTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
230 dst.coeffRef(0,0) += (lhs.transpose().cwiseProduct(rhs)).sum();
233 template<
typename Dst>
234 static void subTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
235 { dst.coeffRef(0,0) -= (lhs.transpose().cwiseProduct(rhs)).sum(); }
244 template<
typename Dst,
typename Lhs,
typename Rhs,
typename Func>
245 EIGEN_DONT_INLINE
void outer_product_selector_run(Dst& dst,
const Lhs &lhs,
const Rhs &rhs,
const Func& func,
const false_type&)
247 evaluator<Rhs> rhsEval(rhs);
248 typename nested_eval<Lhs,Rhs::SizeAtCompileTime>::type actual_lhs(lhs);
251 const Index cols = dst.cols();
252 for (Index j=0; j<cols; ++j)
253 func(dst.col(j), rhsEval.coeff(0,j) * actual_lhs);
257 template<
typename Dst,
typename Lhs,
typename Rhs,
typename Func>
258 EIGEN_DONT_INLINE
void outer_product_selector_run(Dst& dst,
const Lhs &lhs,
const Rhs &rhs,
const Func& func,
const true_type&)
260 evaluator<Lhs> lhsEval(lhs);
261 typename nested_eval<Rhs,Lhs::SizeAtCompileTime>::type actual_rhs(rhs);
264 const Index rows = dst.rows();
265 for (Index i=0; i<rows; ++i)
266 func(dst.row(i), lhsEval.coeff(i,0) * actual_rhs);
269 template<
typename Lhs,
typename Rhs>
270 struct generic_product_impl<Lhs,Rhs,DenseShape,DenseShape,OuterProduct>
272 template<
typename T>
struct is_row_major : internal::conditional<(int(T::Flags)&RowMajorBit), internal::true_type, internal::false_type>::type {};
273 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
276 struct set {
template<
typename Dst,
typename Src>
void operator()(
const Dst& dst,
const Src& src)
const { dst.const_cast_derived() = src; } };
277 struct add {
template<
typename Dst,
typename Src>
void operator()(
const Dst& dst,
const Src& src)
const { dst.const_cast_derived() += src; } };
278 struct sub {
template<
typename Dst,
typename Src>
void operator()(
const Dst& dst,
const Src& src)
const { dst.const_cast_derived() -= src; } };
281 explicit adds(
const Scalar& s) : m_scale(s) {}
282 template<
typename Dst,
typename Src>
void operator()(
const Dst& dst,
const Src& src)
const {
283 dst.const_cast_derived() += m_scale * src;
287 template<
typename Dst>
288 static inline void evalTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
290 internal::outer_product_selector_run(dst, lhs, rhs,
set(), is_row_major<Dst>());
293 template<
typename Dst>
294 static inline void addTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
296 internal::outer_product_selector_run(dst, lhs, rhs, add(), is_row_major<Dst>());
299 template<
typename Dst>
300 static inline void subTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
302 internal::outer_product_selector_run(dst, lhs, rhs, sub(), is_row_major<Dst>());
305 template<
typename Dst>
306 static inline void scaleAndAddTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs,
const Scalar& alpha)
308 internal::outer_product_selector_run(dst, lhs, rhs, adds(alpha), is_row_major<Dst>());
315 template<
typename Lhs,
typename Rhs,
typename Derived>
316 struct generic_product_impl_base
318 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
320 template<
typename Dst>
321 static void evalTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
322 { dst.setZero(); scaleAndAddTo(dst, lhs, rhs, Scalar(1)); }
324 template<
typename Dst>
325 static void addTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
326 { scaleAndAddTo(dst,lhs, rhs, Scalar(1)); }
328 template<
typename Dst>
329 static void subTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
330 { scaleAndAddTo(dst, lhs, rhs, Scalar(-1)); }
332 template<
typename Dst>
333 static void scaleAndAddTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs,
const Scalar& alpha)
334 { Derived::scaleAndAddTo(dst,lhs,rhs,alpha); }
338 template<
typename Lhs,
typename Rhs>
339 struct generic_product_impl<Lhs,Rhs,DenseShape,DenseShape,GemvProduct>
340 : generic_product_impl_base<Lhs,Rhs,generic_product_impl<Lhs,Rhs,DenseShape,DenseShape,GemvProduct> >
342 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
344 typedef typename internal::conditional<int(Side)==OnTheRight,Lhs,Rhs>::type MatrixType;
346 template<
typename Dest>
347 static void scaleAndAddTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs,
const Scalar& alpha)
349 internal::gemv_dense_selector<Side,
351 bool(internal::blas_traits<MatrixType>::HasUsableDirectAccess)
352 >::run(lhs, rhs, dst, alpha);
356 template<
typename Lhs,
typename Rhs>
357 struct generic_product_impl<Lhs,Rhs,DenseShape,DenseShape,CoeffBasedProductMode>
359 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
361 template<
typename Dst>
362 static inline void evalTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
366 call_assignment_no_alias(dst, lhs.lazyProduct(rhs), internal::assign_op<Scalar>());
369 template<
typename Dst>
370 static inline void addTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
373 call_assignment_no_alias(dst, lhs.lazyProduct(rhs), internal::add_assign_op<Scalar>());
376 template<
typename Dst>
377 static inline void subTo(Dst& dst,
const Lhs& lhs,
const Rhs& rhs)
380 call_assignment_no_alias(dst, lhs.lazyProduct(rhs), internal::sub_assign_op<Scalar>());
389 template<
typename Lhs,
typename Rhs>
390 struct generic_product_impl<Lhs,Rhs,DenseShape,DenseShape,LazyCoeffBasedProductMode>
391 : generic_product_impl<Lhs,Rhs,DenseShape,DenseShape,CoeffBasedProductMode> {};
399 template<
int Traversal,
int UnrollingIndex,
typename Lhs,
typename Rhs,
typename RetScalar>
400 struct etor_product_coeff_impl;
402 template<
int StorageOrder,
int UnrollingIndex,
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
403 struct etor_product_packet_impl;
405 template<
typename Lhs,
typename Rhs,
int ProductTag>
406 struct product_evaluator<Product<Lhs, Rhs, LazyProduct>, ProductTag, DenseShape, DenseShape>
407 : evaluator_base<Product<Lhs, Rhs, LazyProduct> >
409 typedef Product<Lhs, Rhs, LazyProduct> XprType;
410 typedef typename XprType::Scalar Scalar;
411 typedef typename XprType::CoeffReturnType CoeffReturnType;
412 typedef typename XprType::PacketScalar PacketScalar;
413 typedef typename XprType::PacketReturnType PacketReturnType;
415 EIGEN_DEVICE_FUNC
explicit product_evaluator(
const XprType& xpr)
421 m_innerDim(xpr.lhs().cols())
423 EIGEN_INTERNAL_CHECK_COST_VALUE(NumTraits<Scalar>::MulCost);
424 EIGEN_INTERNAL_CHECK_COST_VALUE(NumTraits<Scalar>::AddCost);
425 EIGEN_INTERNAL_CHECK_COST_VALUE(CoeffReadCost);
430 typedef typename internal::nested_eval<Lhs,Rhs::ColsAtCompileTime>::type LhsNested;
431 typedef typename internal::nested_eval<Rhs,Lhs::RowsAtCompileTime>::type RhsNested;
433 typedef typename internal::remove_all<LhsNested>::type LhsNestedCleaned;
434 typedef typename internal::remove_all<RhsNested>::type RhsNestedCleaned;
436 typedef evaluator<LhsNestedCleaned> LhsEtorType;
437 typedef evaluator<RhsNestedCleaned> RhsEtorType;
440 RowsAtCompileTime = LhsNestedCleaned::RowsAtCompileTime,
441 ColsAtCompileTime = RhsNestedCleaned::ColsAtCompileTime,
442 InnerSize = EIGEN_SIZE_MIN_PREFER_FIXED(LhsNestedCleaned::ColsAtCompileTime, RhsNestedCleaned::RowsAtCompileTime),
443 MaxRowsAtCompileTime = LhsNestedCleaned::MaxRowsAtCompileTime,
444 MaxColsAtCompileTime = RhsNestedCleaned::MaxColsAtCompileTime,
446 PacketSize = packet_traits<Scalar>::size,
448 LhsCoeffReadCost = LhsEtorType::CoeffReadCost,
449 RhsCoeffReadCost = RhsEtorType::CoeffReadCost,
450 CoeffReadCost = InnerSize==0 ? NumTraits<Scalar>::ReadCost
451 : InnerSize == Dynamic ? HugeCost
452 : InnerSize * (NumTraits<Scalar>::MulCost + LhsCoeffReadCost + RhsCoeffReadCost)
453 + (InnerSize - 1) * NumTraits<Scalar>::AddCost,
455 Unroll = CoeffReadCost <= EIGEN_UNROLLING_LIMIT,
457 LhsFlags = LhsEtorType::Flags,
458 RhsFlags = RhsEtorType::Flags,
460 LhsAlignment = LhsEtorType::Alignment,
461 RhsAlignment = RhsEtorType::Alignment,
466 SameType = is_same<typename LhsNestedCleaned::Scalar,typename RhsNestedCleaned::Scalar>::value,
469 && (ColsAtCompileTime == Dynamic || ((ColsAtCompileTime % PacketSize) == 0) ),
472 && (RowsAtCompileTime == Dynamic || ((RowsAtCompileTime % PacketSize) == 0) ),
474 EvalToRowMajor = (MaxRowsAtCompileTime==1&&MaxColsAtCompileTime!=1) ? 1
475 : (MaxColsAtCompileTime==1&&MaxRowsAtCompileTime!=1) ? 0
476 : (RhsRowMajor && !CanVectorizeLhs),
478 Flags = ((
unsigned int)(LhsFlags | RhsFlags) & HereditaryBits & ~RowMajorBit)
479 | (EvalToRowMajor ? RowMajorBit : 0)
481 | (SameType && (CanVectorizeLhs || CanVectorizeRhs) ? PacketAccessBit : 0)
484 LhsOuterStrideBytes =
int(LhsNestedCleaned::OuterStrideAtCompileTime) * int(
sizeof(
typename LhsNestedCleaned::Scalar)),
485 RhsOuterStrideBytes = int(RhsNestedCleaned::OuterStrideAtCompileTime) * int(
sizeof(
typename RhsNestedCleaned::Scalar)),
487 Alignment = CanVectorizeLhs ? (LhsOuterStrideBytes<0 || (int(LhsOuterStrideBytes) % EIGEN_PLAIN_ENUM_MAX(1,LhsAlignment))!=0 ? 0 : LhsAlignment)
488 : CanVectorizeRhs ? (RhsOuterStrideBytes<0 || (int(RhsOuterStrideBytes) % EIGEN_PLAIN_ENUM_MAX(1,RhsAlignment))!=0 ? 0 : RhsAlignment)
496 CanVectorizeInner = SameType
500 && (InnerSize % packet_traits<Scalar>::size == 0)
503 EIGEN_DEVICE_FUNC EIGEN_STRONG_INLINE
const CoeffReturnType coeff(Index row, Index col)
const 505 return (m_lhs.row(row).transpose().cwiseProduct( m_rhs.col(col) )).sum();
512 EIGEN_DEVICE_FUNC
const CoeffReturnType coeff(Index index)
const 514 const Index row = RowsAtCompileTime == 1 ? 0 : index;
515 const Index col = RowsAtCompileTime == 1 ? index : 0;
516 return (m_lhs.row(row).transpose().cwiseProduct( m_rhs.col(col) )).sum();
519 template<
int LoadMode,
typename PacketType>
520 const PacketType packet(Index row, Index col)
const 523 typedef etor_product_packet_impl<bool(
int(Flags)&RowMajorBit) ?
RowMajor :
ColMajor,
524 Unroll ? int(InnerSize) : Dynamic,
525 LhsEtorType, RhsEtorType, PacketType, LoadMode> PacketImpl;
526 PacketImpl::run(row, col, m_lhsImpl, m_rhsImpl, m_innerDim, res);
530 template<
int LoadMode,
typename PacketType>
531 const PacketType packet(Index index)
const 533 const Index row = RowsAtCompileTime == 1 ? 0 : index;
534 const Index col = RowsAtCompileTime == 1 ? index : 0;
535 return packet<LoadMode,PacketType>(row,col);
539 const LhsNested m_lhs;
540 const RhsNested m_rhs;
542 LhsEtorType m_lhsImpl;
543 RhsEtorType m_rhsImpl;
549 template<
typename Lhs,
typename Rhs>
550 struct product_evaluator<Product<Lhs, Rhs, DefaultProduct>, LazyCoeffBasedProductMode, DenseShape, DenseShape>
551 : product_evaluator<Product<Lhs, Rhs, LazyProduct>, CoeffBasedProductMode, DenseShape, DenseShape>
553 typedef Product<Lhs, Rhs, DefaultProduct> XprType;
554 typedef Product<Lhs, Rhs, LazyProduct> BaseProduct;
555 typedef product_evaluator<BaseProduct, CoeffBasedProductMode, DenseShape, DenseShape> Base;
559 EIGEN_DEVICE_FUNC
explicit product_evaluator(
const XprType& xpr)
560 : Base(BaseProduct(xpr.lhs(),xpr.rhs()))
568 template<
int UnrollingIndex,
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
569 struct etor_product_packet_impl<
RowMajor, UnrollingIndex, Lhs, Rhs, Packet, LoadMode>
571 static EIGEN_STRONG_INLINE
void run(Index row, Index col,
const Lhs& lhs,
const Rhs& rhs, Index innerDim, Packet &res)
573 etor_product_packet_impl<RowMajor, UnrollingIndex-1, Lhs, Rhs, Packet, LoadMode>::run(row, col, lhs, rhs, innerDim, res);
574 res = pmadd(pset1<Packet>(lhs.coeff(row, UnrollingIndex-1)), rhs.template packet<LoadMode,Packet>(UnrollingIndex-1, col), res);
578 template<
int UnrollingIndex,
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
579 struct etor_product_packet_impl<
ColMajor, UnrollingIndex, Lhs, Rhs, Packet, LoadMode>
581 static EIGEN_STRONG_INLINE
void run(Index row, Index col,
const Lhs& lhs,
const Rhs& rhs, Index innerDim, Packet &res)
583 etor_product_packet_impl<ColMajor, UnrollingIndex-1, Lhs, Rhs, Packet, LoadMode>::run(row, col, lhs, rhs, innerDim, res);
584 res = pmadd(lhs.template packet<LoadMode,Packet>(row, UnrollingIndex-1), pset1<Packet>(rhs.coeff(UnrollingIndex-1, col)), res);
588 template<
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
589 struct etor_product_packet_impl<
RowMajor, 1, Lhs, Rhs, Packet, LoadMode>
591 static EIGEN_STRONG_INLINE
void run(Index row, Index col,
const Lhs& lhs,
const Rhs& rhs, Index , Packet &res)
593 res = pmul(pset1<Packet>(lhs.coeff(row, 0)),rhs.template packet<LoadMode,Packet>(0, col));
597 template<
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
598 struct etor_product_packet_impl<
ColMajor, 1, Lhs, Rhs, Packet, LoadMode>
600 static EIGEN_STRONG_INLINE
void run(Index row, Index col,
const Lhs& lhs,
const Rhs& rhs, Index , Packet &res)
602 res = pmul(lhs.template packet<LoadMode,Packet>(row, 0), pset1<Packet>(rhs.coeff(0, col)));
606 template<
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
607 struct etor_product_packet_impl<
RowMajor, 0, Lhs, Rhs, Packet, LoadMode>
609 static EIGEN_STRONG_INLINE
void run(Index , Index ,
const Lhs& ,
const Rhs& , Index , Packet &res)
611 res = pset1<Packet>(0);
615 template<
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
616 struct etor_product_packet_impl<
ColMajor, 0, Lhs, Rhs, Packet, LoadMode>
618 static EIGEN_STRONG_INLINE
void run(Index , Index ,
const Lhs& ,
const Rhs& , Index , Packet &res)
620 res = pset1<Packet>(0);
624 template<
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
625 struct etor_product_packet_impl<
RowMajor, Dynamic, Lhs, Rhs, Packet, LoadMode>
627 static EIGEN_STRONG_INLINE
void run(Index row, Index col,
const Lhs& lhs,
const Rhs& rhs, Index innerDim, Packet& res)
629 res = pset1<Packet>(0);
630 for(Index i = 0; i < innerDim; ++i)
631 res = pmadd(pset1<Packet>(lhs.coeff(row, i)), rhs.template packet<LoadMode,Packet>(i, col), res);
635 template<
typename Lhs,
typename Rhs,
typename Packet,
int LoadMode>
636 struct etor_product_packet_impl<
ColMajor, Dynamic, Lhs, Rhs, Packet, LoadMode>
638 static EIGEN_STRONG_INLINE
void run(Index row, Index col,
const Lhs& lhs,
const Rhs& rhs, Index innerDim, Packet& res)
640 res = pset1<Packet>(0);
641 for(Index i = 0; i < innerDim; ++i)
642 res = pmadd(lhs.template packet<LoadMode,Packet>(row, i), pset1<Packet>(rhs.coeff(i, col)), res);
650 template<
int Mode,
bool LhsIsTriangular,
651 typename Lhs,
bool LhsIsVector,
652 typename Rhs,
bool RhsIsVector>
653 struct triangular_product_impl;
655 template<
typename Lhs,
typename Rhs,
int ProductTag>
656 struct generic_product_impl<Lhs,Rhs,TriangularShape,DenseShape,ProductTag>
657 : generic_product_impl_base<Lhs,Rhs,generic_product_impl<Lhs,Rhs,TriangularShape,DenseShape,ProductTag> >
659 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
661 template<
typename Dest>
662 static void scaleAndAddTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs,
const Scalar& alpha)
664 triangular_product_impl<Lhs::Mode,true,typename Lhs::MatrixType,false,Rhs, Rhs::ColsAtCompileTime==1>
665 ::run(dst, lhs.nestedExpression(), rhs, alpha);
669 template<
typename Lhs,
typename Rhs,
int ProductTag>
670 struct generic_product_impl<Lhs,Rhs,DenseShape,TriangularShape,ProductTag>
671 : generic_product_impl_base<Lhs,Rhs,generic_product_impl<Lhs,Rhs,DenseShape,TriangularShape,ProductTag> >
673 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
675 template<
typename Dest>
676 static void scaleAndAddTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs,
const Scalar& alpha)
678 triangular_product_impl<Rhs::Mode,false,Lhs,Lhs::RowsAtCompileTime==1, typename Rhs::MatrixType, false>::run(dst, lhs, rhs.nestedExpression(), alpha);
686 template <
typename Lhs,
int LhsMode,
bool LhsIsVector,
687 typename Rhs,
int RhsMode,
bool RhsIsVector>
688 struct selfadjoint_product_impl;
690 template<
typename Lhs,
typename Rhs,
int ProductTag>
691 struct generic_product_impl<Lhs,Rhs,SelfAdjointShape,DenseShape,ProductTag>
692 : generic_product_impl_base<Lhs,Rhs,generic_product_impl<Lhs,Rhs,SelfAdjointShape,DenseShape,ProductTag> >
694 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
696 template<
typename Dest>
697 static void scaleAndAddTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs,
const Scalar& alpha)
699 selfadjoint_product_impl<typename Lhs::MatrixType,Lhs::Mode,false,Rhs,0,Rhs::IsVectorAtCompileTime>::run(dst, lhs.nestedExpression(), rhs, alpha);
703 template<
typename Lhs,
typename Rhs,
int ProductTag>
704 struct generic_product_impl<Lhs,Rhs,DenseShape,SelfAdjointShape,ProductTag>
705 : generic_product_impl_base<Lhs,Rhs,generic_product_impl<Lhs,Rhs,DenseShape,SelfAdjointShape,ProductTag> >
707 typedef typename Product<Lhs,Rhs>::Scalar Scalar;
709 template<
typename Dest>
710 static void scaleAndAddTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs,
const Scalar& alpha)
712 selfadjoint_product_impl<Lhs,0,Lhs::IsVectorAtCompileTime,typename Rhs::MatrixType,Rhs::Mode,false>::run(dst, lhs, rhs.nestedExpression(), alpha);
721 template<
typename MatrixType,
typename DiagonalType,
typename Derived,
int ProductOrder>
722 struct diagonal_product_evaluator_base
723 : evaluator_base<Derived>
725 typedef typename scalar_product_traits<typename MatrixType::Scalar, typename DiagonalType::Scalar>::ReturnType Scalar;
728 CoeffReadCost = NumTraits<Scalar>::MulCost + evaluator<MatrixType>::CoeffReadCost + evaluator<DiagonalType>::CoeffReadCost,
730 MatrixFlags = evaluator<MatrixType>::Flags,
731 DiagFlags = evaluator<DiagonalType>::Flags,
733 _ScalarAccessOnDiag = !((int(_StorageOrder) ==
ColMajor && int(ProductOrder) ==
OnTheLeft)
735 _SameTypes = is_same<typename MatrixType::Scalar, typename DiagonalType::Scalar>::value,
738 _Vectorizable = bool(
int(MatrixFlags)&PacketAccessBit) && _SameTypes && (_ScalarAccessOnDiag || (bool(
int(DiagFlags)&PacketAccessBit))),
739 _LinearAccessMask = (MatrixType::RowsAtCompileTime==1 || MatrixType::ColsAtCompileTime==1) ?
LinearAccessBit : 0,
740 Flags = ((HereditaryBits|_LinearAccessMask) & (
unsigned int)(MatrixFlags)) | (_Vectorizable ? PacketAccessBit : 0),
741 Alignment = evaluator<MatrixType>::Alignment
744 diagonal_product_evaluator_base(
const MatrixType &mat,
const DiagonalType &diag)
745 : m_diagImpl(diag), m_matImpl(mat)
747 EIGEN_INTERNAL_CHECK_COST_VALUE(NumTraits<Scalar>::MulCost);
748 EIGEN_INTERNAL_CHECK_COST_VALUE(CoeffReadCost);
751 EIGEN_DEVICE_FUNC EIGEN_STRONG_INLINE
const Scalar coeff(Index idx)
const 753 return m_diagImpl.coeff(idx) * m_matImpl.coeff(idx);
757 template<
int LoadMode,
typename PacketType>
758 EIGEN_STRONG_INLINE PacketType packet_impl(Index row, Index col, Index
id, internal::true_type)
const 760 return internal::pmul(m_matImpl.template packet<LoadMode,PacketType>(row, col),
761 internal::pset1<PacketType>(m_diagImpl.coeff(
id)));
764 template<
int LoadMode,
typename PacketType>
765 EIGEN_STRONG_INLINE PacketType packet_impl(Index row, Index col, Index
id, internal::false_type)
const 768 InnerSize = (MatrixType::Flags &
RowMajorBit) ? MatrixType::ColsAtCompileTime : MatrixType::RowsAtCompileTime,
769 DiagonalPacketLoadMode = EIGEN_PLAIN_ENUM_MIN(LoadMode,((InnerSize%16) == 0) ? int(
Aligned16) : int(evaluator<DiagonalType>::Alignment))
771 return internal::pmul(m_matImpl.template packet<LoadMode,PacketType>(row, col),
772 m_diagImpl.template packet<DiagonalPacketLoadMode,PacketType>(
id));
775 evaluator<DiagonalType> m_diagImpl;
776 evaluator<MatrixType> m_matImpl;
780 template<
typename Lhs,
typename Rhs,
int ProductKind,
int ProductTag>
781 struct product_evaluator<Product<Lhs, Rhs, ProductKind>, ProductTag, DiagonalShape, DenseShape>
782 : diagonal_product_evaluator_base<Rhs, typename Lhs::DiagonalVectorType, Product<Lhs, Rhs, LazyProduct>, OnTheLeft>
784 typedef diagonal_product_evaluator_base<Rhs, typename Lhs::DiagonalVectorType, Product<Lhs, Rhs, LazyProduct>,
OnTheLeft> Base;
785 using Base::m_diagImpl;
786 using Base::m_matImpl;
788 typedef typename Base::Scalar Scalar;
790 typedef Product<Lhs, Rhs, ProductKind> XprType;
791 typedef typename XprType::PlainObject PlainObject;
797 EIGEN_DEVICE_FUNC
explicit product_evaluator(
const XprType& xpr)
798 : Base(xpr.rhs(), xpr.lhs().diagonal())
802 EIGEN_DEVICE_FUNC EIGEN_STRONG_INLINE
const Scalar coeff(Index row, Index col)
const 804 return m_diagImpl.coeff(row) * m_matImpl.coeff(row, col);
808 template<
int LoadMode,
typename PacketType>
809 EIGEN_STRONG_INLINE PacketType packet(Index row, Index col)
const 813 return this->
template packet_impl<LoadMode,PacketType>(row,col, row,
814 typename internal::conditional<int(StorageOrder)==RowMajor, internal::true_type, internal::false_type>::type());
817 template<
int LoadMode,
typename PacketType>
818 EIGEN_STRONG_INLINE PacketType packet(Index idx)
const 820 return packet<LoadMode,PacketType>(int(StorageOrder)==
ColMajor?idx:0,int(StorageOrder)==
ColMajor?0:idx);
826 template<
typename Lhs,
typename Rhs,
int ProductKind,
int ProductTag>
827 struct product_evaluator<Product<Lhs, Rhs, ProductKind>, ProductTag, DenseShape, DiagonalShape>
828 : diagonal_product_evaluator_base<Lhs, typename Rhs::DiagonalVectorType, Product<Lhs, Rhs, LazyProduct>,
OnTheRight>
830 typedef diagonal_product_evaluator_base<Lhs, typename Rhs::DiagonalVectorType, Product<Lhs, Rhs, LazyProduct>,
OnTheRight> Base;
831 using Base::m_diagImpl;
832 using Base::m_matImpl;
834 typedef typename Base::Scalar Scalar;
836 typedef Product<Lhs, Rhs, ProductKind> XprType;
837 typedef typename XprType::PlainObject PlainObject;
839 enum { StorageOrder = int(Lhs::Flags) & RowMajorBit ?
RowMajor :
ColMajor };
841 EIGEN_DEVICE_FUNC
explicit product_evaluator(
const XprType& xpr)
842 : Base(xpr.lhs(), xpr.rhs().diagonal())
846 EIGEN_DEVICE_FUNC EIGEN_STRONG_INLINE
const Scalar coeff(Index row, Index col)
const 848 return m_matImpl.coeff(row, col) * m_diagImpl.coeff(col);
852 template<
int LoadMode,
typename PacketType>
853 EIGEN_STRONG_INLINE PacketType packet(Index row, Index col)
const 855 return this->
template packet_impl<LoadMode,PacketType>(row,col, col,
856 typename internal::conditional<int(StorageOrder)==ColMajor, internal::true_type, internal::false_type>::type());
859 template<
int LoadMode,
typename PacketType>
860 EIGEN_STRONG_INLINE PacketType packet(Index idx)
const 862 return packet<LoadMode,PacketType>(int(StorageOrder)==
ColMajor?idx:0,int(StorageOrder)==
ColMajor?0:idx);
876 template<
typename ExpressionType,
int S
ide,
bool Transposed,
typename ExpressionShape>
877 struct permutation_matrix_product;
879 template<
typename ExpressionType,
int S
ide,
bool Transposed>
880 struct permutation_matrix_product<ExpressionType, Side, Transposed, DenseShape>
882 typedef typename nested_eval<ExpressionType, 1>::type MatrixType;
883 typedef typename remove_all<MatrixType>::type MatrixTypeCleaned;
885 template<
typename Dest,
typename PermutationType>
886 static inline void run(Dest& dst,
const PermutationType& perm,
const ExpressionType& xpr)
889 const Index n = Side==
OnTheLeft ? mat.rows() : mat.cols();
893 if(is_same_dense(dst, mat))
896 Matrix<bool,PermutationType::RowsAtCompileTime,1,0,PermutationType::MaxRowsAtCompileTime> mask(perm.size());
899 while(r < perm.size())
902 while(r<perm.size() && mask[r]) r++;
908 mask.coeffRef(k0) =
true;
909 for(Index k=perm.indices().coeff(k0); k!=k0; k=perm.indices().coeff(k))
911 Block<Dest, Side==OnTheLeft ? 1 : Dest::RowsAtCompileTime, Side==OnTheRight ? 1 : Dest::ColsAtCompileTime>(dst, k)
912 .swap(Block<Dest, Side==OnTheLeft ? 1 : Dest::RowsAtCompileTime, Side==OnTheRight ? 1 : Dest::ColsAtCompileTime>
913 (dst,((Side==
OnTheLeft) ^ Transposed) ? k0 : kPrev));
915 mask.coeffRef(k) =
true;
922 for(Index i = 0; i < n; ++i)
924 Block<Dest, Side==OnTheLeft ? 1 : Dest::RowsAtCompileTime, Side==OnTheRight ? 1 : Dest::ColsAtCompileTime>
925 (dst, ((Side==
OnTheLeft) ^ Transposed) ? perm.indices().coeff(i) : i)
929 Block<const MatrixTypeCleaned,Side==OnTheLeft ? 1 : MatrixTypeCleaned::RowsAtCompileTime,Side==OnTheRight ? 1 : MatrixTypeCleaned::ColsAtCompileTime>
930 (mat, ((Side==
OnTheRight) ^ Transposed) ? perm.indices().coeff(i) : i);
936 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
937 struct generic_product_impl<Lhs, Rhs, PermutationShape, MatrixShape, ProductTag>
939 template<
typename Dest>
940 static void evalTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs)
942 permutation_matrix_product<Rhs, OnTheLeft, false, MatrixShape>::run(dst, lhs, rhs);
946 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
947 struct generic_product_impl<Lhs, Rhs, MatrixShape, PermutationShape, ProductTag>
949 template<
typename Dest>
950 static void evalTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs)
952 permutation_matrix_product<Lhs, OnTheRight, false, MatrixShape>::run(dst, rhs, lhs);
956 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
957 struct generic_product_impl<Inverse<Lhs>, Rhs, PermutationShape, MatrixShape, ProductTag>
959 template<
typename Dest>
960 static void evalTo(Dest& dst,
const Inverse<Lhs>& lhs,
const Rhs& rhs)
962 permutation_matrix_product<Rhs, OnTheLeft, true, MatrixShape>::run(dst, lhs.nestedExpression(), rhs);
966 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
967 struct generic_product_impl<Lhs, Inverse<Rhs>, MatrixShape, PermutationShape, ProductTag>
969 template<
typename Dest>
970 static void evalTo(Dest& dst,
const Lhs& lhs,
const Inverse<Rhs>& rhs)
972 permutation_matrix_product<Lhs, OnTheRight, true, MatrixShape>::run(dst, rhs.nestedExpression(), lhs);
987 template<
typename ExpressionType,
int S
ide,
bool Transposed,
typename ExpressionShape>
988 struct transposition_matrix_product
990 typedef typename nested_eval<ExpressionType, 1>::type MatrixType;
991 typedef typename remove_all<MatrixType>::type MatrixTypeCleaned;
993 template<
typename Dest,
typename TranspositionType>
994 static inline void run(Dest& dst,
const TranspositionType& tr,
const ExpressionType& xpr)
997 typedef typename TranspositionType::StorageIndex StorageIndex;
998 const Index size = tr.size();
1001 if(!(is_same<MatrixTypeCleaned,Dest>::value && extract_data(dst) == extract_data(mat)))
1004 for(Index k=(Transposed?size-1:0) ; Transposed?k>=0:k<size ; Transposed?--k:++k)
1005 if(Index(j=tr.coeff(k))!=k)
1007 if(Side==
OnTheLeft) dst.row(k).swap(dst.row(j));
1008 else if(Side==
OnTheRight) dst.col(k).swap(dst.col(j));
1013 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
1014 struct generic_product_impl<Lhs, Rhs, TranspositionsShape, MatrixShape, ProductTag>
1016 template<
typename Dest>
1017 static void evalTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs)
1019 transposition_matrix_product<Rhs, OnTheLeft, false, MatrixShape>::run(dst, lhs, rhs);
1023 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
1024 struct generic_product_impl<Lhs, Rhs, MatrixShape, TranspositionsShape, ProductTag>
1026 template<
typename Dest>
1027 static void evalTo(Dest& dst,
const Lhs& lhs,
const Rhs& rhs)
1029 transposition_matrix_product<Lhs, OnTheRight, false, MatrixShape>::run(dst, rhs, lhs);
1034 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
1035 struct generic_product_impl<Transpose<Lhs>, Rhs, TranspositionsShape, MatrixShape, ProductTag>
1037 template<
typename Dest>
1038 static void evalTo(Dest& dst,
const Transpose<Lhs>& lhs,
const Rhs& rhs)
1040 transposition_matrix_product<Rhs, OnTheLeft, true, MatrixShape>::run(dst, lhs.nestedExpression(), rhs);
1044 template<
typename Lhs,
typename Rhs,
int ProductTag,
typename MatrixShape>
1045 struct generic_product_impl<Lhs, Transpose<Rhs>, MatrixShape, TranspositionsShape, ProductTag>
1047 template<
typename Dest>
1048 static void evalTo(Dest& dst,
const Lhs& lhs,
const Transpose<Rhs>& rhs)
1050 transposition_matrix_product<Lhs, OnTheRight, true, MatrixShape>::run(dst, rhs.nestedExpression(), lhs);
1058 #endif // EIGEN_PRODUCT_EVALUATORS_H Definition: Constants.h:333
Definition: Constants.h:230
const unsigned int RowMajorBit
Definition: Constants.h:61
const unsigned int PacketAccessBit
Definition: Constants.h:88
Definition: Constants.h:320
Definition: Constants.h:335
Definition: Constants.h:322
Definition: Eigen_Colamd.h:54
const unsigned int EvalBeforeNestingBit
Definition: Constants.h:65
const unsigned int ActualPacketAccessBit
Definition: Constants.h:99
const unsigned int LinearAccessBit
Definition: Constants.h:124