24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1767  |  回复: 2
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

huazai9090

新虫 (初入文坛)

[交流] 求助Fortran如何读入矩阵值的数据文件 已有2人参与

有一个子程序需要调用一个mesh.dat文件
       0       0           4
       1       0           4
       2       0           4
       3       0           4
       4       0           4
       5       0           4
       6       0           5
       7       0          -1
       8       0          -1
       9       0          -1
      10       0           6
.....
       0       1           1
       1       1           0
       2       1           0
       3       1           0
       4       1           0
       5       1           0
       6       1           5
       7       1          -1
       8       1          -1
       9       1          -1
      10       1           6
................

第一列是矩阵的i,第二列是矩阵的j,第三列是数组R(i,j)的值
请问怎样不过多耗内存的读入这个文件的数据并都成功赋值给R(i,j)呀?数组R(i,j)总共是有R(0:128,0:128)
自己写的程序:
open(21,file='mesh.dat')
         
            do j=0,ny+1
                do i=0,nx+1
                    read(21,) ii,jj,R(i,j)
                end do
            end do

Fortran刚刚学还不是很懂,写出的read老是出错,因为重复出现i,j的值,所以有没有必要用ii,jj去保存mesh文件里的i,j值呀?这个mesh.dat文件已经复制到路径里面了,求大神教教我!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

weiwei43

至尊木虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
open(21,file='mesh.dat')
           
             do j=0,ny+1
                 do i=0,nx+1
                     read(21,*) ii,jj,R(ii,jj)
                 end do
             end do
close(21)
3楼2015-07-08 09:41:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

学虫dj

金虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
read的格式不对呀

[ 发自小木虫客户端 ]
穷则独善其事,达则兼济天下
2楼2015-07-07 23:55:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 266分,一志愿电气工程,本科材料,求材料专业调剂 +3 哇呼哼呼哼 2026-04-02 3/150 2026-04-02 10:41 by caotw2020
[考研] 324分 085600材料与化工 +20 呆鹅oor 2026-03-27 20/1000 2026-04-02 10:13 by oooqiao
[考研] 085801 总分275 本科新能源 求调剂 +10 bradoner 2026-04-01 12/600 2026-04-02 09:51 by bradoner
[考研] 【求调剂】新能源材料本科,一志愿211,初试321 +6 求调剂学校, 2026-04-02 6/300 2026-04-02 09:41 by 晴空210210
[考研] 282求调剂 +17 ycy1201 2026-04-01 19/950 2026-04-01 22:54 by peike
[考研] 310分求调剂 +4 成功上岸wang 2026-04-01 4/200 2026-04-01 20:35 by liu823948201
[考研] 0703求调剂 +4 zizimo 2026-03-31 4/200 2026-04-01 16:04 by yanflower7133
[考研] 08工科,295,接受跨专业调剂 +6 lmnlzy 2026-03-31 6/300 2026-04-01 11:02 by 逆水乘风
[考研] 085900土木水利336分求调剂 +3 Zhangjiangj 2026-03-31 5/250 2026-04-01 09:14 by Zhangjiangj
[考研] 085701环境工程,267求调剂 +17 minht 2026-03-26 17/850 2026-04-01 09:11 by xiayizhi
[考研] 初试301,代码085701环境工程,本硕一致,四六级已过,有二区一作,共发表5篇论文 +3 axibli 2026-04-01 3/150 2026-04-01 08:43 by i_cooler
[考研] 070300化学专业279调剂 +10 哈哈哈^_^ 2026-03-31 10/500 2026-03-31 23:13 by liu823948201
[考研] 352分-085602-一志愿985 +6 海纳百川Ly 2026-03-29 6/300 2026-03-31 21:06 by yuq
[考研] 318求调剂 +3 笃行致远. 2026-03-31 3/150 2026-03-31 20:27 by 求调剂zz
[考研] 一志愿华东师范大学有机化学专业,初试351分,复试被刷求调剂! +9 真名有冰 2026-03-29 10/500 2026-03-31 18:01 by xhai2011
[考研] 一志愿哈尔滨工业大学材料与化工方向336分 +13 辰沐5211314 2026-03-26 13/650 2026-03-31 14:37 by 记事本2026
[考研] 085600,专业课化工原理,320分求调剂 +6 大馋小子 2026-03-29 6/300 2026-03-31 10:03 by 氯化亚硝酰
[考研] 食品工程专硕一志愿中海洋309求调剂 +5 小张zxy张 2026-03-26 10/500 2026-03-31 00:29 by jp9609
[考研] 求调剂 +7 争取九点睡 2026-03-28 8/400 2026-03-28 21:07 by 争取九点睡
[考研] 265求调剂 +8 小木虫085600 2026-03-27 8/400 2026-03-27 22:16 by 无际的草原
信息提示
请填处理意见