22 t2(
i,
j) = (t2_2(
i,
j) & t1_2(
i));
23 test_for_zero(t2(0, 0) - (t2_2(0, 0) * t1_2(0)),
"T2(i,j)&T2(i)(0,0)");
24 test_for_zero(t2(0, 1) - (t2_2(0, 1) * t1_2(0)),
"T2(i,j)&T2(i)(0,1)");
25 test_for_zero(t2(0, 2) - (t2_2(0, 2) * t1_2(0)),
"T2(i,j)&T2(i)(0,2)");
26 test_for_zero(t2(1, 0) - (t2_2(1, 0) * t1_2(1)),
"T2(i,j)&T2(i)(1,0)");
27 test_for_zero(t2(1, 1) - (t2_2(1, 1) * t1_2(1)),
"T2(i,j)&T2(i)(1,1)");
28 test_for_zero(t2(1, 2) - (t2_2(1, 2) * t1_2(1)),
"T2(i,j)&T2(i)(1,2)");
29 test_for_zero(t2(2, 0) - (t2_2(2, 0) * t1_2(2)),
"T2(i,j)&T2(i)(2,0)");
30 test_for_zero(t2(2, 1) - (t2_2(2, 1) * t1_2(2)),
"T2(i,j)&T2(i)(2,1)");
31 test_for_zero(t2(2, 2) - (t2_2(2, 2) * t1_2(2)),
"T2(i,j)&T2(i)(2,2)");
33 t2(
i,
j) = (t1_2(
i) & t2_2(
i,
j));
34 test_for_zero(t2(0, 0) - (t2_2(0, 0) * t1_2(0)),
"T2(i)&T2(i,j)(0,0)");
35 test_for_zero(t2(0, 1) - (t2_2(0, 1) * t1_2(0)),
"T2(i)&T2(i,j)(0,1)");
36 test_for_zero(t2(0, 2) - (t2_2(0, 2) * t1_2(0)),
"T2(i)&T2(i,j)(0,2)");
37 test_for_zero(t2(1, 0) - (t2_2(1, 0) * t1_2(1)),
"T2(i)&T2(i,j)(1,0)");
38 test_for_zero(t2(1, 1) - (t2_2(1, 1) * t1_2(1)),
"T2(i)&T2(i,j)(1,1)");
39 test_for_zero(t2(1, 2) - (t2_2(1, 2) * t1_2(1)),
"T2(i)&T2(i,j)(1,2)");
40 test_for_zero(t2(2, 0) - (t2_2(2, 0) * t1_2(2)),
"T2(i)&T2(i,j)(2,0)");
41 test_for_zero(t2(2, 1) - (t2_2(2, 1) * t1_2(2)),
"T2(i)&T2(i,j)(2,1)");
42 test_for_zero(t2(2, 2) - (t2_2(2, 2) * t1_2(2)),
"T2(i)&T2(i,j)(2,2)");