Fortran Coder

查看: 146|回复: 4

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

[复制链接]

3

帖子

1

主题

0

精华

新人

F 币
14 元
贡献
7 点
发表于 2022-9-5 20:39:02 | 显示全部楼层 |阅读模式
3F 币
请问已经将一个程序的一组复数的实部与虚部write出来了dat文件,想要在另一个程序中使用这种数据,如何将它重新读取出来成复数?

683

帖子

2

主题

0

精华

大宗师

F 币
3351 元
贡献
2071 点
发表于 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


回复

使用道具 举报

3

帖子

1

主题

0

精华

新人

F 币
14 元
贡献
7 点
 楼主| 发表于 2022-9-6 14:49:50 | 显示全部楼层
li913 发表于 2022-9-6 11:36
当两个实数读取,再组成复数
real a,b
complex c

好的,谢谢!
回复

使用道具 举报

3

帖子

1

主题

0

精华

新人

F 币
14 元
贡献
7 点
 楼主| 发表于 2022-9-6 15:38:52 | 显示全部楼层
但是不是两个实数,是两组实数的话应该怎么导入呢?
回复

使用道具 举报

683

帖子

2

主题

0

精华

大宗师

F 币
3351 元
贡献
2071 点
发表于 2022-9-6 16:21:46 | 显示全部楼层
循环读取
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2022-9-28 17:19

Powered by Tencent X3.4

© 2013-2022 Tencent

快速回复 返回顶部 返回列表