24小时热门版块排行榜    

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

lindlar0078

木虫 (著名写手)

[交流] 【求助】0._q,以及-1._q的含义是什么

刚接触Fortran,看到程序中有
CBLOCK(I,NB)=W%CPTWFP(I+IADDPL,NB,NK,ISP)*GC(I)*(0._q,-1._q)
对于括号中(0._q,-1._q)的0._q,以及-1._q含义不是很清楚,希望解释一下,谢谢
回复此楼

» 猜你喜欢

一切从头开始!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

黄胖胖

木虫 (正式写手)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
nono2009(金币+1,VIP+0):用了这么多年fortran还第一次了解。学习了 12-11 13:26
一种常数的表达方法,具体看下面介绍:
integer constants are of the form 1234,
real constants are of the form 1234. or 1.234e3.
General real constants are of the form 1234._q or 1.234e3_q with q as above.
3楼2009-12-11 13:24:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

「°諃ル.」

铁杆木虫 (职业作家)

ゃōゃ我们会幸福哒 ...

★ ★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
jjdg(金币+2,VIP+0):欢迎「°諃ル.」版光临程序软件版! 12-11 13:07
好深奥哦
不懂
坐起等答案看看
学习学习
\(^o^)/~.....
oo○o○就算跌倒,也要豪迈的笑。*^__^*
2楼2009-12-11 12:55:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

maomao1210

金虫 (正式写手)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
senlia(金币+1,VIP+0):欢迎专家交流学习 嘻嘻 12-14 18:28
引用回帖:
Originally posted by 黄胖胖 at 2009-12-11 13:24:
一种常数的表达方法,具体看下面介绍:
integer constants are of the form 1234,
real constants are of the form 1234. or 1.234e3.
General real constants are of the form 1234._q or 1.234e3_q with q a ...

哦,我也学习了,原来一直以为是表达不同类型的呢,哈哈,
建议楼主编译这个简单的小程序,就明白了,呵呵
Implicit None
integer,parameter :: r8=8
real(r8) ,parameter :: emuch=2.3

write(*,*) emuch+ 2.3_r8
end
以前我一直觉得就是表达一个数据类型而已,呵呵,今天学习了。
4楼2009-12-14 17:47:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 0856求调剂 +6 楒桉 2026-03-28 6/300 2026-03-29 00:31 by 544594351
[考研] 071000生物学求调剂,初试成绩343 +7 小小甜面团 2026-03-25 7/350 2026-03-28 20:25 by 唐沐儿
[考研] 材料求调剂一志愿哈工大324 +7 闫旭东 2026-03-28 9/450 2026-03-28 08:51 by Xu de nuo
[考研] 295求调剂 +5 1428151015 2026-03-27 6/300 2026-03-28 04:04 by fmesaito
[考研] 一志愿211院校 344分 东北农业大学生物学学硕,求调剂 +5 丶风雪夜归人丶 2026-03-26 8/400 2026-03-27 19:22 by 丶风雪夜归人丶
[考研] 08开头275求调剂 +4 拉谁不重要 2026-03-26 4/200 2026-03-27 14:12 by Delta2012
[考研] 调剂推荐 +5 清酒714 2026-03-26 6/300 2026-03-27 11:12 by 不吃魚的貓
[考研] 材料求调剂 +5 .m.. 2026-03-25 5/250 2026-03-27 11:08 by 不吃魚的貓
[考研] 一志愿吉大071010,316分求调剂 +3 xgbiknn 2026-03-27 3/150 2026-03-27 10:36 by guoweigw
[考研] 0703化学338求调剂! +6 Zuhui0306 2026-03-26 7/350 2026-03-27 10:35 by shangxh
[考研] 材料调剂 +8 匹克i 2026-03-23 8/400 2026-03-27 08:11 by hypershenger
[考研] 总分322求生物学/生化与分子/生物信息学相关调剂 +5 星沉uu 2026-03-26 6/300 2026-03-26 19:02 by macy2011
[考研] 材料考研求调剂 +3 Dendel 2026-03-23 6/300 2026-03-26 17:51 by fmesaito
[考研] 一志愿中南大学化学学硕0703总分337求调剂 +7 niko- 2026-03-22 7/350 2026-03-25 20:14 by qingfeng258
[考研] 求b区院校调剂 +4 周56 2026-03-24 5/250 2026-03-25 17:12 by yishunmin
[考研] 0854电子信息求调剂 324 +4 Promise-jyl 2026-03-23 4/200 2026-03-25 11:36 by Sugarlight
[考研] 318求调剂 +3 plum李子 2026-03-23 3/150 2026-03-25 09:42 by 雾散后相遇lc
[考研] 340求调剂 +5 话梅糖111 2026-03-24 5/250 2026-03-25 06:53 by ilovexiaobin
[考研] 一志愿北化315 求调剂 +3 akrrain 2026-03-24 3/150 2026-03-24 19:35 by 了了了了。。
[考研] 材料考研调剂生 +3 黄粱一梦千年 2026-03-24 3/150 2026-03-24 17:00 by barlinike
信息提示
请填处理意见