行列出力の方法(do 形反復)

行列を出力する時、do loop文で各成分を順に書き出しても良いが、

        do i=1,L
          write (*,*) (A(i,j), j=1,N)
        end do

とした方がスマート。行列の入力にも同じ方法が使える。