24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1513  |  回复: 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):给个红包,谢谢回帖交流
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的回帖

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的回帖
相关版块跳转 我要订阅楼主 lindlar0078 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 本科新能源科学与工程,一志愿华理能动285求调剂 +3 AZMK 2026-03-28 6/300 2026-03-28 17:29 by AZMK
[考研] 0703化学求调剂 +9 奶油草莓. 2026-03-22 10/500 2026-03-28 13:30 by 唐沐儿
[考研] 材料与化工(0856)304求B区调剂 +8 邱gl 2026-03-27 8/400 2026-03-28 12:42 by 唐沐儿
[考研] 286求调剂 +12 PolarBear11 2026-03-26 12/600 2026-03-28 12:14 by zllcz
[考研] 0856,材料与化工321分求调剂 +12 大馋小子 2026-03-27 13/650 2026-03-28 10:56 by self2008
[考研] 085602 307分 求调剂 +7 不知道叫什么! 2026-03-26 7/350 2026-03-28 09:57 by 神马都不懂
[考研] 一志愿南昌大学324求调剂 +7 hanamiko 2026-03-27 7/350 2026-03-28 09:56 by 李上岸0921
[考研] 340求调剂 +5 jhx777 2026-03-27 5/250 2026-03-28 04:18 by fmesaito
[考研] 303求调剂 +7 安忆灵 2026-03-22 8/400 2026-03-27 11:46 by sanrepian
[考研] 材料学硕333求调剂 +8 北道巷 2026-03-24 8/400 2026-03-27 10:18 by 我是小康
[考研] 343求调剂 +4 赠我一本书 2026-03-23 4/200 2026-03-27 00:40 by wxiongid
[考研] 085602 289分求调剂 +8 WWW西西弗斯 2026-03-24 8/400 2026-03-26 16:33 by 不吃魚的貓
[考研] 086000生物与医药292求调剂 +6 小小陈小小 2026-03-22 9/450 2026-03-26 15:58 by dick_runner
[考研] 07化学303求调剂 +5 睿08 2026-03-25 5/250 2026-03-25 22:46 by 418490947
[考研] 一志愿中南大学化学学硕0703总分337求调剂 +7 niko- 2026-03-22 7/350 2026-03-25 20:14 by qingfeng258
[考研] 0854AI CV方向招收调剂 +4 章小鱼567 2026-03-23 4/200 2026-03-25 17:04 by CoderLoser
[考研] 生物学学硕求调剂 +7 小羊睡着了? 2026-03-23 10/500 2026-03-25 02:24 by 清风拂扬。 m
[考研] 材料考研调剂生 +3 黄粱一梦千年 2026-03-24 3/150 2026-03-24 17:00 by barlinike
[考博] 26申博自荐 +3 whh869393 2026-03-24 3/150 2026-03-24 09:55 by 21018060
[考研] 接收2026硕士调剂(学硕+专硕) +4 allen-yin 2026-03-23 6/300 2026-03-23 15:04 by 汪!?!
信息提示
请填处理意见