24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 523  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

panyes

新虫 (初入文坛)

[交流] 关于fortran精度、数据类型问题的求助 已有2人参与

我用的是Intel fortran 2011
我的程序里面有这样的语句
Lost0=(H0-H0fen)/(Q0*Q0)-resist0
write(21,*)h0,h0fen,q0,resist0,lost0

结果输出的是
  108.0000       69.50000       47.50000      1.0724409E-02           0

如果在程序开头加上doubleprecision lost0 或者 real lost0
输出的结果就变为 108.0000       69.50000       47.50000      1.0724409E-02  6.3393041E-03
这时lost0 就不为0了

我就搞不懂为什么不加说明的话lost0怎么就变成0了,难道默认是整型了?
但是我的其它数据也没有被默认成整型
之前用的campaq fortran好像没有这个情况,是版本的问题?还是只是我这次在哪个地方弄错了?
程序搞了一晚上,发现错误就出现在了这里。但是我没搞清楚错误的原因,怕以后还会出现类似的错误。
求各位大神帮忙指出错误,不胜感激!!
回复此楼

» 猜你喜欢

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

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

panyes

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by jerkwin at 2015-03-24 22:33:20
Fortran默认有个I-N规则, 以I-N这个字母开头的变量默认是整型, 你的LOST0就是这样

非常感谢!被你这么一说我想起来了!
3楼2015-03-25 13:18:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

jerkwin

专家顾问 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
Fortran默认有个I-N规则, 以I-N这个字母开头的变量默认是整型, 你的LOST0就是这样
2楼2015-03-24 22:33:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

seanbsd

木虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
需要你检查下你的源代码,如果在F90里面没有implicit none,而你又没说明你需要输出的数据是实数性数据,按照缺省规则L。。。输出的就是整型的,有小数点那结果显示为"0"
4楼2015-03-27 14:32:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 求生物学调剂 +9 15172915737 2026-04-01 9/450 2026-04-02 17:14 by Jaylen.
[考研] 265求调剂 +11 林深温澜 2026-04-01 13/650 2026-04-02 15:42 by 小醋坛子666
[考研] 085801 总分275 本科新能源 求调剂 +16 bradoner 2026-04-01 20/1000 2026-04-02 15:27 by BruceLiu320
[考研] 279求调剂 +4 傅文秋 2026-04-02 4/200 2026-04-02 15:02 by cal0306
[考研] 286分调剂 +20 Faune 2026-03-30 22/1100 2026-04-02 13:24 by clyblh
[考研] 266分,一志愿电气工程,本科材料,求材料专业调剂 +10 哇呼哼呼哼 2026-04-01 11/550 2026-04-02 11:31 by lnilvy
[考研] 计算机265跨调环境 +5 Yumeng_6 2026-03-27 5/250 2026-04-02 10:54 by guanxin1001
[考研] 279求调剂 +7 莫xiao 2026-04-01 7/350 2026-04-01 22:05 by 客尔美德
[考研] 085601材料工程找调剂 +20 oatmealR 2026-03-29 21/1050 2026-04-01 21:00 by lijunpoly
[考研] 材料调剂 +11 一样YWY 2026-03-31 11/550 2026-04-01 11:35 by wangjy2002
[考研] 环境工程 085701,267求调剂 +15 minht 2026-03-29 16/800 2026-04-01 10:13 by li_sujuan99
[考研] 080200学硕,机械工程专业277分,求带走! +4 瓶子PZ 2026-03-31 4/200 2026-03-31 20:16 by vgtyfty
[考研] 一志愿南昌大学324求调剂 +6 hanamiko 2026-03-29 6/300 2026-03-31 16:35 by hypershenger
[考研] 材料工程专硕求调剂 +10 hyl3153942 2026-03-29 10/500 2026-03-31 16:31 by hypershenger
[考研] 266分,求材料相关专业调剂 +10 哇呼哼呼哼 2026-03-30 12/600 2026-03-31 11:00 by 熊一刀
[考研] 22408 359分调剂 +4 Qshers 2026-03-27 8/400 2026-03-31 08:53 by Qshers
[考研] 285求调剂 +6 AZMK 2026-03-29 9/450 2026-03-30 21:02 by dophin1985
[考研] 317分 一志愿南理工材料工程 本科湖工大 求调剂 +12 芋泥小铃铛 2026-03-28 12/600 2026-03-30 17:06 by wangjy2002
[考研] 356求调剂 +4 gysy?s?a 2026-03-28 4/200 2026-03-29 10:32 by 唐沐儿
[考研] 求调剂 +7 争取九点睡 2026-03-28 8/400 2026-03-28 21:07 by 争取九点睡
信息提示
请填处理意见