v0.14.0
Loading...
Searching...
No Matches
test_T2_19.cpp
Go to the documentation of this file.
3#include <iostream>
4using namespace FTensor;
5using namespace std;
6
7void test_T2_19(const Tensor1<double, 3> &t1_1, const Tensor1<double, 3> &t1_2,
8 const Tensor2<double, 3, 3> &t2_2)
9{
10 Index<'i', 3> i;
11 Index<'j', 3> j;
12
13 Number<0> N0;
14 Number<1> N1;
15 Number<2> N2;
16
17 /* Tensor2 tests */
19
20 /* Equals */
21
22 /* Switch indices */
23
24 t2(j, i) = t2_2(i, j) + t1_1(j) * t1_2(i);
25 test_for_zero(t2(0, 0) - (t2_2(0, 0) + t1_2(0) * t1_1(0)),
26 "T2(j,i)=T2(i,j)(0,0)");
27 test_for_zero(t2(1, 0) - (t2_2(0, 1) + t1_2(0) * t1_1(1)),
28 "T2(j,i)=T2(i,j)(0,1)");
29 test_for_zero(t2(2, 0) - (t2_2(0, 2) + t1_2(0) * t1_1(2)),
30 "T2(j,i)=T2(i,j)(0,2)");
31 test_for_zero(t2(0, 1) - (t2_2(1, 0) + t1_2(1) * t1_1(0)),
32 "T2(j,i)=T2(i,j)(1,0)");
33 test_for_zero(t2(1, 1) - (t2_2(1, 1) + t1_2(1) * t1_1(1)),
34 "T2(j,i)=T2(i,j)(1,1)");
35 test_for_zero(t2(2, 1) - (t2_2(1, 2) + t1_2(1) * t1_1(2)),
36 "T2(j,i)=T2(i,j)(1,2)");
37 test_for_zero(t2(0, 2) - (t2_2(2, 0) + t1_2(2) * t1_1(0)),
38 "T2(j,i)=T2(i,j)(2,0)");
39 test_for_zero(t2(1, 2) - (t2_2(2, 1) + t1_2(2) * t1_1(1)),
40 "T2(j,i)=T2(i,j)(2,1)");
41 test_for_zero(t2(2, 2) - (t2_2(2, 2) + t1_2(2) * t1_1(2)),
42 "T2(j,i)=T2(i,j)(2,2)");
43}
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_19(const Tensor1< double, 3 > &t1_1, const Tensor1< double, 3 > &t1_2, const Tensor2< double, 3, 3 > &t2_2)
Definition test_T2_19.cpp:7
void test_for_zero(const T &t, const std::string &s)