24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1515  |  回复: 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的回帖

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的回帖
查看全部 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的回帖

黄胖胖

木虫 (正式写手)

★ ★
小木虫(金币+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的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 0703化学 +10 妮妮ninicgb 2026-03-27 10/500 2026-03-28 14:07 by 哒哒哒呱呱呱
[考研] 283求调剂 +7 A child 2026-03-28 7/350 2026-03-28 12:05 by zllcz
[考研] 085405 考的11408求各位老师带走 +3 Qiu学ing 2026-03-28 3/150 2026-03-28 09:19 by 乐呵呵的追梦人
[考研] 286求调剂 +4 丢掉懒惰 2026-03-27 7/350 2026-03-28 08:07 by baoball
[考研] 331环境科学与工程求调剂 +3 熠然好运气 2026-03-27 3/150 2026-03-28 04:11 by fmesaito
[考研] 070300化学求调剂 +4 起个名咋这么难 2026-03-27 4/200 2026-03-27 21:39 by 83503孙老师
[考研] 一志愿 西北大学 总分282 英语一62 求调剂 +7 18419759900 2026-03-25 8/400 2026-03-27 16:38 by 18419759900
[考研] 07化学280分求调剂 +10 722865 2026-03-23 10/500 2026-03-27 15:51 by Plutoqq
[考研] 307求调剂 +8 超级伊昂大王 2026-03-24 9/450 2026-03-27 15:34 by 超级伊昂大王
[考研] 324求调剂 +5 hanamiko 2026-03-26 5/250 2026-03-27 10:33 by wangjy2002
[考研] 343求调剂 +4 赠我一本书 2026-03-23 4/200 2026-03-27 00:40 by wxiongid
[考研] 349求调剂 +4 李木子啊哈哈 2026-03-25 4/200 2026-03-26 22:49 by fmesaito
[考研] 085602化学工程求调剂。 +4 平乐乐乐 2026-03-26 4/200 2026-03-26 17:57 by fmesaito
[考研] 机械学硕310分,数一英一,一志愿211本科双非找调剂信息 +3 @357 2026-03-25 3/150 2026-03-26 16:34 by by.MENG
[考研] 一志愿河工大 081700 276求调剂 +4 地球绕着太阳转 2026-03-23 4/200 2026-03-26 14:27 by zzll406
[考研] 一志愿上海交大生物与医药专硕324分,求调剂 +6 jiajunX 2026-03-22 6/300 2026-03-25 23:05 by licg0208
[考研] 293求调剂 +7 加一一九 2026-03-24 7/350 2026-03-25 12:02 by userper
[考研] B区考研调剂 +4 yqdszhdap- 2026-03-22 5/250 2026-03-25 08:51 by baoball
[考研] 一志愿南航材料专317分求调剂 +5 炸呀炸呀炸薯条 2026-03-23 5/250 2026-03-24 16:52 by 星空星月
[考研] 384求调剂 +3 子系博 2026-03-22 6/300 2026-03-23 21:45 by 子系博
信息提示
请填处理意见