Fortran Coder

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

[流程控制] fortran 循环调用数组值时为什么会超过数组上界

[复制链接]

259

帖子

0

主题

0

精华

版主

World Analyser

F 币
717 元
贡献
510 点

新人勋章美女勋章元老勋章热心勋章规矩勋章管理勋章

QQ
楼主
发表于 2020-3-10 09:29:40 | 显示全部楼层
本帖最后由 kyra 于 2020-3-10 09:30 编辑

integer,parameter :: N = floor(L/ls)
ls = 0.545, L= 100

所以 N = 183
real,parameter :: xx(4)=(/x00, x00+2*lt, x00+2*lc, x00+2*(lc+lt)/)
xx的大小是4

  do I1 = 1,NM
    do J1 = 1,N
      Zpp(I1,J1)= ((2/(mr*L))**0.5)*sin(I1*pi*xx(J1)/L)!//此处J1循环到N,当循环到5时,xx越界(因为xx大小为4)
    end do
  end do
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-11-1 06:56

Powered by Tencent X3.4

© 2013-2024 Tencent

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