24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 573  |  回复: 2
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

田山东

捐助贵宾 (著名写手)

[求助] lunix下定义三维数组出错,可以帮忙看下吗?谢谢

我定义了一个动态数组,
    COMPLEX(16),DIMENSION(:,,allocatable ::GG,SHH,GA
     & ,Rho1,Rho2,Rho
     
      COMPLEX(16),DIMENSION(:,:,,allocatable :: F,HG,S
      ALLOCATE(GG(MN,MN),SHH(MN,MN),GA(MN,MN),Rho1(MN,MN),Rho2(N,L),
     & Rho(MN,MN))
      
       ALLOCATE(F(N,N,L),HG(N,N,L),S(N,N,L))
在我自己电脑上用的挺好,但是在Lunix下出问题了!!提示
为什么 会这样呢?

      COMPLEX(16),DIMENSION(:,,allocatable ::GG,SHH,GA
                1
Error: Kind 16 not supported for type COMPLEX at (1)
xingnewarmchair.f:20.16:

      COMPLEX(16),DIMENSION(:,:,,allocatable :: F,HG,S
                1
Error: Kind 16 not supported for type COMPLEX at (1)
xingnewarmchair.f:31.16:

       ALLOCATE(GG(MN,MN),SHH(MN,MN),GA(MN,MN),Rho1(MN,MN),Rho2(N,L),
                1
Error: Allocate-object at (1) is not a nonprocedure pointer or an allocatable variable
xingnewarmchair.f:34.16:

       ALLOCATE(F(N,N,L),HG(N,N,L),S(N,N,L))
                1
Error: Allocate-object at (1) is not a nonprocedure pointer or an allocatable variable
xingnewarmchair.f:94.6:

      SHH(N+1:2*N,N+1:2*N)=SL1
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:95.6:

      SHH(2*N+1:3*N,2*N+1:3*N)=SL1
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:111.6:

      F(:,:,1)=-MATMUL(TA,B1)
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:118.29:

          TA=AL2+MATMUL(C2,F(:,:,j-1))-SL1  !\xB5\xDA2\xCC\xF5\xC1\xB4\xD3\xD0\xB5\xE7\xBC\xAB
                             1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:120.29:

          TA=AL2+MATMUL(C2,F(:,:,j-1))
                             1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:125.6:

      F(:,:,j)=-MATMUL(TA,B2)
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:128.28:

         TA=AL1+MATMUL(C1,F(:,:,j-1))-SL1
                            1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:130.28:

         TA=AL1+MATMUL(C1,F(:,:,j-1))
                            1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:135.6:

      F(:,:,j)=-MATMUL(TA,B1)
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:140.25:

      TA=AR1+MATMUL(C1,F(:,:,j-1))
                         1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:144.6:

      F(:,:,j)=-MATMUL(TA,B1)
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:146.25:

      TA=AR2+MATMUL(C2,F(:,:,j-1))
                         1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:150.6:

      F(:,:,j)=-MATMUL(TA,B2)
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:156.25:

      TA=AR2+MATMUL(C2,F(:,:,L-1))-SR
                         1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:159.6:

      HG(:,:,L)=TA
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:166.6:

      S(:,:,L-1)=-MATMUL(TA,C2)
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:169.25:

      TA=AR1+MATMUL(C1,F(:,:,L-2))+MATMUL(B1,S(:,:,L-1))  ! TA=AR1+MATMU
                         1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:173.6:

      HG(:,:,L-1)=TA
      1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:178.31:

            TA=AR1+MATMUL(B1,S(:,:,j+1))  !TA=AR1+MATMUL(B1,S(:,:,j+1))
                               1
Error: Syntax error in argument list at (1)
xingnewarmchair.f:183.13:

             S(:,:,j)=-MATMUL(TA,C1)
             1
Error: Unclassifiable statement at (1)
xingnewarmchair.f:186.32:

             TA=AR2+MATMUL(C2,F(:,:,j-1))+MATMUL(B2,S(:,:,j))  ! TA=AR2+
                                1
Error: Syntax error in argument list at (1)
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

田山东

捐助贵宾 (著名写手)

是这个问题,complex*16就可以运行了
everythinghasitsseason.enjoyyourlife.
3楼2012-06-14 20:25:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

libralibra

至尊木虫 (著名写手)

骠骑将军

【答案】应助回帖

感谢参与,应助指数 +1
不确定你的程序具体干什么
但是报错很清楚,Kind 16 not supported for type COMPLEX at (1)
COMPLEX(16)的时候,这个16不被COMPLEX支持,估计是win下和linux下的库或者依赖项不大相同,造成的错误
后面还有其他错误,但是debug得一个一个来,有可能后面的错误是由第一个造成的
你先检查编译器和依赖库
matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
2楼2012-06-14 19:12:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 292分,材料与化工,申请调剂 +19 程晴之 2026-04-01 23/1150 2026-04-02 11:59 by 程晴之
[考研] 材料调剂 +7 一样YWY 2026-04-02 7/350 2026-04-02 11:40 by 星空星月
[考研] 272求调剂,接受跨专业调剂! +4 闲鱼卢 2026-03-31 4/200 2026-04-02 11:18 by guyan1000
[考研] 材料求调剂 +10 呢呢妮妮 2026-04-01 13/650 2026-04-02 09:17 by olim
[考研] 材料调剂 +12 一样YWY 2026-04-01 12/600 2026-04-02 09:15 by olim
[考研] 一志愿南昌大学324求调剂 +11 hanamiko 2026-04-01 11/550 2026-04-02 09:00 by sanrepian
[考研] 08生物与医药专硕初试346找调剂 +6 dianeeee 2026-04-01 7/350 2026-04-02 08:23 by guoweigw
[考研] 085410 一志愿211 22408分数359求调剂 +3 123456789qw 2026-03-31 4/200 2026-04-02 00:06 by 义文wang
[考研] 085600,320分求调剂 +5 大馋小子 2026-04-01 6/300 2026-04-01 19:40 by 唐沐儿
[考研] 349求调剂 +6 吃的不少 2026-04-01 6/300 2026-04-01 17:55 by JYD2011
[考研] 326求调剂 +4 崽崽仔 2026-03-31 4/200 2026-04-01 09:58 by 我的船我的海
[考研] 一志愿 南京航空航天大学 ,080500材料科学与工程学硕 +10 @taotao 2026-03-31 11/550 2026-04-01 09:43 by xiayizhi
[考研] 0856材料化工调剂 总分330 +18 zhubinhao 2026-03-27 18/900 2026-04-01 09:37 by oooqiao
[考研] 086000调剂 +5 7901117076 2026-03-26 5/250 2026-03-31 17:45 by 544594351
[考研] 0703化学 +20 妮妮ninicgb 2026-03-27 20/1000 2026-03-31 13:33 by 无际的草原
[考研] 一志愿大连理工大学,机械工程学硕,341 +3 西瓜田的守望者 2026-03-30 3/150 2026-03-31 11:08 by asdfzly
[考研] 269求调剂 +4 我想读研11 2026-03-31 4/200 2026-03-31 10:04 by cal0306
[考研] 一志愿大连理工大学材料求调剂 +6 Gymno 2026-03-30 6/300 2026-03-31 07:26 by 无际的草原
[考研] 312,生物学求调剂 +3 小译同学abc 2026-03-28 3/150 2026-03-28 15:32 by 落睿可思
[考研] 298调剂 +3 jiyingjie123 2026-03-27 3/150 2026-03-27 11:57 by wxiongid
信息提示
请填处理意见