Upper shift matrix in the QTT-format [TT]=TT_SHF(D) computes an upper shift matrix of size 2^D x 2^D in the TT-format 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 [tt]=tt_shf(d) 0002 %Upper shift matrix in the QTT-format 0003 % [TT]=TT_SHF(D) computes an upper shift matrix of size 2^D x 2^D in the 0004 % TT-format 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 0017 tt=cell(d,1); 0018 mat1=eye(2); mat2=zeros(2); mat3=zeros(2); 0019 mat2(1,2)=1; mat3(2,1)=1; 0020 0021 tt{1}=zeros(2,2,2); 0022 tt{1}(:,:,1)=mat2; tt{1}(:,:,2)=mat3; 0023 tt{d}=zeros(2,2,2); 0024 tt{d}(:,:,1)=mat1; 0025 tt{d}(:,:,2)=mat2; 0026 for k=2:(d-1) 0027 tt{k}=zeros(2,2,2,2); 0028 tt{k}(:,:,1,1)=mat1; 0029 tt{k}(:,:,2,1)=mat2; 0030 tt{k}(:,:,2,2)=mat3; 0031 %tk{k}(:,:,1,2)=mat3; 0032 end 0033 tt=tt_matrix(tt);