0

我有一堆正在写出的参数，但我想在该行中添加额外的 256 个字节。

open (1, file=filename, form='unformatted')
write (1) a,b,c,d,BLANKBYTES
write (1) array1
write (1) array2
close (1)

有没有办法添加这些额外的“空白”字节？

4

2 回答 2

0 
use ISO_FORTRAN_ENV

integer (int8), dimension (256), parameter :: zero_bytes = 0

....

write (1) a,b,c,d, zero_bytes
于 2013-04-11T07:44:32.560 回答
0

另一种方法。

   write(1)a,b,c,d,(char(0),i=1,256)
于 2013-04-11T16:52:42.017 回答