gusucode.com > qit_matlab_0.10.0工具箱源码程序 > qit/utils/test_lmap.m
% Test script for the lmap class. % Ville Bergholm 2009-2010 tol = qit.tol; % reordering subsystems dim = [2 5 3]; A = lmap(rand(dim(1))); B = lmap(rand(dim(2))); C = lmap(rand(dim(3))); T1 = tensor(A, B, C); p = [3 1 2]; T2 = reorder(T1, {p, p}); assert_o(norm(tensor(C, A, B) - T2), 0, tol); p = [2 1 3]; T2 = reorder(T1, {p, p}); assert_o(norm(tensor(B, A, C) - T2), 0, tol); p = [3 2 1]; T2 = reorder(T1, {p, p}); assert_o(norm(tensor(C, B, A) - T2), 0, tol); % Test script for gates. % Ville Bergholm 2010 U = gate.two(B, t, dim);