How to repeat matrix/matrice complex double (Slices of 3D array) , please following the equation

How to repeat this equation up to 1000x iterations, please add to the following equation

Equation :

clear

clc

Ns=5

shita=0.7

for n=1:Ns

E=randn(1,1);

if n==1

T(n)=E;

else

T(n)=shita*T(n-1)+E;

end

end

K=5

R0=T'*T

XX=zeros(Ns,Ns,K)

for i=1:K

XX(:,:,i)=(T*T')+(0.1*(eye(Ns)))

end

A=R0(:,:)

B=XX(:,:,i)

for i=1:K

for j=1:K

if i==j

matRx{i,j}=XX(:,:,i)

else

matRx{i,j}=R0(:,:)

end

end

end

matRx=cell2mat(matRx)

for i=1:K

C(:,:,i)=(1/sqrt(2))*(randn(K*K,K*K)+1i*randn(K*K,K*K))

D(:,:,i)=C(:,:,i)*matRx

end