integer,allocatable:: a(:,:,:)
allocate(a(100,1024,1024))
a = 1
print*, a
end
integer,allocatable:: a(:,:,:)
allocate(a(100,1024,1024))
read*, a
print*, a(100,100,100)
end
ifort main1.f90 -o main1
ifort main2.f90 -o main2
./main1 | ./main2
li913 发表于 2024-10-11 11:48
这个问题可能没法解决,编译器的事情。可以重定向到文件,而不是用管道,我在wsl测试了,gf 用时20s,ifort ...
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |