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