18 t2(
i,
j) = t2_1(
i,
j);
23 test_for_zero(t2(0, 0) - (t2_1(0, 0) * 4),
"T2(i,N)*=T(0,0)");
24 test_for_zero(t2(1, 0) - (t2_1(1, 0) * 4),
"T2(i,N)*=T(1,0)");
25 test_for_zero(t2(2, 0) - (t2_1(2, 0) * 4),
"T2(i,N)*=T(2,0)");
26 test_for_zero(t2(0, 1) - (t2_1(0, 1) * 6),
"T2(i,N)*=T(0,1)");
27 test_for_zero(t2(1, 1) - (t2_1(1, 1) * 6),
"T2(i,N)*=T(1,1)");
28 test_for_zero(t2(2, 1) - (t2_1(2, 1) * 6),
"T2(i,N)*=T(2,1)");
29 test_for_zero(t2(0, 2) - (t2_1(0, 2) * 8),
"T2(i,N)*=T(0,2)");
30 test_for_zero(t2(1, 2) - (t2_1(1, 2) * 8),
"T2(i,N)*=T(1,2)");
31 test_for_zero(t2(2, 2) - (t2_1(2, 2) * 8),
"T2(i,N)*=T(2,2)");
33 t2(
i,
j) = t2_1(
i,
j);
38 test_for_zero(t2(0, 0) - (t2_1(0, 0) / 2),
"T2(i,N)/=T(0,0)");
39 test_for_zero(t2(1, 0) - (t2_1(1, 0) / 2),
"T2(i,N)/=T(1,0)");
40 test_for_zero(t2(2, 0) - (t2_1(2, 0) / 2),
"T2(i,N)/=T(2,0)");
41 test_for_zero(t2(0, 1) - (t2_1(0, 1) / 3),
"T2(i,N)/=T(0,1)");
42 test_for_zero(t2(1, 1) - (t2_1(1, 1) / 3),
"T2(i,N)/=T(1,1)");
43 test_for_zero(t2(2, 1) - (t2_1(2, 1) / 3),
"T2(i,N)/=T(2,1)");
44 test_for_zero(t2(0, 2) - (t2_1(0, 2) / 4),
"T2(i,N)/=T(0,2)");
45 test_for_zero(t2(1, 2) - (t2_1(1, 2) / 4),
"T2(i,N)/=T(1,2)");
46 test_for_zero(t2(2, 2) - (t2_1(2, 2) / 4),
"T2(i,N)/=T(2,2)");
48 t2(
i,
j) = t2_1(
i,
j);