| 查看: 572 | 回复: 2 | ||
[求助]
lunix下定义三维数组出错，可以帮忙看下吗？谢谢
|
|
我定义了一个动态数组， COMPLEX(16),DIMENSION(:,  ,allocatable ::GG,SHH,GA& ,Rho1,Rho2,Rho COMPLEX(16),DIMENSION(:,:, ,allocatable :: F,HG,SALLOCATE(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,GA1 Error: Kind 16 not supported for type COMPLEX at (1) xingnewarmchair.f:20.16: COMPLEX(16),DIMENSION(:,:, ,allocatable :: F,HG,S1 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) |
回复此楼» 猜你喜欢
» 本主题相关价值贴推荐，对您同样有帮助:
磷酸铁锂电池40度的容量居然比23度低，求大神帮忙解释！有金币感激！
已经有12人回复
- 请专家帮忙看是什么树脂
已经有3人回复
- 望大侠帮忙分析一下这张循环伏安图
已经有3人回复
- gaussian运算出错，贴出log和输入文件求高手给指点一下
已经有9人回复
- 帮忙分析下雷达测向中辐射源信号的相关性对测向性能的影响具有研究价值吗？
已经有4人回复
- 下载了MATLAB2012可是安装不了。大侠帮帮忙谢谢
已经有13人回复
- 汉译英，170字，医学专业，120金币，请高手帮忙搞定，请手翻，谢谢！
已经有1人回复
- 汉译英，330字，医学专业，请高手帮忙搞定，请手译，谢绝机翻，摆脱，谢谢！
已经有1人回复
- 请帮忙翻译一段话，汉译英，谢谢
已经有2人回复
- 急求帮助，请各位帮忙！谢谢计算NBO电荷分析出现如下问题
已经有6人回复
- 关于苄基氯成季铵盐的问题，尝试了10多次都未成功，希望大家帮帮忙啊。谢谢了！
已经有6人回复
- TableCurve 3D v4.0 自动三维曲线拟合与经验公式查找软件【搜索无重复】Zxl890727
已经有125人回复
- VB控件数组的使用
已经有4人回复
- 请教Fortran下如何给二维或三维数组赋初值，谢谢
已经有3人回复
- 三维数组换行输入到文件（intel fortran 编译器）
已经有6人回复
libralibra
至尊木虫 (著名写手)
骠骑将军
- 程序强帖: 40
- 应助: 817 (博后)
- 金币: 12914.1
- 红花: 64
- 帖子: 2238
- 在线: 287.3小时
- 虫号: 696514
- 注册: 2009-02-05
- 专业: 计算机软件
2楼2012-06-14 19:12:17
3楼2012-06-14 20:25:11
10