v0.14.0
Loading...
Searching...
No Matches
test_T2_21.cpp
Go to the documentation of this file.
3#include <iostream>
4using namespace FTensor;
5using namespace std;
6
8 const Tensor2<double, 3, 3> &t2_2)
9{
10 Index<'i', 3> i;
11 Index<'j', 3> j;
12
16
17 /* Tensor2 tests */
19 t2(i, j) = t2_1(i, j);
20
21 /* Equals */
22
23 /* Switch indices */
24
25 t2(j, i) -= 5 * t2_2(i, j);
26 test_for_zero(t2(0, 0) - (t2_1(0, 0) - 5 * t2_2(0, 0)),
27 "T2(j,i)-=T2(i,j)(0,0)");
28 test_for_zero(t2(1, 0) - (t2_1(1, 0) - 5 * t2_2(0, 1)),
29 "T2(j,i)-=T2(i,j)(0,1)");
30 test_for_zero(t2(2, 0) - (t2_1(2, 0) - 5 * t2_2(0, 2)),
31 "T2(j,i)-=T2(i,j)(0,2)");
32 test_for_zero(t2(0, 1) - (t2_1(0, 1) - 5 * t2_2(1, 0)),
33 "T2(j,i)-=T2(i,j)(1,0)");
34 test_for_zero(t2(1, 1) - (t2_1(1, 1) - 5 * t2_2(1, 1)),
35 "T2(j,i)-=T2(i,j)(1,1)");
36 test_for_zero(t2(2, 1) - (t2_1(2, 1) - 5 * t2_2(1, 2)),
37 "T2(j,i)-=T2(i,j)(1,2)");
38 test_for_zero(t2(0, 2) - (t2_1(0, 2) - 5 * t2_2(2, 0)),
39 "T2(j,i)-=T2(i,j)(2,0)");
40 test_for_zero(t2(1, 2) - (t2_1(1, 2) - 5 * t2_2(2, 1)),
41 "T2(j,i)-=T2(i,j)(2,1)");
42 test_for_zero(t2(2, 2) - (t2_1(2, 2) - 5 * t2_2(2, 2)),
43 "T2(j,i)-=T2(i,j)(2,2)");
44}
static Number< 2 > N2
static Number< 1 > N1
static Number< 0 > N0
Tensors class implemented by Walter Landry.
FTensor::Index< 'i', SPACE_DIM > i
FTensor::Index< 'j', 3 > j
Tensors class implemented by Walter Landry.
Definition FTensor.hpp:51
void test_T2_21(const Tensor2< double, 3, 3 > &t2_1, const Tensor2< double, 3, 3 > &t2_2)
Definition test_T2_21.cpp:7
void test_for_zero(const T &t, const std::string &s)