24小时热门版块排行榜    

CyRhmU.jpeg
查看: 1359  |  回复: 13

园中园

新虫 (正式写手)

[求助] 求大神指点,如何用Fortran 语言读取数据已有2人参与

求大神指点,如何用Fortran 语言读取数据  ,由于数据中存在非常小的数据(显示*****)

   1 ******  1.754  2.326 ****** ****** ****** ****** ****** ******
   1  0.002 -0.343 -0.602 -0.196 -0.001 -0.001 -0.001  0.001  0.000
   2 ****** ****** ****** ****** ****** ****** ****** ****** ******
回复此楼
追求,奋斗,再追求,再奋斗
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

园中园

新虫 (正式写手)

数据见附件

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : data.txt
  • 2016-07-08 21:46:21, 1.59 K
追求,奋斗,再追求,再奋斗
2楼2016-07-08 21:46:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

未岸亡灵

铁杆木虫 (著名写手)

暂时离开小木虫


【答案】应助回帖

★ ★ ★ ★
感谢参与,应助指数 +1
园中园: 金币+4 2016-07-08 21:52:38
*****无论如何都读不出来,你应该考虑如何得到不带***的txt文本
3楼2016-07-08 21:51:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

园中园

新虫 (正式写手)

引用回帖:
3楼: Originally posted by 未岸亡灵 at 2016-07-08 21:51:34
*****无论如何都读不出来,你应该考虑如何得到不带***的txt文本

您好,这是Vasp 计算出来的 PROCAR中的相位因子,出现了*****,读不了,
追求,奋斗,再追求,再奋斗
4楼2016-07-08 21:54:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

未岸亡灵

铁杆木虫 (著名写手)

暂时离开小木虫


【答案】应助回帖

★ ★
园中园: 金币+2 2016-07-09 15:55:31
引用回帖:
4楼: Originally posted by 园中园 at 2016-07-08 21:54:32
您好,这是Vasp 计算出来的 PROCAR中的相位因子,出现了*****,读不了,...

那你得改改VASP源码了,调整下它的输出格式。或者近似成0来处理

发自小木虫Android客户端
5楼2016-07-09 11:54:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

园中园

新虫 (正式写手)

引用回帖:
5楼: Originally posted by 未岸亡灵 at 2016-07-09 11:54:24
那你得改改VASP源码了,调整下它的输出格式。或者近似成0来处理
...

谢谢您了,我试试
追求,奋斗,再追求,再奋斗
6楼2016-07-09 15:56:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dffy

铁杆木虫 (正式写手)

7楼2016-07-10 18:58:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

园中园

新虫 (正式写手)

引用回帖:
7楼: Originally posted by dffy at 2016-07-10 18:58:04
正则表达式

大神,怎么来了这句话?不太明白

发自小木虫Android客户端
追求,奋斗,再追求,再奋斗
8楼2016-07-10 22:53:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dffy

铁杆木虫 (正式写手)

引用回帖:
8楼: Originally posted by 园中园 at 2016-07-10 22:53:53
大神,怎么来了这句话?不太明白
...

报歉,看错了要求,还以为是处理结果文本

发自小木虫Android客户端
9楼2016-07-11 14:37:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

--power

金虫 (小有名气)

real*8 a(9)       open(unit = 1, file = 'data.dat')

发自小木虫Android客户端
10楼2016-07-11 18:37:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 园中园 的主题更新
信息提示
请填处理意见