| 查看: 1261 | 回复: 9 | |||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | |||
[交流]
【求助】输入是什么?
|
|||
|
请教一下大家,如下这样一个输入片段,到底输入文件应该如何命名?运行总是没有输出。请路过高手帮解答解答,感激不尽! C---> INPUT EXPERIMENTAL DATA WRITE(*,*)'elem ?' READ(*,'(A2)')elem WRITE(FILM1,'(4A,2A,3A)')'ab-',elem,'.IN' OPEN(1,FILE=FILM1,status='old') READ(1,*) READ(1,*) READ(1,*)a,b,c,d,e,f,g,h .......... |
» 猜你喜欢
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
已经有3人回复
售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急
已经有4人回复
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
已经有3人回复
售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急
已经有4人回复
售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急
已经有4人回复
售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急
已经有7人回复
售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急
已经有10人回复
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
已经有7人回复
售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急
已经有6人回复
售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急
已经有8人回复
» 本主题相关价值贴推荐,对您同样有帮助:
【求助】DMA 应力应变曲线中应变从负值开始是什么原因???
已经有9人回复
【求助】热力学软件计算共格错配度的原理是什么?
已经有0人回复
【求助完毕】程序表示什么意思?
已经有5人回复
【求助】为什么要单独计算态密度呢?
已经有8人回复
【求助】晶格优化崩溃?
已经有1人回复
【求助】这是什么错误?
已经有6人回复
【求助】含时密度泛函(TD-DFT)在gaussian的输入文件中如何表示?
已经有7人回复
【求助】CASTEP中的STM profile计算无法选择导出文件?Results file selector?
已经有9人回复
【求助/交流】多肽鉴定结果中SEQ ID NO的意思是什么?
已经有1人回复
【求助】abinit用服务器算出错?
已经有7人回复
【求助】为什么使用readisotopes时老是出现2070错误?
已经有12人回复
【求助】TRANSIESTA计算输运和gDFTB有什么不同?
已经有1人回复
【求助】光伏组件是恒流源还是恒压源?
已经有8人回复
【求助】请什么源极输入,什么又是漏极输入?有什么区别吗?
已经有1人回复
【求助】怎样让abinit跑起来?
已经有11人回复
【求助】SYBYL-分子读入后COMFA不能给出数值时什么原因?
已经有6人回复
【求助】使用M02-2X方法的输入文件是什么?
已经有4人回复
【求助】G03中有VSXC方法吗?为什么我一输入进去就link died?
已经有6人回复
【求助】用什么软件能够输入结构计算pKa值??
已经有2人回复
【求助】如何在Word里输入一个好看的积分符号?
已经有24人回复
【求助】为什么我这个程序编译都没有问题,就是运行不出来?【已完结】
已经有9人回复
【求助】为什么相同的输入结构和计算方法在G03中可以运行,在G09就报错啊?
已经有10人回复
【求助】请问一下,我用VASP算SmFe磁性出现错误是什么原因?
已经有6人回复
【求助】为什么要这么做结构优化?
已经有3人回复
【求助】请问orca的可视化软件有什么?
已经有7人回复
» 抢金币啦!回帖就可以得到:
海南大学徐月山老师招收2027年申请考核制博士研究生1名(国家青年人才团队)
+1/84
海南大学徐月山老师招收2027年申请考核博士研究生1名(国家青年人才团队)
+1/83
东北林业大学徐加廷教授招申请考核博士生
+3/51
中国科学院过程工程研究所 科研助理(实验) 2026年招聘
+1/50
中国科学院过程工程研究所 全国重点实验室课题组 招收联合培养硕士研究生1-2名
+1/49
宁波大学招聘科研助理1名
+1/39
昆明医科大学“柔性生物电子与智能传感课题组”招聘科研助理
+1/37
中国石油大学(北京)国家级大人才团队博士招生2名:化学、材料、石油工程:油田化学
+2/35
投了一篇PRL
+1/8
海南大学王志同&吴道雄&杨金霖老师团队招收计算+实验联合培养博士生
+1/7
加州大学宋吉奎教授团队WGBS多组学揭示DNMT1 CXXC结构域保护CpG岛低甲基化的双重机制
+1/7
海南大学海洋与极地地质团队2027年博士研究生招生启事
+1/6
Nature Communications|Celcomen:空间因果解耦如何预测组织扰动
+1/5
中山大学深圳校区博导招生:转化生长因子TGF-β功能性抗体开发 (更新啦)
+1/5
招若干有分子生物,细胞培养背景的科研人员(中山大学)
+1/5
以色列理工学院朱成招收联合培养博士生-催化或材料模拟
+1/5
华中科技大学金健课题组招收电催化CO2还原博士生
+1/3
光学/光子学方向博后招聘-新加坡科技与设计大学SUTD
+1/3
重症肺炎克雷伯菌肺炎的单核细胞炎症与适应性免疫功能紊乱
+1/2
中科院东莞材料所新能源材料研究部招聘研究员/副研究员(中央事业编制)
+1/1
5楼2011-04-14 09:03:36
lchunmei001(金币+10): 2011-04-14 08:55:47
|
你这里都是在读取数据,没有输出啊…… C---> INPUT EXPERIMENTAL DATA WRITE(*,*)'elem ?' 上面这行是在屏幕上输出 elem 这样的字符 READ(*,'(A2)')elem 这里是读入一个长度为2的字符串,即你给 elem 的值 WRITE(FILM1,'(4A,2A,3A)')'ab-',elem,'.IN' 这里是给一个字符串 film1 赋值,它最终的值是是ab-??.IN,其中??是上一步获得的。但这里好象有点儿问题,应该是'(3A,2A,3A)',也可能是后面 'ab-' 这儿有问题。 OPEN(1,FILE=FILM1,status='old') 这是打开一个名为 film1,即 ab-??.IN 的文件 READ(1,*) 读入一行,但其值不被使用 READ(1,*) 同上 READ(1,*)a,b,c,d,e,f,g,h 为 a, b, c, d, e, f, g, h 赋值,这些值来自于上面的那个打开的文件…… 其实,随便找一本 Fortran 的书,看 I/O 部分的讲解即可…… |
2楼2011-04-13 22:02:01
3楼2011-04-13 22:05:42
lchunmei001(金币+10): 2011-04-14 08:55:54
|
在下不才斗胆来说两句。 细观Lz的代码,惊奇的发现,这段代码写的真的挺值得学习的。 1 C---> INPUT EXPERIMENTAL DATA 2 WRITE(*,*)'elem ?' 3 READ(*,'(A2)')elem 4 WRITE(FILM1,'(4A,2A,3A)')'ab-',elem,'.IN' 5 OPEN(1,FILE=FILM1,status='old') 6 READ(1,*) 7 READ(1,*) 8 READ(1,*)a,b,c,d,e,f,g,h 简单的来看,楼主需要输入的如下形式的东西。假设楼主的输入文件名为,ab-AA.IN. 则,lz在该程序中仅需输入“AA”, 这样应该可以保证没有问题。 实际上正如snoopyzhao 兄所说,语句4其本质就是一个字符串运算,而且他也指出,这里可能对于"ab-"的格式描述符"4A" 有问题。建议作者,仔细调试这一段,最简单的,可以在4后加上输出,看看是否有问题。 同时可以在open这里加上是否成功打开文件的判断标志。 |
4楼2011-04-14 08:00:43










回复此楼