24小时热门版块排行榜    

Znn3bq.jpeg
查看: 2283  |  回复: 28

wxy尘埃

银虫 (小有名气)

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

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

» 猜你喜欢

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

微笑吧,为你的曾经拥有~~~
已阅   回复此楼   关注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  不算很古老吧……
2楼2011-09-26 18:33:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)

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

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


余泽成(金币+1): 谢谢参与应助! 2011-09-28 10:35:59
内容已删除
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 程序可以运行,并能得到你想要的结果,至于其它的便与该程序没有关系了……
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尘埃 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 289 分105500药学专硕求调剂(找B区学校) +6 白云123456789 2026-04-09 8/400 2026-04-10 21:13 by zhouxiaoyu
[考研] 求调剂 +5 不会飞的鱼@ 2026-04-10 5/250 2026-04-10 19:07 by chemisry
[考研] 265求调剂 +12 风说她早忘了 2026-04-10 13/650 2026-04-10 18:56 by chemisry
[考研] 求调剂 材料与工程 324分 专硕 +19 翩翩一书生 2026-04-10 21/1050 2026-04-10 11:41 by wp06
[考研] 材料工程302分求调剂 +18 zyx上岸! 2026-04-04 18/900 2026-04-10 10:07 by 314126402
[考研] 301求调剂 +6 静静想想 2026-04-05 6/300 2026-04-10 09:15 by Delta2012
[考研] 085404,285分求调剂 +12 薇薇考研 2026-04-07 14/700 2026-04-09 23:10 by parmtree
[考研] 085501机械专硕 302分 不挑专业求调剂 +5 汪某. 2026-04-09 5/250 2026-04-09 15:38 by 蒋皓禹
[考研] 一志愿鲁东大学071000生物学学硕初试分数276求调剂 +3 慕绝cc 2026-04-09 3/150 2026-04-09 09:57 by liuhuiying09
[考研] 化学308分求调剂 +21 你好明天你好 2026-04-07 23/1150 2026-04-08 22:32 by 凯凯要变帅
[考研] 331求调剂 +5 luoxin0706. 2026-04-08 5/250 2026-04-08 22:15 by zhouyuwinner
[考研] 专硕310求调剂 +7 捞捞我…. 2026-04-04 8/400 2026-04-08 20:24 by yutian743
[考研] 283求调剂 +19 A child 2026-04-04 19/950 2026-04-08 14:26 by xingguangj
[考研] 283分求调剂 +14 试试看呗 2026-04-04 14/700 2026-04-08 07:03 by lijunpoly
[考研] 专硕085403,291分,有两篇专利,一国一奖 +3 哈吉咪哈吉咪 2026-04-07 3/150 2026-04-07 18:21 by 蓝云思雨
[考研] 一志愿北京化工085600 310分求调剂 +20 0856材料与化工3 2026-04-04 22/1100 2026-04-07 15:14 by 上岸快快
[考研] 求调剂到材料 +5 程9915 2026-04-06 5/250 2026-04-06 15:21 by yulian1987
[考研] 第一志愿东南大学物理313,有科研竞赛获奖经历,希望物理复试调剂 +3 马内橙 2026-04-05 3/150 2026-04-06 10:32 by 蓝云思雨
[考研] 求调剂 +10 Hll胡 2026-04-04 10/500 2026-04-05 20:09 by nepu_uu
[考研] 288求调剂,一志愿华南理工大学071005 +6 ioodiiij 2026-04-04 6/300 2026-04-05 10:09 by guoweigw
信息提示
请填处理意见