求教如何将dat文件中的实部虚部重新read出来成复数？

li913 · 发表于 2022-9-6 11:36:22

本帖最后由 li913 于 2022-9-6 11:48 编辑

当两个实数读取，再组成复数
real a,b
complex c
read(10,*) a, b
c = cmplx(a,b)
如果编译器比较新，也可以直接用复数分量读取
complex c
read(10,*) c%re, c%im

如果数据本就是复数形式
read(10,*) c

li913 · 发表于 2022-9-6 16:21:46

循环读取

[输入输出] 求教如何将dat文件中的实部虚部重新read出来成复数？