1c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// This file is part of Eigen, a lightweight C++ template library 2c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// for linear algebra. 3c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// 4c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// Copyright (C) 2010 Gael Guennebaud <gael.guennebaud@inria.fr> 5c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// 6c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// This Source Code Form is subject to the terms of the Mozilla 7c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// Public License v. 2.0. If a copy of the MPL was not distributed 8c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath// with this file, You can obtain one at http://mozilla.org/MPL/2.0/. 9c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 10c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath#include "main.h" 11c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 12c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath#define CHECK_MMTR(DEST, TRI, OP) { \ 13c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath ref2 = ref1 = DEST; \ 14c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath DEST.template triangularView<TRI>() OP; \ 15c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath ref1 OP; \ 16c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath ref2.template triangularView<TRI>() = ref1; \ 17c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath VERIFY_IS_APPROX(DEST,ref2); \ 18c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath } 19c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 20c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamathtemplate<typename Scalar> void mmtr(int size) 21c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath{ 22c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath typedef typename NumTraits<Scalar>::Real RealScalar; 23c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 24c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath typedef Matrix<Scalar,Dynamic,Dynamic,ColMajor> MatrixColMaj; 25c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath typedef Matrix<Scalar,Dynamic,Dynamic,RowMajor> MatrixRowMaj; 26c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 27c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath DenseIndex othersize = internal::random<DenseIndex>(1,200); 28c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 29c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath MatrixColMaj matc(size, size); 30c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath MatrixRowMaj matr(size, size); 31c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath MatrixColMaj ref1(size, size), ref2(size, size); 32c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 33c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath MatrixColMaj soc(size,othersize); soc.setRandom(); 34c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath MatrixColMaj osc(othersize,size); osc.setRandom(); 35c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath MatrixRowMaj sor(size,othersize); sor.setRandom(); 36c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath MatrixRowMaj osr(othersize,size); osr.setRandom(); 37c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 38c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath Scalar s = internal::random<Scalar>(); 39c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 40c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matc, Lower, = s*soc*sor.adjoint()); 41c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matc, Upper, = s*(soc*soc.adjoint())); 42c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matr, Lower, = s*soc*soc.adjoint()); 43c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matr, Upper, = soc*(s*sor.adjoint())); 44c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 45c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matc, Lower, += s*soc*soc.adjoint()); 46c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matc, Upper, += s*(soc*sor.transpose())); 47c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matr, Lower, += s*sor*soc.adjoint()); 48c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matr, Upper, += soc*(s*soc.adjoint())); 49c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 50c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matc, Lower, -= s*soc*soc.adjoint()); 51c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matc, Upper, -= s*(osc.transpose()*osc.conjugate())); 52c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matr, Lower, -= s*soc*soc.adjoint()); 53c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CHECK_MMTR(matr, Upper, -= soc*(s*soc.adjoint())); 54c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath} 55c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath 56c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamathvoid test_product_mmtr() 57c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath{ 58c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath for(int i = 0; i < g_repeat ; i++) 59c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath { 60c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CALL_SUBTEST_1((mmtr<float>(internal::random<int>(1,EIGEN_TEST_MAX_SIZE)))); 61c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CALL_SUBTEST_2((mmtr<double>(internal::random<int>(1,EIGEN_TEST_MAX_SIZE)))); 62c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CALL_SUBTEST_3((mmtr<std::complex<float> >(internal::random<int>(1,EIGEN_TEST_MAX_SIZE/2)))); 63c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath CALL_SUBTEST_4((mmtr<std::complex<double> >(internal::random<int>(1,EIGEN_TEST_MAX_SIZE/2)))); 64c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath } 65c981c48f5bc9aefeffc0bcb0cc3934c2fae179ddNarayan Kamath} 66