Fortran Coder

查看: 7210|回复: 4
打印 上一主题 下一主题

[数值问题] 求助啊!

[复制链接]

5

帖子

3

主题

0

精华

入门

F 币
43 元
贡献
26 点
跳转到指定楼层
楼主
发表于 2018-11-11 18:28:08 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

请问为什么会有负值呢?我给出的IRLOC的定义维度都是正数,为什么会出现这种情况?
多谢啊!哪位大神求讲解!

评分

参与人数 1F 币 +10 收起 理由
liudy02 + 10 有个帖子莫名拿了你的F币,将F币还给你,我.

查看全部评分

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

798

帖子

2

主题

0

精华

大宗师

F 币
3793 元
贡献
2268 点
沙发
发表于 2018-11-12 09:54:22 | 只看该作者
数组越界。

QQ图片20181112095404.gif (29.33 KB, 下载次数: 201)

QQ图片20181112095404.gif
回复

使用道具 举报

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
板凳
发表于 2018-11-12 11:39:44 | 只看该作者
你定义都是正的,还是可能会越界的。

比如
real :: IRLOC(300)
integer :: i
i = -570
write(*,*) IRLOC(i)

5

帖子

3

主题

0

精华

入门

F 币
43 元
贡献
26 点
地板
 楼主| 发表于 2018-11-12 21:06:55 | 只看该作者

感谢!别人的原程序我什么也没改,它也提示我数组越界,是因为软件的问题吗?

评分

参与人数 1F 币 +10 收起 理由
liudy02 + 10 有个帖子莫名拿了你的F币,将F币还给你,我.

查看全部评分

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
5#
发表于 2018-11-13 08:52:56 | 只看该作者
一般是别人的代码有问题,或者你的用法不正确。

(不要轻易怀疑编译器有问题)
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-4-26 10:29

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表