test_T2s_19.cpp File Reference

#include "../../../src/FTensor.hpp"
#include "../test_for_zero.hpp"
#include <iostream>

Go to the source code of this file.

Functions
void	test_T2s_19 (const Tensor1< double, 3 > &t1_2, Tensor2_symmetric< double, 3 > &t2s_1, const Tensor2_symmetric< double, 3 > &t2s_2)

Function Documentation

test_T2s_19()

void test_T2s_19	(	const Tensor1< double, 3 > &	t1_2,
		Tensor2_symmetric< double, 3 > &	t2s_1,
		const Tensor2_symmetric< double, 3 > &	t2s_2
	)

Definition at line 7 of file test_T2s_19.cpp.

{
  Index<'i', 3> i;
  Index<'j', 3> j;
 
  Number<0> N0;
  Number<1> N1;
  Number<2> N2;
 
  /* Tensor2_symmetric tests */
 
  /* Equals */
 
  t2s_1(i, j) += 10;
  test_for_zero(t2s_1(0, 0) - (-3 * t2s_2(0, 0) + t1_2(0) * t1_2(0) + 10),
                "T2s+=T(0,0)");
  test_for_zero(t2s_1(1, 0) - (-3 * t2s_2(0, 1) + t1_2(0) * t1_2(1) + 10),
                "T2s+=T(0,1)");
  test_for_zero(t2s_1(2, 0) - (-3 * t2s_2(0, 2) + t1_2(0) * t1_2(2) + 10),
                "T2s+=T(0,2)");
  test_for_zero(t2s_1(0, 1) - (-3 * t2s_2(1, 0) + t1_2(1) * t1_2(0) + 10),
                "T2s+=T(1,0)");
  test_for_zero(t2s_1(1, 1) - (-3 * t2s_2(1, 1) + t1_2(1) * t1_2(1) + 10),
                "T2s+=T(1,1)");
  test_for_zero(t2s_1(2, 1) - (-3 * t2s_2(1, 2) + t1_2(1) * t1_2(2) + 10),
                "T2s+=T(1,2)");
  test_for_zero(t2s_1(0, 2) - (-3 * t2s_2(2, 0) + t1_2(2) * t1_2(0) + 10),
                "T2s+=T(2,0)");
  test_for_zero(t2s_1(1, 2) - (-3 * t2s_2(2, 1) + t1_2(2) * t1_2(1) + 10),
                "T2s+=T(2,1)");
  test_for_zero(t2s_1(2, 2) - (-3 * t2s_2(2, 2) + t1_2(2) * t1_2(2) + 10),
                "T2s+=T(2,2)");
 
  t2s_1(i, j) -= 7;
  test_for_zero(t2s_1(0, 0) - (-3 * t2s_2(0, 0) + t1_2(0) * t1_2(0) + 3),
                "T2s-=T(0,0)");
  test_for_zero(t2s_1(1, 0) - (-3 * t2s_2(0, 1) + t1_2(0) * t1_2(1) + 3),
                "T2s-=T(0,1)");
  test_for_zero(t2s_1(2, 0) - (-3 * t2s_2(0, 2) + t1_2(0) * t1_2(2) + 3),
                "T2s-=T(0,2)");
  test_for_zero(t2s_1(0, 1) - (-3 * t2s_2(1, 0) + t1_2(1) * t1_2(0) + 3),
                "T2s-=T(1,0)");
  test_for_zero(t2s_1(1, 1) - (-3 * t2s_2(1, 1) + t1_2(1) * t1_2(1) + 3),
                "T2s-=T(1,1)");
  test_for_zero(t2s_1(2, 1) - (-3 * t2s_2(1, 2) + t1_2(1) * t1_2(2) + 3),
                "T2s-=T(1,2)");
  test_for_zero(t2s_1(0, 2) - (-3 * t2s_2(2, 0) + t1_2(2) * t1_2(0) + 3),
                "T2s-=T(2,0)");
  test_for_zero(t2s_1(1, 2) - (-3 * t2s_2(2, 1) + t1_2(2) * t1_2(1) + 3),
                "T2s-=T(2,1)");
  test_for_zero(t2s_1(2, 2) - (-3 * t2s_2(2, 2) + t1_2(2) * t1_2(2) + 3),
                "T2s-=T(2,2)");
 
  t2s_1(i, j) *= 12;
  test_for_zero(t2s_1(0, 0) - (-3 * t2s_2(0, 0) + t1_2(0) * t1_2(0) + 3) * 12,
                "T2s*=T(0,0)");
  test_for_zero(t2s_1(1, 0) - (-3 * t2s_2(0, 1) + t1_2(0) * t1_2(1) + 3) * 12,
                "T2s*=T(0,1)");
  test_for_zero(t2s_1(2, 0) - (-3 * t2s_2(0, 2) + t1_2(0) * t1_2(2) + 3) * 12,
                "T2s*=T(0,2)");
  test_for_zero(t2s_1(0, 1) - (-3 * t2s_2(1, 0) + t1_2(1) * t1_2(0) + 3) * 12,
                "T2s*=T(1,0)");
  test_for_zero(t2s_1(1, 1) - (-3 * t2s_2(1, 1) + t1_2(1) * t1_2(1) + 3) * 12,
                "T2s*=T(1,1)");
  test_for_zero(t2s_1(2, 1) - (-3 * t2s_2(1, 2) + t1_2(1) * t1_2(2) + 3) * 12,
                "T2s*=T(1,2)");
  test_for_zero(t2s_1(0, 2) - (-3 * t2s_2(2, 0) + t1_2(2) * t1_2(0) + 3) * 12,
                "T2s*=T(2,0)");
  test_for_zero(t2s_1(1, 2) - (-3 * t2s_2(2, 1) + t1_2(2) * t1_2(1) + 3) * 12,
                "T2s*=T(2,1)");
  test_for_zero(t2s_1(2, 2) - (-3 * t2s_2(2, 2) + t1_2(2) * t1_2(2) + 3) * 12,
                "T2s*=T(2,2)");
 
  t2s_1(i, j) /= 4;
  test_for_zero(t2s_1(0, 0) - (-3 * t2s_2(0, 0) + t1_2(0) * t1_2(0) + 3) * 3,
                "T2s/=T(0,0)");
  test_for_zero(t2s_1(1, 0) - (-3 * t2s_2(0, 1) + t1_2(0) * t1_2(1) + 3) * 3,
                "T2s/=T(0,1)");
  test_for_zero(t2s_1(2, 0) - (-3 * t2s_2(0, 2) + t1_2(0) * t1_2(2) + 3) * 3,
                "T2s/=T(0,2)");
  test_for_zero(t2s_1(0, 1) - (-3 * t2s_2(1, 0) + t1_2(1) * t1_2(0) + 3) * 3,
                "T2s/=T(1,0)");
  test_for_zero(t2s_1(1, 1) - (-3 * t2s_2(1, 1) + t1_2(1) * t1_2(1) + 3) * 3,
                "T2s/=T(1,1)");
  test_for_zero(t2s_1(2, 1) - (-3 * t2s_2(1, 2) + t1_2(1) * t1_2(2) + 3) * 3,
                "T2s/=T(1,2)");
  test_for_zero(t2s_1(0, 2) - (-3 * t2s_2(2, 0) + t1_2(2) * t1_2(0) + 3) * 3,
                "T2s/=T(2,0)");
  test_for_zero(t2s_1(1, 2) - (-3 * t2s_2(2, 1) + t1_2(2) * t1_2(1) + 3) * 3,
                "T2s/=T(2,1)");
  test_for_zero(t2s_1(2, 2) - (-3 * t2s_2(2, 2) + t1_2(2) * t1_2(2) + 3) * 3,
                "T2s/=T(2,2)");
 
  t2s_1(i, j) = 10;
  test_for_zero(t2s_1(0, 0) - 10, "T2s=T(0,0)");
  test_for_zero(t2s_1(1, 0) - 10, "T2s=T(0,1)");
  test_for_zero(t2s_1(2, 0) - 10, "T2s=T(0,2)");
  test_for_zero(t2s_1(0, 1) - 10, "T2s=T(1,0)");
  test_for_zero(t2s_1(1, 1) - 10, "T2s=T(1,1)");
  test_for_zero(t2s_1(2, 1) - 10, "T2s=T(1,2)");
  test_for_zero(t2s_1(0, 2) - 10, "T2s=T(2,0)");
  test_for_zero(t2s_1(1, 2) - 10, "T2s=T(2,1)");
  test_for_zero(t2s_1(2, 2) - 10, "T2s=T(2,2)");
}