我正在读取一个包含 512**3 个数据点的单精度数据的文件。基于一个阈值,我为每个点分配一个 1 或 0 的标志。我编写了两个程序做同样的事情,一个在 fortran 中,另一个在 python 中。但是 fortran 中的一个需要 0.1 秒,而 python 中的一个需要几分钟。正常吗?或者您能否指出我的python程序的问题:
fortran.f
program vorticity_tracking
implicit none
integer, parameter :: length = 512**3
integer, parameter :: threshold = 1320.0
character(255) :: filen
real, dimension(length) :: stored_data
integer, dimension(length) :: flag
integer index
filen = "vor.dat"
print *, "Reading the file ", trim(filen)
open(10, file=trim(filen),form="unformatted",
& access="direct", recl = length*4)
read (10, rec=1) stored_data
close(10)
do index = 1, length
if (stored_data(index).ge.threshold) then
flag(index) = 1
else
flag(index) = 0
end if
end do
stop
end program
蟒蛇文件:
#!/usr/bin/env python
import struct
import numpy as np
f_type = 'float32'
length = 512**3
threshold = 1320.0
file = 'vor_00000_455.float'
f = open(file,'rb')
data = np.fromfile(f, dtype=f_type, count=-1)
f.close()
flag = []
for index in range(length):
if (data[index] >= threshold):
flag.append(1)
else:
flag.append(0)
** * ** * ***编辑** * ***
感谢您的意见。我不确定如何在 fortran 中执行此操作。我尝试了以下方法,但这仍然很慢。
flag = np.ndarray(length, dtype=np.bool)
for index in range(length):
if (data[index] >= threshold):
flag[index] = 1
else:
flag[index] = 0
谁能给我看看?