program syukudai
integer i,j,k
real*8 A(3,3) , B(3,3) , C(3,3)
A(1,1)=1.0　A(2,1)=1.0　A(3,1)=1.0
A(1,2)=1.0　A(2,2)=1.0　A(3,2)=1.0
　　　 A(1,3)=1.0　A(2,3)=1.0　A(3,3)=1.0
B(1,1)=2.0　B(2,1)=2.0　B(3,1)=2.0
B(1,2)=2.0　B(2,2)=2.0　B(3,2)=2.0
B(1,3)=2.0　B(2,3)=2.0　B(3,3)=2.0
do 10 i=1,3
do 10 j=1,3
C(i,j)=(0.0)
do 10 k=1,3
C(i,j)=A(i,k)*B(k,j)+C(i,j)
10 continue
do 20 i=1,3
write(*,*) (C(i,j) , j=1,3)
20 continue

stop
end
jwd8211i-i "syukudai.f", line 25: ループを入れ換えました.(行:26)
jwd8211i-i "syukudai.f", line 25: ループを入れ換えました.(行:28)
jwd8331i-i "syukudai.f", line 25: このループはライブラリ呼出し(matmul)に変換されました.

3行3列の積なんですが、上記のようなエラーが出て困っています。2行2列ではうまくいったんですが…どなたか助けてください（泣）