j**u 发帖数: 6059 | 1 ☆─────────────────────────────────────☆
alligator (侏罗纪的幸存者) 于 (Fri Aug 10 13:37:00 2007) 提到:
把矩阵文件'aaa'读进来,方法1用隐式没有问题; 现在要用方法2挨个读进来,
正确的方法是什么?我的是错的....
parameter(max_row=10, max_col=10,n_row=3, n_col=3)
real mat(max_row, max_col), mat2(max_row, max_col)
! method 1:
open(1, file='aaa')
read (1,*) ((mat(i, j),j=1, n_col),i=1,n_row)
close(1)
!
! method 2 is wrong:
open(unit=2, file='aaa')
DO i = 1, n_row
DO j = 1, n_col
read(2, *) mat2(i, j)
E |
|