9{
   12 
   16 
   17  
   18 
   19  
   20 
   21  t2s_1(
i, 
j) = t2s_2(
i, 
j) + 10;
 
   22  test_for_zero(t2s_1(0, 0) - (t2s_2(0, 0) + 10), 
"T2s+T(0,0)");
 
   23  test_for_zero(t2s_1(0, 1) - (t2s_2(0, 1) + 10), 
"T2s+T(0,1)");
 
   24  test_for_zero(t2s_1(0, 2) - (t2s_2(0, 2) + 10), 
"T2s+T(0,2)");
 
   25  test_for_zero(t2s_1(1, 0) - (t2s_2(1, 0) + 10), 
"T2s+T(1,0)");
 
   26  test_for_zero(t2s_1(1, 1) - (t2s_2(1, 1) + 10), 
"T2s+T(1,1)");
 
   27  test_for_zero(t2s_1(1, 2) - (t2s_2(1, 2) + 10), 
"T2s+T(1,2)");
 
   28  test_for_zero(t2s_1(2, 0) - (t2s_2(2, 0) + 10), 
"T2s+T(2,0)");
 
   29  test_for_zero(t2s_1(2, 1) - (t2s_2(2, 1) + 10), 
"T2s+T(2,1)");
 
   30  test_for_zero(t2s_1(2, 2) - (t2s_2(2, 2) + 10), 
"T2s+T(2,2)");
 
   31 
   32  t2s_1(
i, 
j) = 10 + t2s_2(
i, 
j);
 
   33  test_for_zero(t2s_1(0, 0) - (t2s_2(0, 0) + 10), 
"T+T2s(0,0)");
 
   34  test_for_zero(t2s_1(0, 1) - (t2s_2(0, 1) + 10), 
"T+T2s(0,1)");
 
   35  test_for_zero(t2s_1(0, 2) - (t2s_2(0, 2) + 10), 
"T+T2s(0,2)");
 
   36  test_for_zero(t2s_1(1, 0) - (t2s_2(1, 0) + 10), 
"T+T2s(1,0)");
 
   37  test_for_zero(t2s_1(1, 1) - (t2s_2(1, 1) + 10), 
"T+T2s(1,1)");
 
   38  test_for_zero(t2s_1(1, 2) - (t2s_2(1, 2) + 10), 
"T+T2s(1,2)");
 
   39  test_for_zero(t2s_1(2, 0) - (t2s_2(2, 0) + 10), 
"T+T2s(2,0)");
 
   40  test_for_zero(t2s_1(2, 1) - (t2s_2(2, 1) + 10), 
"T+T2s(2,1)");
 
   41  test_for_zero(t2s_1(2, 2) - (t2s_2(2, 2) + 10), 
"T+T2s(2,2)");
 
   42 
   43  t2s_1(
i, 
j) = t2s_2(
i, 
j) - 10;
 
   44  test_for_zero(t2s_1(0, 0) - (t2s_2(0, 0) - 10), 
"T2s-T(0,0)");
 
   45  test_for_zero(t2s_1(0, 1) - (t2s_2(0, 1) - 10), 
"T2s-T(0,1)");
 
   46  test_for_zero(t2s_1(0, 2) - (t2s_2(0, 2) - 10), 
"T2s-T(0,2)");
 
   47  test_for_zero(t2s_1(1, 0) - (t2s_2(1, 0) - 10), 
"T2s-T(1,0)");
 
   48  test_for_zero(t2s_1(1, 1) - (t2s_2(1, 1) - 10), 
"T2s-T(1,1)");
 
   49  test_for_zero(t2s_1(1, 2) - (t2s_2(1, 2) - 10), 
"T2s-T(1,2)");
 
   50  test_for_zero(t2s_1(2, 0) - (t2s_2(2, 0) - 10), 
"T2s-T(2,0)");
 
   51  test_for_zero(t2s_1(2, 1) - (t2s_2(2, 1) - 10), 
"T2s-T(2,1)");
 
   52  test_for_zero(t2s_1(2, 2) - (t2s_2(2, 2) - 10), 
"T2s-T(2,2)");
 
   53 
   54  t2s_1(
i, 
j) = 10 - t2s_2(
i, 
j);
 
   55  test_for_zero(t2s_1(0, 0) - (10 - t2s_2(0, 0)), 
"T-T2s(0,0)");
 
   56  test_for_zero(t2s_1(0, 1) - (10 - t2s_2(0, 1)), 
"T-T2s(0,1)");
 
   57  test_for_zero(t2s_1(0, 2) - (10 - t2s_2(0, 2)), 
"T-T2s(0,2)");
 
   58  test_for_zero(t2s_1(1, 0) - (10 - t2s_2(1, 0)), 
"T-T2s(1,0)");
 
   59  test_for_zero(t2s_1(1, 1) - (10 - t2s_2(1, 1)), 
"T-T2s(1,1)");
 
   60  test_for_zero(t2s_1(1, 2) - (10 - t2s_2(1, 2)), 
"T-T2s(1,2)");
 
   61  test_for_zero(t2s_1(2, 0) - (10 - t2s_2(2, 0)), 
"T-T2s(2,0)");
 
   62  test_for_zero(t2s_1(2, 1) - (10 - t2s_2(2, 1)), 
"T-T2s(2,1)");
 
   63  test_for_zero(t2s_1(2, 2) - (10 - t2s_2(2, 2)), 
"T-T2s(2,2)");
 
   64}
FTensor::Index< 'i', SPACE_DIM > i
FTensor::Index< 'j', 3 > j
void test_for_zero(const T &t, const std::string &s)