[求助]一个程序看不懂，望高手指点

[Icastle]

以下一个程序看不懂，望高手指点，万分感谢。。。。。。
function J=huanxin(yuanshi,J)
A=[17,27,89,152,158,213,231,239,273,290,296,365,381,407,408,412,425,433,485,505,509,514];
for i=1:22
j=3+4*(A(i)-1);%第j行
for k=1:86
if yuanshi(j,k)==0
l=k-1;
break;
end
end
for m=1:(l-1)
a=yuanshi(j,m);
for n=m+1:l
b=yuanshi(j,n);
o=l-(n-m)+1;
if J(b,a)==0|J(b,a)>o
J(b,a)=o;
end
end
end
end
for p=1:3975