Christoph Richter committed Apr 16, 2018 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 ``````#ifndef TEST_MATH_ARMADILLOINDEXTEST #define TEST_MATH_ARMADILLOINDEXTEST #ifndef M_PI #define M_PI 3.14159265358979323846 #endif #include "armadillo.h" using namespace arma; class test_math_armadilloIndexTest{ public: mat in1; mat out1; mat CONSTANTCONSTANTVECTOR0; rowvec CONSTANTCONSTANTVECTOR1; void init() { in1=mat(2,2); out1=mat(4,4); CONSTANTCONSTANTVECTOR0 = mat(2,2); CONSTANTCONSTANTVECTOR0(0,0) = 1; CONSTANTCONSTANTVECTOR0(0,1) = 2; CONSTANTCONSTANTVECTOR0(1,0) = 3; CONSTANTCONSTANTVECTOR0(1,1) = 4; CONSTANTCONSTANTVECTOR1 = rowvec(2); CONSTANTCONSTANTVECTOR1(0,0) = 11; CONSTANTCONSTANTVECTOR1(0,1) = 12; } void execute() { mat A=mat(2,2); A = (ones(2, 2)); A = CONSTANTCONSTANTVECTOR0; colvec b=colvec(2); b = (zeros(2)); b = CONSTANTCONSTANTVECTOR1; out1 = (zeros(4, 4)); A(2-1, 2-1) = 5; A(2-1) = b(2-1); A(2-1, 1-1) = out1(1-1, 1-1); b(2-1) = 13; b(1-1) = A(1-1); b(1-1) = A(2-1, 2-1); b(2-1) = out1(4-1, 4-1); double x = 0; x = A(1-1, 2-1) ; x = b(2-1) ; x = in1(1-1, 1-1) ; out1(1-1, 1-1) = in1(1-1, 1-1); mat test = (zeros(4, 4)); out1 = test; out1(1-1) = test(1-1); out1(2-1, 2-1) = A(2-1, 2-1); } }; #endif``````