24小时热门版块排行榜    

查看: 894  |  回复: 6
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

VChang

木虫 (正式写手)

[求助] Fortran求助 已有1人参与

本人完全不懂编程,现在需要利用Fortran编码进行数值模拟。基本原理是利用Fortran读取某外部文件,再利用编码中的一种算法计算。但是搞不清楚怎么让编译器运行打开特定的文件,我需要在编码中做哪些改动,请大神赐教,谢谢!
部分编码如下:
c     To make it easier to run batches of programs the following
c     information is now entered from a file
c
c     1. file for input
c     2. file for output
c     3. random number seed
c
c     filen1='gly3h1'
c     filen2='temp.out'
c     i2=96
c
c     From a file
c
      open(20,file='mobcal.run')
      read(20,'(a30)') filen1
      read(20,'(a30)') filen2
      read(20,*) i2
      close (20)

我是该把c     filen1='gly3h1'这一行改成我电脑里存储的那个文件名吗?但是怎么反映存储路径呢?谢谢!
回复此楼

» 猜你喜欢

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

weiwei43

至尊木虫 (正式写手)

读懂原文件是什么格式读入的,不就明白格式了吗?
7楼2015-10-02 22:12:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

流浪的风2222

木虫 (正式写手)

是的,文件放在程序运行路径就好了

发自小木虫Android客户端
2楼2015-10-01 14:46:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

VChang

木虫 (正式写手)

引用回帖:
2楼: Originally posted by 流浪的风2222 at 2015-10-01 07:46:41
是的,文件放在程序运行路径就好了

那我是不是改成filen1='D:\Users\Zhang\Downloads\gly3h1.txt'
输出文件改成filen2='D:\Users\Zhang\Downloads\output.txt'
就可以了吗?
3楼2015-10-01 23:42:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

流浪的风2222

木虫 (正式写手)

http://tieba.baidu.com/f?kz=2535 ... =0&pu=usm@0,sz@1320_1003,ta@iphone_2_4.1_1_10.7&bd_page_type=1&baiduid=79909D0BC28A1077C6F619B2654EC6DE&tj=www_normal_4_0_10_title
建议按这个试试,

发自小木虫Android客户端
4楼2015-10-02 07:10:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 生物学学硕求调剂 +7 小羊睡着了? 2026-03-23 10/500 2026-03-25 02:24 by 清风拂扬。 m
[考研] 085602 289分求调剂 +5 WWW西西弗斯 2026-03-24 5/250 2026-03-24 18:51 by jhhcooi
[考研] 0854 考研调剂 招生了!AI 方向 +5 pk3725069 2026-03-19 17/850 2026-03-24 17:30 by zhouxuan..
[考研] 300求调剂,材料科学英一数二 +5 leaflight 2026-03-24 5/250 2026-03-24 16:25 by laoshidan
[考研] 【双一流院校新能源、环境材料,材料加工与模拟招收大量调剂】 +4 Higraduate 2026-03-22 7/350 2026-03-24 11:23 by 种大树
[考研] 一志愿山东大学药学学硕求调剂 +3 开开心心没烦恼 2026-03-23 4/200 2026-03-24 00:06 by 开开心心没烦恼
[考研] 一志愿北京化工大学 070300 学硕 336分 求调剂 +7 vv迷 2026-03-22 7/350 2026-03-23 23:44 by Txy@872106
[考研] 接收2026硕士调剂(学硕+专硕) +4 allen-yin 2026-03-23 6/300 2026-03-23 15:04 by 汪!?!
[考研] 北科281学硕材料求调剂 +8 tcxiaoxx 2026-03-20 9/450 2026-03-23 12:16 by tcxiaoxx
[考研] 070300,一志愿北航320求调剂 +3 Jerry0216 2026-03-22 5/250 2026-03-23 09:16 by 。。堂堂
[考研] 289求调剂 +7 怀瑾握瑜l 2026-03-20 7/350 2026-03-22 15:57 by ColorlessPI
[考研] 求调剂 +5 Zhangbod 2026-03-21 7/350 2026-03-22 13:13 by Zhangbod
[考研] 286求调剂 +10 Faune 2026-03-21 10/500 2026-03-21 23:34 by 314126402
[考研] 求调剂 +4 要好好无聊 2026-03-21 4/200 2026-03-21 18:57 by 学员8dgXkO
[考研] 299求调剂 +5 shxchem 2026-03-20 7/350 2026-03-21 17:09 by ColorlessPI
[考研] 296求调剂 +6 www_q 2026-03-18 10/500 2026-03-20 23:56 by JourneyLucky
[考研] 274求调剂 +10 S.H1 2026-03-18 10/500 2026-03-20 23:51 by JourneyLucky
[考研] 一志愿中海洋材料工程专硕330分求调剂 +8 小材化本科 2026-03-18 8/400 2026-03-20 23:16 by JourneyLucky
[考研] 一志愿武汉理工材料工程专硕调剂 +9 Doleres 2026-03-19 9/450 2026-03-20 22:36 by JourneyLucky
[考研] 一志愿 西北大学 ,070300化学学硕,总分287,双非一本,求调剂。 +4 晨昏线与星海 2026-03-19 4/200 2026-03-20 22:15 by JourneyLucky
信息提示
请填处理意见