24小时热门版块排行榜     石溪大学接受考研调剂申请>

【调剂】北京石油化工学院2024年16个专业接受调剂
查看: 738  |  回复: 2
【悬赏金币】回答本帖问题,作者风起天已蓝将赠送您 10 个金币

风起天已蓝

新虫 (初入文坛)

[求助] fortran数组越界已有1人参与

新人,提示55行k数组越界了但是找不到哪里错了,求大神解释一下
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:libolin3@tal.com
  • 附件 1 : o.for.zip
  • 2018-08-12 10:00:02, 1.06 M

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

风起天已蓝

新虫 (初入文坛)

2楼2018-08-21 20:18:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ziyue_pony

铜虫 (小有名气)

【答案】应助回帖

subroutine xn
   !   integer i
      include "o.for"
      dr=dble(r/n1)
        j1=n1+1
        j2=n2+1
        np=j1*j2
        nm=n1*n2
      do 6 i=1,1   [***********]
      do 6 j=1,n2+1
      k=(j-1)*j1+i  
      w1=(1.571/n2)*(j-1)
c     这边x数组越界了k太大了
      x(1,k)=0.01*COS(w1)
6        x(2,k)=0.01*SIN(w1)


程序52行,循环代码写错了,修改了就好了。
3楼2018-09-06 17:47:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 风起天已蓝 的主题更新
不应助 确定回帖应助 (注意:应助才可能被奖励,但不允许灌水,必须填写15个字符以上)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 求博导 +6 好okjh 2024-04-21 10/500 2024-04-25 14:04 by 好okjh
[论文投稿] Nature一直在编辑手里,考虑好几天了,是悬了吗 +10 彩虹初见 2024-04-24 10/500 2024-04-25 14:03 by NickyHCQ
[论文投稿] 研二光催化6月底四篇二区什么水平 5+4 wjtab 2024-04-22 11/550 2024-04-25 13:20 by 椰蛋树的曾经
[基金申请] 两类问题算是白选了~ +7 jurkat.1640 2024-04-23 11/550 2024-04-25 13:06 by 立诛杀曹无伤
[考博] 真的好想读博! +14 wangzhe_bs 2024-04-22 17/850 2024-04-25 11:36 by 庭前花未开
[基金申请] 前同事拿我以前未中的国自然标书申请今年的国自然,现在基金委发来调查函 +33 bjdxyxy 2024-04-19 53/2650 2024-04-25 08:05 by 大雁高飞
[考研] 博士生招生!! +5 2458827884 2024-04-19 5/250 2024-04-24 22:28 by 不懂的风清
[基金申请] 企业博后是否能申请CSC博士后项目?谢谢 66+3 龙包子 2024-04-19 6/300 2024-04-24 21:59 by 3115321
[基金申请] 化学结清有情发出来了 +3 starboy7286 2024-04-20 3/150 2024-04-24 15:52 by 嘿,黑贝
[考博] 博士招生 +4 zx179 2024-04-24 7/350 2024-04-24 15:01 by H考研成功
[有机交流] 紧急求助,有谁用过三甲基硅醇钾TMSOK吗? 1000+3 genius2008 2024-04-19 10/500 2024-04-24 12:37 by genius2008
[教师之家] 大家访学都是怎么找的啊? +3 luokereng 2024-04-22 3/150 2024-04-24 11:40 by xuechenli
[教师之家] 找工作过程中碰到好多人问南京某新换校长211的政策,规定如下 +15 ZHONGWU_U 2024-04-21 17/850 2024-04-24 05:12 by juta256
[公派出国] 東京大学 应用化学专业柳田研究室 招收修士/博士生 +5 蝶梦123 2024-04-19 5/250 2024-04-23 22:40 by 90472jvvh
[教师之家] 河海大学常州校区新进的讲师待遇如何?考核要求如何? +3 德国小球迷 2024-04-19 18/900 2024-04-22 19:23 by ZHONGWU_U
[高分子] 请问UV灯是365nm的,那么选光引发剂的波长选多少的?要完全一致吗? +4 engledd2004 2024-04-21 4/200 2024-04-22 16:08 by wangcz23
[考研] 问题已经解决。 +13 lekinna 2024-04-19 30/1500 2024-04-22 13:09 by 矛dei到
[论文投稿] 编辑是选国外的好还是国内的好。 +8 lizhengke06 2024-04-20 8/400 2024-04-22 08:58 by cuiyunjian
[论文投稿] 催稿后秒拒 +9 lizhengke06 2024-04-19 11/550 2024-04-21 22:29 by ggjjyyy
[考研] 312求调剂 +3 Leroic000 2024-04-19 3/150 2024-04-20 18:19 by xinaishan
信息提示
请填处理意见