爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 2867|回复: 5

[求助] 关于fortran中文本文件读取问题

[复制链接]

新浪微博达人勋

发表于 2015-10-27 23:11:49 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
想把12*304的数据,用fortran读取,并存储在矩阵中,应该怎么写啊。

以前我读文本文件都是类似
read(1,*,end=100)a1,a2,a3
这样一行一行的读,然后有3列就存储在3个变量,但是列数多了就不指导怎么办了,求帮助啊。
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-28 08:38:17 | 显示全部楼层
做一个循环。
do i=1,304
read(1,*)a(:,i)
end do
(当然你要先定义一个矩阵a(12,304)来储存数据)
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-28 08:39:55 | 显示全部楼层
可以先把数据以矩阵的形式读入,再依次输出就好了
open(1,file=地址)
do i=12
do j=304
read(1,*) a(i,j)
end do
end do
close(1)
这就是读入数据
open(2,file=地址)
do i=12
do j=304
write(2,*) a(i,j)
end do
end do
close(2) 这就是输出

密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-28 08:59:55 | 显示全部楼层
do i=1,12
  read(23,*) data(i,j),j=1,304
enddo
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-28 10:35:30 | 显示全部楼层
topmad 发表于 2015-10-28 08:59
do i=1,12
  read(23,*) data(i,j),j=1,304
enddo

是不是考虑数组中数据存储方式应该写data(j,i)。貌似可以减少数据存储时地址的跳转。不过反正在这么点数据上体现不出来。
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-30 12:26:42 | 显示全部楼层
看看  
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

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