Fortran Coder

查看: 21395|回复: 8
打印 上一主题 下一主题

[文件读写] FORTRAN 随机存储和读取文件中指定位置数据

[复制链接]

21

帖子

6

主题

0

精华

入门

F 币
83 元
贡献
50 点
跳转到指定楼层
楼主
发表于 2014-3-15 07:12:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
求大神指点快速随机存储和读取文件中指定位置数据的方法?
用了
OPEN(UNIT=IOFRM,ACCESS='DIRECT',STATUS='SCRATCH',FORM='UNFORMATTED',RECL=16)

存储和读取速度都非常慢~
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

2015

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1574 元
贡献
676 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

沙发
发表于 2014-3-15 07:39:15 | 只看该作者
无格式直接方式读取,是最快的方式了。如果你还想加快,恐怕只有在硬件和操作系统方面寻求突破了。
比如:
1.关闭杀毒软件,及其他有文件读写的程序。
2.选用新的硬盘接口。
3.选用新的固态硬盘。

另外,我不明白你说的随机存储是什么意思。

135

帖子

15

主题

0

精华

版主

F 币
1159 元
贡献
637 点

爱心勋章管理勋章

板凳
发表于 2014-3-15 10:01:28 | 只看该作者
补充一下,还可以用内存虚拟硬盘(ramdisk),利用软件将物理内存进行分割,将一部分内存通过虚拟技术转变为硬盘提升数据读取速度。

21

帖子

6

主题

0

精华

入门

F 币
83 元
贡献
50 点
地板
 楼主| 发表于 2014-3-16 01:14:31 | 只看该作者
fcode 发表于 2014-3-15 07:39
无格式直接方式读取,是最快的方式了。如果你还想加快,恐怕只有在硬件和操作系统方面寻求突破了。
比如:
...

我说的随机的意思是文件中存储了1000行7列数据,我可以直接用READ,WRITE操作第77行,第3列的数据~

21

帖子

6

主题

0

精华

入门

F 币
83 元
贡献
50 点
5#
 楼主| 发表于 2014-3-16 02:01:29 | 只看该作者
fcode 发表于 2014-3-15 07:39
无格式直接方式读取,是最快的方式了。如果你还想加快,恐怕只有在硬件和操作系统方面寻求突破了。
比如:
...

如下代码,有没有优化的建议
Code.for (580 Bytes, 下载次数: 37)

谢谢大神指点

2015

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1574 元
贡献
676 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

6#
发表于 2014-3-16 08:41:58 | 只看该作者
你说的随机,其实就是直接读取的概念。ACCESS='DIRECT'

这代码虽然不太规范,但执行效率应该没有太大改善余地了。

21

帖子

6

主题

0

精华

入门

F 币
83 元
贡献
50 点
7#
 楼主| 发表于 2014-3-16 10:22:56 | 只看该作者
fcode 发表于 2014-3-16 08:41
你说的随机,其实就是直接读取的概念。ACCESS='DIRECT'

这代码虽然不太规范,但执行效率应该没有太大改善 ...

那顺序读取和直接读取哪一个效率高?

2015

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1574 元
贡献
676 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

8#
发表于 2014-3-16 10:39:47 | 只看该作者
duty 发表于 2014-3-16 10:22
那顺序读取和直接读取哪一个效率高?

无格式比有格式效率高。
直接读取比顺序读取效率高。

所以,在语法层次上,你的读写方式应该是瓶颈了。

1

帖子

0

主题

0

精华

新人

F 币
20 元
贡献
4 点
9#
发表于 2020-11-16 17:21:15 | 只看该作者
学习了学习了学习了
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-11-15 01:45

Powered by Tencent X3.4

© 2013-2024 Tencent

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