Я хочу записать матрицу с большим количеством данных в файл строка за строкой. Например, у меня есть матрица 100 * 100, и я хочу иметь ее в форме 100 * 100 в файле. Тем не менее, это не работает. Ниже приведен мой код и некоторое описание. N и M целые числа около нескольких сотен. RECL - ожидаемая длина, я установил файл, но здесь, кажется, эта команда не работает. Выходные данные состоят из 198 строк, когда N установлено 99, а M установлено 200. Vec - комплексная матрица двойной точности. Как я могу вывести значения Vec, сохраняя его исходный формат N * M? Моя команда компиляции "ifort -o out test.f90".

open(unit=2, file='graph1.txt', ACTION="write", STATUS="replace",RECL=40*M+10)
do i=1,N
 do j=1,M
  write(2, '(F)', advance='no') real(Vec(i,j)) 
 end do
  write(2, *) '' 
end do

Следуя совету @george, я написал такую программу:

program test
implicit none

integer i,j

open(unit=2, file='graph1.txt', ACTION="write", STATUS="replace")
do i=1,500
 write(2, '(1600F14.7)')( 0.00001 ,j=1,499)
end do

close(2)

end

С этим кодом проблема решена! Может быть, я не правильно скомпилировал в прошлый раз.