我有一堆正在写出的参数,但我想在该行添加额外的256个字节。
open (1, file=filename, form='unformatted')
write (1) a,b,c,d,BLANKBYTES
write (1) array1
write (1) array2
close (1)
有没有办法添加这些额外的“空白”字节?
答案 0 :(得分:0)
use ISO_FORTRAN_ENV
integer (int8), dimension (256), parameter :: zero_bytes = 0
....
write (1) a,b,c,d, zero_bytes
答案 1 :(得分:0)
另一种方法。
write(1)a,b,c,d,(char(0),i=1,256)