应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

Znn3bq.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 【求助】程序编译出错！求教呀？？？？
81/1返回列表
查看: 580  |  回复: 7
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前主题已经存档。

lindlar0078

木虫 (著名写手)

[交流] 【求助】程序编译出错！求教呀？？？？ 已有4人参与

程序中有：
real(kind=dp), dimension(:,, allocatable :: efermi

kind=dp，表示什么含义呀？需不需要再定义dp的类型？在编译程序时总是出现Error: A kind type parameter must be a compile-time constant.   [DP]
      real(kind=dp)      :: efermi

不知道如何修改？请高手指点？
回复此楼

» 猜你喜欢
一切从头开始！
1楼 2010-03-12 16:56:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tjyl

金虫 (正式写手)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+1):谢谢应助！ 2010-03-14 09:17
kind=4,8,16...
表示储存变量用的字节数。
引用回帖:
Originally posted by lindlar0078 at 2010-03-12 16:56:50:
程序中有：
real(kind=dp), dimension(:,, allocatable :: efermi

kind=dp，表示什么含义呀？需不需要再定义dp的类型？在编译程序时总是出现Error: A kind type parameter must be a compile-time constant ...

赞一下(2人) 回复此楼
2楼2010-03-14 00:02:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hakekill

木虫 (小有名气)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
nono2009(金币+1):鼓励应助！ 2010-03-14 16:59
kind=4，8，16的含义是楼上说的那样

这里引入dp是为了方便在单精度和双精度之间做切换，而且在修改精度的时候也更加方便。
一般在使用dp之前，都会使用下面的语句来设定dp的值
integer, parameter :: dp = 4
赞一下(2人) 回复此楼
3楼2010-03-14 14:55:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

figgers

铜虫 (初入文坛)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+1):谢谢参与应助！ 2010-04-03 15:22
INTEGER, PARAMETER :: DP = KIND(1.0D0)
赞一下(2人) 回复此楼
4楼2010-04-03 15:00:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

figgers

铜虫 (初入文坛)
★ ★
wangen994(金币+1):感谢参与应助 2010-04-03 15:29
wangen994(金币+1):活动期间额外奖励 2010-04-03 15:29
引用回帖:
Originally posted by hakekill at 2010-03-14 14:55:04:
kind=4，8，16的含义是楼上说的那样

这里引入dp是为了方便在单精度和双精度之间做切换，而且在修改精度的时候也更加方便。
一般在使用dp之前，都会使用下面的语句来设定dp的值
integer, parameter :: dp = 4

dp就这么被你定义成4了，那sp岂不是2？
赞一下(2人) 回复此楼
5楼2010-04-03 15:01:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hakekill

木虫 (小有名气)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
jjdg(金币+1):感谢参与交流 2010-04-06 19:04
引用回帖:
Originally posted by figgers at 2010-04-03 15:01:39:


dp就这么被你定义成4了，那sp岂不是2？

哈哈，我这里只是举一个例子，即通过dp的值可以设定变量的精度，对双精度设置为8，对单精度设置为4.
赞一下(2人) 回复此楼
6楼2010-04-06 16:37:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

idgnauh

银虫 (小有名气)
★
小木虫(金币+0.5):给个红包，谢谢回帖交流
jjdg:欢迎回帖交流 2010-04-07 09:13
原来如此...又学到了好东西
赞一下(2人) 回复此楼
7楼2010-04-07 08:11:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zjlxxjy

禁虫 (小有名气)
本帖内容被屏蔽
8楼2010-04-10 10:34:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 lindlar0078 的主题更新
81/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 v9tggjlwd0 2026-05-15 4/200 2026-05-17 08:06 by 11n4dfd8yn
[论文投稿] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +5 xx7gd5zq4e 2026-05-15 7/350 2026-05-17 07:58 by 11n4dfd8yn
[考研] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 l7k6xnh0yc 2026-05-14 8/400 2026-05-17 07:26 by 11n4dfd8yn
[考博] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +6 l7k6xnh0yc 2026-05-14 6/300 2026-05-17 07:11 by 11n4dfd8yn
[硕博家园] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +5 cjf4bx70cj 2026-05-14 7/350 2026-05-17 06:55 by 11n4dfd8yn
[找工作] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +3 k37jurhrau 2026-05-16 3/150 2026-05-17 01:37 by ue3ir18jc3
[基金申请] 精华III:  评审感受-评审感受-评审感受 +16 ferrarichen 2026-05-11 20/1000 2026-05-17 01:10 by 南开小綦
[考博] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +3 ky2p12rrjj 2026-05-15 4/200 2026-05-17 00:57 by ue3ir18jc3
[基金申请] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +3 ky2p12rrjj 2026-05-15 3/150 2026-05-17 00:55 by ue3ir18jc3
[论文投稿] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +5 x0mp7owy2b 2026-05-15 5/250 2026-05-17 00:29 by xiangfeng
[考研] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 x0mp7owy2b 2026-05-15 4/200 2026-05-17 00:25 by ue3ir18jc3
[公派出国] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +3 v9tggjlwd0 2026-05-15 4/200 2026-05-17 00:15 by ue3ir18jc3
[考研] 售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急 +3 xx7gd5zq4e 2026-05-15 5/250 2026-05-16 23:57 by ue3ir18jc3
[考博] 现在不知道怎么办，感觉很痛苦 +5 qweww 2026-05-11 6/300 2026-05-16 19:57 by Equinoxhua
[高分子] 本人最近太闲了，谁有问题可以提，每天会统一回复 +9 一切都是空工 2026-05-12 20/1000 2026-05-16 19:52 by Equinoxhua
[文学芳草园] 裁员滚滚，退居二线 +4 J_wei 2026-05-10 4/200 2026-05-16 10:52 by zh10246
[考博] 2026博士还有哪些学校有名额 +5 小王求读研 2026-05-15 6/300 2026-05-16 10:44 by a4742549
[文学芳草园] 风把牡丹吹跑了 +5 myrtle 2026-05-12 9/450 2026-05-15 15:27 by myrtle
[教师之家] 教学课件你会给同学吗 +8 硕士研究生吗 2026-05-13 8/400 2026-05-14 22:23 by 常规沥青
[论文投稿] 求助大佬sci投稿哪个好中 +3 江沅188 2026-05-12 4/200 2026-05-13 14:35 by 江沅188
信息提示
关闭
请填处理意见
关闭