alias_Pattern

Source: tests/sparse/alias.cpp

// ========================================================================= //
// This file is part of MyraMath, copyright (c) 2014-2019 by Ryan A Chilton  //
// and distributed by MyraCore, LLC. See LICENSE.txt for license terms.      //
// ========================================================================= //

// Containers.
#include <myramath/utility/Number.h>
#include <myramath/sparse/SparseMatrix.h>
#include <myramath/sparse/Pattern.h>

// Ranges.
#include <myramath/sparse/SparseMatrixRange.h>
#include <myramath/sparse/PatternRange.h>

// Algorithms.
#include <myramath/sparse/frobenius.h>
#include <myramath/sparse/expr.h>
#include <myramath/expression/Expression.h>
#include <myramath/expression/logical.h>

// Reporting.
#include <tests/myratest.h>

using namespace myra;

namespace {

// Alias test for SparseMatrix.
template<class Number> void test1(typename ReflectPrecision<Number>::type tolerance)
  {
  auto A = SparseMatrix<Number>::random(10,10,40);
  SparseMatrix<Number> B(A.top(5));
  A = A.top(5);
  REQUIRE( frobenius(A-B) < tolerance);
  }

// Alias test for Pattern.
void test2()
  {
  auto A = Pattern::random(10,10,40);
  Pattern B(A.top(5));
  A = A.top(5);
  REQUIRE( equals(expr(A),expr(B)) );
  }

} // namespace

ADD_TEST("alias_SparseMatrix","[sparse]")
  {
  test1<NumberS>(1.0e-4f);
  test1<NumberD>(1.0e-8);
  test1<NumberC>(1.0e-4f);
  test1<NumberZ>(1.0e-8);
  }

ADD_TEST("alias_Pattern","[sparse]")
  {
  test2();
  }

Results: [PASS]

Go back to Summary of /test programs.