24小时热门版块排行榜    

查看: 666  |  回复: 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的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-15 00:12 by vZfe6xYu34yj
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-14 23:45 by vZfe6xYu34yj
[硕博家园] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-13 5/250 2026-09-14 23:13 by vZfe6xYu34yj
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 s3fFTmArrBt6 2026-09-13 3/150 2026-09-14 23:09 by vZfe6xYu34yj
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-13 5/250 2026-09-14 22:45 by vZfe6xYu34yj
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 LwdutQ8HoqWP 2026-09-13 3/150 2026-09-14 22:33 by vZfe6xYu34yj
[找工作] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 3n8v2C8RimXI 2026-09-13 5/250 2026-09-14 22:13 by vZfe6xYu34yj
[博后之家] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 3n8v2C8RimXI 2026-09-13 5/250 2026-09-14 22:12 by vZfe6xYu34yj
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 3n8v2C8RimXI 2026-09-13 5/250 2026-09-14 22:01 by vZfe6xYu34yj
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +4 QUjhNVAcOSff 2026-09-13 5/250 2026-09-14 21:33 by vZfe6xYu34yj
[博后之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 QUjhNVAcOSff 2026-09-13 5/250 2026-09-14 21:24 by vZfe6xYu34yj
[公派出国] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 QUjhNVAcOSff 2026-09-13 7/350 2026-09-14 21:21 by vZfe6xYu34yj
[考博] 上海工程技术大学激光智能制造课题组招收博士研究生 +4 两三岁ss 2026-09-14 4/200 2026-09-14 20:29 by 班主任的同桌
[考研] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-14 18:01 by Aj1rhIDL5ixY
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-14 15:37 by Aj1rhIDL5ixY
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +5 QUjhNVAcOSff 2026-09-13 6/300 2026-09-14 15:21 by Aj1rhIDL5ixY
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 14:57 by Aj1rhIDL5ixY
[找工作] 浙江师范大学是怎么坑我的 +6 recruit123 2026-09-09 6/300 2026-09-14 12:00 by 萨仁其其格
[考博] 西北工业大学材料学院电化学传感与催化课题组招收2027年推免研究生、博士生、博士后 +3 马方园 2026-09-10 4/200 2026-09-14 09:29 by Chem张zz
[教师之家] 浙江师范大学是怎么坑我的 +10 recruit123 2026-09-09 15/750 2026-09-13 10:45 by seaskyy
信息提示
请填处理意见