v0.14.0
Loading...
Searching...
No Matches
test_T2s_39.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,
10{
11 Index<'i', 3> i;
12 Index<'j', 3> j;
13 Index<'k', 3> k;
14
18
19 /* Tensor2_symmetric tests */
20
21 t2_1(i, j) = t2s_2(k, i) * t2_2(k, j);
22 test_for_zero(t2_1(0, 0)
23 - (t2s_2(0, 0) * t2_2(0, 0) + t2s_2(1, 0) * t2_2(1, 0)
24 + t2s_2(2, 0) * t2_2(2, 0)),
25 "T2s(k,i)*T2(k,j)(0,0)");
26 test_for_zero(t2_1(0, 1)
27 - (t2s_2(0, 0) * t2_2(0, 1) + t2s_2(1, 0) * t2_2(1, 1)
28 + t2s_2(2, 0) * t2_2(2, 1)),
29 "T2s(k,i)*T2(k,j)(0,1)");
30 test_for_zero(t2_1(0, 2)
31 - (t2s_2(0, 0) * t2_2(0, 2) + t2s_2(1, 0) * t2_2(1, 2)
32 + t2s_2(2, 0) * t2_2(2, 2)),
33 "T2s(k,i)*T2(k,j)(0,2)");
34 test_for_zero(t2_1(1, 0)
35 - (t2s_2(0, 1) * t2_2(0, 0) + t2s_2(1, 1) * t2_2(1, 0)
36 + t2s_2(2, 1) * t2_2(2, 0)),
37 "T2s(k,i)*T2(k,j)(1,0)");
38 test_for_zero(t2_1(1, 1)
39 - (t2s_2(0, 1) * t2_2(0, 1) + t2s_2(1, 1) * t2_2(1, 1)
40 + t2s_2(2, 1) * t2_2(2, 1)),
41 "T2s(k,i)*T2(k,j)(1,1)");
42 test_for_zero(t2_1(1, 2)
43 - (t2s_2(0, 1) * t2_2(0, 2) + t2s_2(1, 1) * t2_2(1, 2)
44 + t2s_2(2, 1) * t2_2(2, 2)),
45 "T2s(k,i)*T2(k,j)(1,2)");
46 test_for_zero(t2_1(2, 0)
47 - (t2s_2(0, 2) * t2_2(0, 0) + t2s_2(1, 2) * t2_2(1, 0)
48 + t2s_2(2, 2) * t2_2(2, 0)),
49 "T2s(k,i)*T2(k,j)(2,0)");
50 test_for_zero(t2_1(2, 1)
51 - (t2s_2(0, 2) * t2_2(0, 1) + t2s_2(1, 2) * t2_2(1, 1)
52 + t2s_2(2, 2) * t2_2(2, 1)),
53 "T2s(k,i)*T2(k,j)(2,1)");
54 test_for_zero(t2_1(2, 2)
55 - (t2s_2(0, 2) * t2_2(0, 2) + t2s_2(1, 2) * t2_2(1, 2)
56 + t2s_2(2, 2) * t2_2(2, 2)),
57 "T2s(k,i)*T2(k,j)(2,2)");
58 t2_1(i, j) = t2_2(k, j) * t2s_2(k, i);
59 test_for_zero(t2_1(0, 0)
60 - (t2s_2(0, 0) * t2_2(0, 0) + t2s_2(1, 0) * t2_2(1, 0)
61 + t2s_2(2, 0) * t2_2(2, 0)),
62 "T2(k,j)*T2s(k,i)(0,0)");
63 test_for_zero(t2_1(0, 1)
64 - (t2s_2(0, 0) * t2_2(0, 1) + t2s_2(1, 0) * t2_2(1, 1)
65 + t2s_2(2, 0) * t2_2(2, 1)),
66 "T2(k,j)*T2s(k,i)(0,1)");
67 test_for_zero(t2_1(0, 2)
68 - (t2s_2(0, 0) * t2_2(0, 2) + t2s_2(1, 0) * t2_2(1, 2)
69 + t2s_2(2, 0) * t2_2(2, 2)),
70 "T2(k,j)*T2s(k,i)(0,2)");
71 test_for_zero(t2_1(1, 0)
72 - (t2s_2(0, 1) * t2_2(0, 0) + t2s_2(1, 1) * t2_2(1, 0)
73 + t2s_2(2, 1) * t2_2(2, 0)),
74 "T2(k,j)*T2s(k,i)(1,0)");
75 test_for_zero(t2_1(1, 1)
76 - (t2s_2(0, 1) * t2_2(0, 1) + t2s_2(1, 1) * t2_2(1, 1)
77 + t2s_2(2, 1) * t2_2(2, 1)),
78 "T2(k,j)*T2s(k,i)(1,1)");
79 test_for_zero(t2_1(1, 2)
80 - (t2s_2(0, 1) * t2_2(0, 2) + t2s_2(1, 1) * t2_2(1, 2)
81 + t2s_2(2, 1) * t2_2(2, 2)),
82 "T2(k,j)*T2s(k,i)(1,2)");
83 test_for_zero(t2_1(2, 0)
84 - (t2s_2(0, 2) * t2_2(0, 0) + t2s_2(1, 2) * t2_2(1, 0)
85 + t2s_2(2, 2) * t2_2(2, 0)),
86 "T2(k,j)*T2s(k,i)(2,0)");
87 test_for_zero(t2_1(2, 1)
88 - (t2s_2(0, 2) * t2_2(0, 1) + t2s_2(1, 2) * t2_2(1, 1)
89 + t2s_2(2, 2) * t2_2(2, 1)),
90 "T2(k,j)*T2s(k,i)(2,1)");
91 test_for_zero(t2_1(2, 2)
92 - (t2s_2(0, 2) * t2_2(0, 2) + t2s_2(1, 2) * t2_2(1, 2)
93 + t2s_2(2, 2) * t2_2(2, 2)),
94 "T2(k,j)*T2s(k,i)(2,2)");
95}
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
FTensor::Index< 'k', 3 > k
Tensors class implemented by Walter Landry.
Definition FTensor.hpp:51
void test_T2s_39(Tensor2< double, 3, 3 > &t2_1, const Tensor2< double, 3, 3 > &t2_2, const Tensor2_symmetric< double, 3 > &t2s_2)
void test_for_zero(const T &t, const std::string &s)