应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 如何改变fortran的浮点精度
291/3返回列表123下一页
查看: 2537  |  回复: 28
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

wxy尘埃

银虫 (小有名气)

[求助] 如何改变fortran的浮点精度

上面的程序是90年代用fortran语言编写的程序，，改变这个程序里边的一些参数，浮点精度与现在的计算机相匹配，望各位高手指点，不胜感激！
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
微笑吧，为你的曾经拥有~~~
1楼 2011-09-25 22:12:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★
余泽成(金币+2): 谢谢参与应助！ 2011-09-26 21:41:41
wxy尘埃(金币+20): 2011-09-28 09:13:25
大概看了一下，基本上也都是用了最高的精度了，即所谓的 double precision...
如果你觉得不保险的话，可以在每个子程序的第一行加上 implicit double precision (a-H,o-z) 啥的

或者使用编译器提供的一些选项，如 gfortran  中的 -fdefault-real-8 啥的？
话说，你想要啥样的精度？90 年代的 fortran  不算很古老吧……
赞一下(1人) 回复此楼
2楼2011-09-26 18:33:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)
jjdg: 你只要用编译器编成exe即可，再老都可以用的 2011-09-27 00:35:04
有人说老，硬是下任务要改！
很谢谢你的一如既往的应助！
赞一下(1人) 回复此楼
微笑吧，为你的曾经拥有~~~
3楼2011-09-26 22:12:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★
余泽成(金币+1): 谢谢参与应助！ 2011-09-28 10:35:59
内容已删除
赞一下(1人) 回复此楼
4楼2011-09-27 00:51:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)
上传的文件中contin.exe是修改了程序的（具体如何修改的不知道）
当用matlab来运行时出了一定的错误，第三个图无法成功运行以及die.txt结果无输出，这怎么解决
赞一下 回复此楼
微笑吧，为你的曾经拥有~~~
5楼2011-09-27 10:43:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★
余泽成(金币+1): 谢谢参与应助！ 2011-09-28 10:36:12
引用回帖:
5楼: Originally posted by wxy尘埃 at 2011-09-27 10:43:47:
上传的文件中contin.exe是修改了程序的（具体如何修改的不知道）
当用matlab来运行时出了一定的错误，第三个图无法成功运行以及die.txt结果无输出，这怎么解决

俺不懂 matlab，所以，不知道你说的这是个什么情况……

对我来说，首先要确保你的 Fortran 程序可以运行，并能得到你想要的结果，至于其它的便与该程序没有关系了……
赞一下(1人) 回复此楼
6楼2011-09-27 14:53:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)
如果按源程序编译的话，运行出来的结果是不完善的（与上面5楼给的contin.exe（不知道是谁改进的）比较，)，得不想要的结果，不知道问题出在哪里
赞一下 回复此楼
微笑吧，为你的曾经拥有~~~
7楼2011-09-27 15:24:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)
这两个文件是分别用源程序编译的结果与改进后运行的结果，差别很大（我需要的结果是要得到粒径分布），请问该怎么解决？
赞一下 回复此楼
微笑吧，为你的曾经拥有~~~
8楼2011-09-27 15:41:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

你用了相同的输入文件？修改后的程序的源文件你有吗？把输入文件、修改后的程序的源文件啥的传上来看看……
赞一下 回复此楼
9楼2011-09-27 15:49:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)
就是没有修改后的代码（只有.exe)，只有源代码，确定输入文件是一致的
赞一下 回复此楼
微笑吧，为你的曾经拥有~~~
10楼2011-09-27 16:41:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wxy尘埃 的主题更新
291/3返回列表123下一页
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急 +3 PbwVEMK5haaE 2026-08-25 4/200 2026-08-26 03:20 by cNXvBfCpiZOM
[考博] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +3 Qj98d49dHFb9 2026-08-25 4/200 2026-08-26 03:08 by cNXvBfCpiZOM
[考研] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +3 7K1CJE38xLG4 2026-08-25 4/200 2026-08-26 02:04 by cNXvBfCpiZOM
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件，有关系吗？ +17 木水思豆 2026-08-25 20/1000 2026-08-26 01:26 by chengyan1220
[基金申请] 今天务委会开完了，明天出结果吗 +18 angus9576 2026-08-25 22/1100 2026-08-26 00:41 by merchancy
[基金申请] 在坚冰还盖着北海的时候，我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 有没有大神帮我看看基金代码 28+4 1234567wang 2026-08-24 10/500 2026-08-25 19:15 by lfy8008
[基金申请] 某些机构，以效率低为荣，以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[基金申请] 今日不放榜？网传国自然预计 8 月 27 日可查结果 +17 医学老男孩 2026-08-20 22/1100 2026-08-25 15:36 by 医学老男孩
[基金申请] 如果此刻你正在为国基感到焦虑，不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
[基金申请] 人气不行了 +11 fansofjerry 2026-08-21 11/550 2026-08-25 11:04 by 孤独的英雄6
[教师之家] 导师吐槽：我怎么摊上了这么个极品研究生！ +3 苏东坡二世 2026-08-23 3/150 2026-08-25 10:35 by shisan1313
[基金申请] 今天基金会出结果吗？20260819 +17 kkkl_v 2026-08-19 18/900 2026-08-25 09:41 by windflowerwy
[基金申请] 我面上完蛋了 +13 且听虎啸 2026-08-20 14/700 2026-08-25 09:10 by mrkang
[基金申请] 只有每年这种时候来逛逛小木虫 +25 yaoyewhu2008 2026-08-20 27/1350 2026-08-25 08:01 by Equinoxhua
[基金申请] 能否退出参与的面上项目解除限项 +21 koalala 2026-08-24 24/1200 2026-08-24 19:25 by 家与远方
[基金申请] filecode，4个jtjc了 +14 ziyangfang 2026-08-19 17/850 2026-08-24 18:37 by 哈哈蛤？
[基金申请] 应该是下周三26日公布了吧？ +4 哈哈蛤？ 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
信息提示
关闭
请填处理意见
关闭