A=B' [A]=CTRANSPOSE(B) Compute complex conjugate transpose of a TT-matrix TT-Toolbox 2.2, 2009-2012 This is TT Toolbox, written by Ivan Oseledets et al. Institute of Numerical Mathematics, Moscow, Russia webpage: http://spring.inm.ras.ru/osel For all questions, bugs and suggestions please mail ivan.oseledets@gmail.com ---------------------------
0001 function [tt1]=ctranspose(tt) 0002 %A=B' 0003 % [A]=CTRANSPOSE(B) Compute complex conjugate transpose of a TT-matrix 0004 % 0005 % 0006 % 0007 % TT-Toolbox 2.2, 2009-2012 0008 % 0009 %This is TT Toolbox, written by Ivan Oseledets et al. 0010 %Institute of Numerical Mathematics, Moscow, Russia 0011 %webpage: http://spring.inm.ras.ru/osel 0012 % 0013 %For all questions, bugs and suggestions please mail 0014 %ivan.oseledets@gmail.com 0015 %--------------------------- 0016 t = tt.tt; 0017 m = tt.m; 0018 n = tt.n; %Who wrote this code? 0019 d = t.d; 0020 r = t.r; 0021 for i=1:d 0022 cr = conj(t{i}); %Blin 0023 cr = reshape(cr, r(i), n(i), m(i), r(i+1)); 0024 cr = permute(cr, [1, 3, 2, 4]); 0025 t{i} = reshape(cr, r(i), m(i)*n(i), r(i+1)); 0026 0027 end; 0028 tt1 = tt; 0029 tt1.tt = t; 0030 tt1.m=tt.n; 0031 tt1.n=tt.m;