Maple. Метод квадратных корней.

Задали решить систему с помощью метода квадратных корней. Остановилась на пункте, где вычисляются элементы матрицы Т.
Что у меня неправильно в выделенной части???Программа пишет:"Error, bad index into Matrix". Не могу понять,где ошибка,почему сумма не пашет?Если ввести число вместо суммы программа идет. Помогите, пожалуйста.

A:=Matrix([[6.68,1.12,0.95,1.32,0.83], [1.12,2.78,2.12,0.57,0.93],
[0.95,2.12,7.63,1.29,1.57], [1.32,0.57,1.29,3.07,1.25], [0.83,0.91,1.57,1.25,6.71]]):
B:=Matrix([[8.29],[3.21], [3.18],[6.25],[7.05]]):
X:=<<x1>, <x2>, <x3>, <x4>>:
T:=Matrix([[t11,t12,t13,t14,t15], [t12,t22,t23,t24,t25],
[t31,t32,t33,t34,t35], [t41,t42,t43,t44,t45], [t51,t52,t53,t54,t55]]):
Tau:=Matrix([[t11,t21,t31,t41,t51], [t12,t22,t32,t42,t52],
[t13,t23,t33,t43,t53], [t14,t24,t34,t44,t54], [t15,t25,t35,t45,t55]]):
for i from 1 by 1 to 5 do
for j from 1 by 1 to 5 do
if i=1 and j=1 then T[1,1]:=sqrt(A[1,1])
else if (i=1 and j>1) then T[j,1]:=A[j,1]/T[1,1]
else if (i>j) then T[j,i]:=0
else if i=j and i>1 then T[j,i]:=sqrt(A[j,i]-sum((T[j,l])^2,l=1..(j-1)))
else T[j,i]:=(A[j,i]-sum((T[i,m]*T[j,m]),m=1..(i-1)))
end if; end if; end if; end if; end do; end do;T;