455 lines
12 KiB
C++
455 lines
12 KiB
C++
// SPDX-License-Identifier: Apache-2.0
|
|
//
|
|
// Copyright 2011-2017 Ryan Curtin (http://www.ratml.org/)
|
|
// Copyright 2017 National ICT Australia (NICTA)
|
|
//
|
|
// Licensed under the Apache License, Version 2.0 (the "License");
|
|
// you may not use this file except in compliance with the License.
|
|
// You may obtain a copy of the License at
|
|
// http://www.apache.org/licenses/LICENSE-2.0
|
|
//
|
|
// Unless required by applicable law or agreed to in writing, software
|
|
// distributed under the License is distributed on an "AS IS" BASIS,
|
|
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
// See the License for the specific language governing permissions and
|
|
// limitations under the License.
|
|
// ------------------------------------------------------------------------
|
|
|
|
#include <armadillo>
|
|
|
|
#include "catch.hpp"
|
|
|
|
using namespace arma;
|
|
|
|
TEST_CASE("fn_min_weird_operation")
|
|
{
|
|
mat a(10, 10);
|
|
mat b(25, 10);
|
|
a.randn();
|
|
b.randn();
|
|
|
|
mat output = a * b.t();
|
|
|
|
uword real_min;
|
|
uword operation_min;
|
|
|
|
const double mval = output.min(real_min);
|
|
const double other_mval = (a * b.t()).min(operation_min);
|
|
|
|
REQUIRE( real_min == operation_min );
|
|
REQUIRE( mval == Approx(other_mval) );
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_weird_sparse_operation")
|
|
{
|
|
sp_mat a(10, 10);
|
|
sp_mat b(25, 10);
|
|
a.sprandn(10, 10, 0.3);
|
|
b.sprandn(25, 10, 0.3);
|
|
|
|
sp_mat output = a * b.t();
|
|
|
|
uword real_min;
|
|
uword operation_min;
|
|
|
|
const double mval = output.min(real_min);
|
|
const double other_mval = (a * b.t()).min(operation_min);
|
|
|
|
REQUIRE( real_min == operation_min );
|
|
REQUIRE( mval == Approx(other_mval) );
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_sp_subview_test")
|
|
{
|
|
// We will assume subview.at() works and returns points within the bounds of
|
|
// the matrix, so we just have to ensure the results are the same as
|
|
// Mat.min()...
|
|
for (size_t r = 50; r < 150; ++r)
|
|
{
|
|
sp_mat x;
|
|
x.sprandn(r, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
uword x_subview_min3;
|
|
|
|
const double mval = x.min(x_min);
|
|
const double mval1 = x.submat(0, 0, r - 1, r - 1).min(x_subview_min1);
|
|
const double mval2 = x.cols(0, r - 1).min(x_subview_min2);
|
|
const double mval3 = x.rows(0, r - 1).min(x_subview_min3);
|
|
|
|
if (mval != 0.0)
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 );
|
|
REQUIRE( x_min == x_subview_min2 );
|
|
REQUIRE( x_min == x_subview_min3 );
|
|
|
|
REQUIRE( mval == Approx(mval1) );
|
|
REQUIRE( mval == Approx(mval2) );
|
|
REQUIRE( mval == Approx(mval3) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_spsubview_col_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
sp_vec x;
|
|
x.sprandn(r, 1, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const double mval = x.min(x_min);
|
|
const double mval1 = x.submat(0, 0, r - 1, 0).min(x_subview_min1);
|
|
const double mval2 = x.rows(0, r - 1).min(x_subview_min2);
|
|
|
|
if (mval != 0.0)
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 );
|
|
REQUIRE( x_min == x_subview_min2 );
|
|
|
|
REQUIRE( mval == Approx(mval1) );
|
|
REQUIRE( mval == Approx(mval2) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_spsubview_row_min_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
sp_rowvec x;
|
|
x.sprandn(1, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const double mval = x.min(x_min);
|
|
const double mval1 = x.submat(0, 0, 0, r - 1).min(x_subview_min1);
|
|
const double mval2 = x.cols(0, r - 1).min(x_subview_min2);
|
|
|
|
if (mval != 0.0)
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 );
|
|
REQUIRE( x_min == x_subview_min2 );
|
|
|
|
REQUIRE( mval == Approx(mval1) );
|
|
REQUIRE( mval == Approx(mval2) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_spincompletesubview_min_test")
|
|
{
|
|
for (size_t r = 50; r < 150; ++r)
|
|
{
|
|
sp_mat x;
|
|
x.sprandn(r, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
uword x_subview_min3;
|
|
|
|
const double mval = x.min(x_min);
|
|
const double mval1 = x.submat(1, 1, r - 2, r - 2).min(x_subview_min1);
|
|
const double mval2 = x.cols(1, r - 2).min(x_subview_min2);
|
|
const double mval3 = x.rows(1, r - 2).min(x_subview_min3);
|
|
|
|
uword row, col;
|
|
x.min(row, col);
|
|
|
|
if (row != 0 && row != r - 1 && col != 0 && col != r - 1 && mval != 0.0)
|
|
{
|
|
uword srow, scol;
|
|
|
|
srow = x_subview_min1 % (r - 2);
|
|
scol = x_subview_min1 / (r - 2);
|
|
REQUIRE( x_min == (srow + 1) + r * (scol + 1) );
|
|
REQUIRE( x_min == x_subview_min2 + r );
|
|
|
|
srow = x_subview_min3 % (r - 2);
|
|
scol = x_subview_min3 / (r - 2);
|
|
REQUIRE( x_min == (srow + 1) + r * scol );
|
|
|
|
REQUIRE( mval == Approx(mval1) );
|
|
REQUIRE( mval == Approx(mval2) );
|
|
REQUIRE( mval == Approx(mval3) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_spincompletesubview_col_min_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
sp_vec x;
|
|
x.sprandu(r, 1, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const double mval = x.min(x_min);
|
|
const double mval1 = x.submat(1, 0, r - 2, 0).min(x_subview_min1);
|
|
const double mval2 = x.rows(1, r - 2).min(x_subview_min2);
|
|
|
|
if (x_min != 0 && x_min != r - 1 && mval != 0.0)
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 + 1 );
|
|
REQUIRE( x_min == x_subview_min2 + 1 );
|
|
|
|
REQUIRE( mval == Approx(mval1) );
|
|
REQUIRE( mval == Approx(mval2) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_spincompletesubview_row_min_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
sp_rowvec x;
|
|
x.sprandn(1, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const double mval = x.min(x_min);
|
|
const double mval1 = x.submat(0, 1, 0, r - 2).min(x_subview_min1);
|
|
const double mval2 = x.cols(1, r - 2).min(x_subview_min2);
|
|
|
|
if (mval != 0.0 && x_min != 0 && x_min != r - 1)
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 + 1 );
|
|
REQUIRE( x_min == x_subview_min2 + 1 );
|
|
|
|
REQUIRE( mval == Approx(mval1) );
|
|
REQUIRE( mval == Approx(mval2) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_sp_cx_subview_min_test")
|
|
{
|
|
// We will assume subview.at() works and returns points within the bounds of
|
|
// the matrix, so we just have to ensure the results are the same as
|
|
// Mat.min()...
|
|
for (size_t r = 50; r < 150; ++r)
|
|
{
|
|
sp_cx_mat x;
|
|
x.sprandn(r, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
uword x_subview_min3;
|
|
|
|
const std::complex<double> mval = x.min(x_min);
|
|
const std::complex<double> mval1 = x.submat(0, 0, r - 1, r - 1).min(x_subview_min1);
|
|
const std::complex<double> mval2 = x.cols(0, r - 1).min(x_subview_min2);
|
|
const std::complex<double> mval3 = x.rows(0, r - 1).min(x_subview_min3);
|
|
|
|
if (mval != std::complex<double>(0.0))
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 );
|
|
REQUIRE( x_min == x_subview_min2 );
|
|
REQUIRE( x_min == x_subview_min3 );
|
|
|
|
REQUIRE( mval.real() == Approx(mval1.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval1.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval2.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval2.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval3.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval3.imag()) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_sp_cx_subview_col_min_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
sp_cx_vec x;
|
|
x.sprandn(r, 1, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const std::complex<double> mval = x.min(x_min);
|
|
const std::complex<double> mval1 = x.submat(0, 0, r - 1, 0).min(x_subview_min1);
|
|
const std::complex<double> mval2 = x.rows(0, r - 1).min(x_subview_min2);
|
|
|
|
if (mval != std::complex<double>(0.0))
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 );
|
|
REQUIRE( x_min == x_subview_min2 );
|
|
|
|
REQUIRE( mval.real() == Approx(mval1.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval1.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval2.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval2.imag()) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_sp_cx_subview_row_min_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
sp_cx_rowvec x;
|
|
x.sprandn(1, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const std::complex<double> mval = x.min(x_min);
|
|
const std::complex<double> mval1 = x.submat(0, 0, 0, r - 1).min(x_subview_min1);
|
|
const std::complex<double> mval2 = x.cols(0, r - 1).min(x_subview_min2);
|
|
|
|
if (mval != std::complex<double>(0.0))
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 );
|
|
REQUIRE( x_min == x_subview_min2 );
|
|
|
|
REQUIRE( mval.real() == Approx(mval1.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval1.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval2.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval2.imag()) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_sp_cx_incomplete_subview_min_test")
|
|
{
|
|
for (size_t r = 50; r < 150; ++r)
|
|
{
|
|
sp_cx_mat x;
|
|
x.sprandn(r, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
uword x_subview_min3;
|
|
|
|
const std::complex<double> mval = x.min(x_min);
|
|
const std::complex<double> mval1 = x.submat(1, 1, r - 2, r - 2).min(x_subview_min1);
|
|
const std::complex<double> mval2 = x.cols(1, r - 2).min(x_subview_min2);
|
|
const std::complex<double> mval3 = x.rows(1, r - 2).min(x_subview_min3);
|
|
|
|
uword row, col;
|
|
x.min(row, col);
|
|
|
|
if (row != 0 && row != r - 1 && col != 0 && col != r - 1 && mval != std::complex<double>(0.0))
|
|
{
|
|
uword srow, scol;
|
|
|
|
srow = x_subview_min1 % (r - 2);
|
|
scol = x_subview_min1 / (r - 2);
|
|
REQUIRE( x_min == (srow + 1) + r * (scol + 1) );
|
|
REQUIRE( x_min == x_subview_min2 + r );
|
|
|
|
srow = x_subview_min3 % (r - 2);
|
|
scol = x_subview_min3 / (r - 2);
|
|
REQUIRE( x_min == (srow + 1) + r * scol );
|
|
|
|
REQUIRE( mval.real() == Approx(mval1.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval1.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval2.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval2.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval3.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval3.imag()) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_sp_cx_incomplete_subview_col_min_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
arma::sp_cx_vec x;
|
|
x.sprandn(r, 1, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const std::complex<double> mval = x.min(x_min);
|
|
const std::complex<double> mval1 = x.submat(1, 0, r - 2, 0).min(x_subview_min1);
|
|
const std::complex<double> mval2 = x.rows(1, r - 2).min(x_subview_min2);
|
|
|
|
if (x_min != 0 && x_min != r - 1 && mval != std::complex<double>(0.0))
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 + 1 );
|
|
REQUIRE( x_min == x_subview_min2 + 1 );
|
|
|
|
REQUIRE( mval.real() == Approx(mval1.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval1.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval2.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval2.imag()) );
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE("fn_min_sp_cx_incomplete_subview_row_min_test")
|
|
{
|
|
for (size_t r = 10; r < 50; ++r)
|
|
{
|
|
sp_cx_rowvec x;
|
|
x.sprandn(1, r, 0.3);
|
|
|
|
uword x_min;
|
|
uword x_subview_min1;
|
|
uword x_subview_min2;
|
|
|
|
const std::complex<double> mval = x.min(x_min);
|
|
const std::complex<double> mval1 = x.submat(0, 1, 0, r - 2).min(x_subview_min1);
|
|
const std::complex<double> mval2 = x.cols(1, r - 2).min(x_subview_min2);
|
|
|
|
if (x_min != 0 && x_min != r - 1 && mval != std::complex<double>(0.0))
|
|
{
|
|
REQUIRE( x_min == x_subview_min1 + 1 );
|
|
REQUIRE( x_min == x_subview_min2 + 1 );
|
|
|
|
REQUIRE( mval.real() == Approx(mval1.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval1.imag()) );
|
|
REQUIRE( mval.real() == Approx(mval2.real()) );
|
|
REQUIRE( mval.imag() == Approx(mval2.imag()) );
|
|
}
|
|
}
|
|
}
|